Last active
November 4, 2020 23:52
-
-
Save ytomino/03f2f687483674feff1446e64c3fdac9 to your computer and use it in GitHub Desktop.
x86_64-apple-darwin12
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.Availability is | |
pragma Preelaborate; | |
-- __AVAILABILITY__ (empty) | |
IPHONE_2_0 : constant := 20000; | |
IPHONE_2_1 : constant := 20100; | |
IPHONE_2_2 : constant := 20200; | |
IPHONE_3_0 : constant := 30000; | |
IPHONE_3_1 : constant := 30100; | |
IPHONE_3_2 : constant := 30200; | |
IPHONE_4_0 : constant := 40000; | |
IPHONE_4_1 : constant := 40100; | |
IPHONE_4_2 : constant := 40200; | |
IPHONE_4_3 : constant := 40300; | |
IPHONE_5_0 : constant := 50000; | |
IPHONE_5_1 : constant := 50100; | |
IPHONE_NA : constant := 99999; | |
MAC_10_0 : constant := 1000; | |
MAC_10_1 : constant := 1010; | |
MAC_10_2 : constant := 1020; | |
MAC_10_3 : constant := 1030; | |
MAC_10_4 : constant := 1040; | |
MAC_10_5 : constant := 1050; | |
MAC_10_6 : constant := 1060; | |
MAC_10_7 : constant := 1070; | |
MAC_10_8 : constant := 1080; | |
MAC_NA : constant := 9999; | |
-- __OSX_AVAILABLE_BUT_DEPRECATED (has # or ##) | |
-- __OSX_AVAILABLE_STARTING (has # or ##) | |
end C.Availability; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.AvailabilityInternal is | |
pragma Preelaborate; | |
-- __AVAILABILITY_INTERNAL_DEPRECATED (attribute) | |
pragma Convention_Identifier (AVAILABILITY_INTERNAL_REGULAR, C); | |
-- __AVAILABILITY_INTERNAL_UNAVAILABLE (attribute) | |
-- __AVAILABILITY_INTERNAL_WEAK_IMPORT (attribute) | |
-- __AVAILABILITY_INTERNAL__ (empty) | |
pragma Convention_Identifier (AVAILABILITY_INTERNAL_MAC_10_0, C); | |
-- __AVAILABILITY_INTERNAL__MAC_10_0_DEP__MAC_10_1 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_0_DEP__MAC_10_2 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_0_DEP__MAC_10_3 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_0_DEP__MAC_10_4 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_0_DEP__MAC_10_5 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_0_DEP__MAC_10_6 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_0_DEP__MAC_10_7 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_0_DEP__MAC_10_8 (attribute) | |
pragma Convention_Identifier (AVAILABILITY_INTERNAL_MAC_10_0_DEP_MAC_NA, | |
C); | |
pragma Convention_Identifier (AVAILABILITY_INTERNAL_MAC_10_1, C); | |
-- __AVAILABILITY_INTERNAL__MAC_10_1_DEP__MAC_10_1 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_1_DEP__MAC_10_2 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_1_DEP__MAC_10_3 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_1_DEP__MAC_10_4 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_1_DEP__MAC_10_5 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_1_DEP__MAC_10_6 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_1_DEP__MAC_10_7 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_1_DEP__MAC_10_8 (attribute) | |
pragma Convention_Identifier (AVAILABILITY_INTERNAL_MAC_10_1_DEP_MAC_NA, | |
C); | |
pragma Convention_Identifier (AVAILABILITY_INTERNAL_MAC_10_2, C); | |
-- __AVAILABILITY_INTERNAL__MAC_10_2_DEP__MAC_10_2 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_2_DEP__MAC_10_3 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_2_DEP__MAC_10_4 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_2_DEP__MAC_10_5 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_2_DEP__MAC_10_6 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_2_DEP__MAC_10_7 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_2_DEP__MAC_10_8 (attribute) | |
pragma Convention_Identifier (AVAILABILITY_INTERNAL_MAC_10_2_DEP_MAC_NA, | |
C); | |
pragma Convention_Identifier (AVAILABILITY_INTERNAL_MAC_10_3, C); | |
-- __AVAILABILITY_INTERNAL__MAC_10_3_DEP__MAC_10_3 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_3_DEP__MAC_10_4 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_3_DEP__MAC_10_5 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_3_DEP__MAC_10_6 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_3_DEP__MAC_10_7 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_3_DEP__MAC_10_8 (attribute) | |
pragma Convention_Identifier (AVAILABILITY_INTERNAL_MAC_10_3_DEP_MAC_NA, | |
C); | |
pragma Convention_Identifier (AVAILABILITY_INTERNAL_MAC_10_4, C); | |
-- __AVAILABILITY_INTERNAL__MAC_10_4_DEP__MAC_10_4 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_4_DEP__MAC_10_5 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_4_DEP__MAC_10_6 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_4_DEP__MAC_10_7 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_4_DEP__MAC_10_8 (attribute) | |
pragma Convention_Identifier (AVAILABILITY_INTERNAL_MAC_10_4_DEP_MAC_NA, | |
C); | |
pragma Convention_Identifier (AVAILABILITY_INTERNAL_MAC_10_5, C); | |
-- __AVAILABILITY_INTERNAL__MAC_10_5_DEP__MAC_10_5 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_5_DEP__MAC_10_6 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_5_DEP__MAC_10_7 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_5_DEP__MAC_10_8 (attribute) | |
pragma Convention_Identifier (AVAILABILITY_INTERNAL_MAC_10_5_DEP_MAC_NA, | |
C); | |
pragma Convention_Identifier (AVAILABILITY_INTERNAL_MAC_10_6, C); | |
-- __AVAILABILITY_INTERNAL__MAC_10_6_DEP__MAC_10_6 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_6_DEP__MAC_10_7 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_6_DEP__MAC_10_8 (attribute) | |
pragma Convention_Identifier (AVAILABILITY_INTERNAL_MAC_10_6_DEP_MAC_NA, | |
C); | |
pragma Convention_Identifier (AVAILABILITY_INTERNAL_MAC_10_7, C); | |
-- __AVAILABILITY_INTERNAL__MAC_10_7_DEP__MAC_10_7 (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_10_7_DEP__MAC_10_8 (attribute) | |
pragma Convention_Identifier (AVAILABILITY_INTERNAL_MAC_10_7_DEP_MAC_NA, | |
C); | |
pragma Convention_Identifier (AVAILABILITY_INTERNAL_MAC_10_8, C); | |
-- __AVAILABILITY_INTERNAL__MAC_10_8_DEP__MAC_10_8 (attribute) | |
pragma Convention_Identifier (AVAILABILITY_INTERNAL_MAC_10_8_DEP_MAC_NA, | |
C); | |
-- __AVAILABILITY_INTERNAL__MAC_NA (attribute) | |
-- __AVAILABILITY_INTERNAL__MAC_NA_DEP__MAC_NA (attribute) | |
MAC_OS_X_VERSION_MAX_ALLOWED : constant := 1080; | |
MAC_OS_X_VERSION_MIN_REQUIRED : constant := 1080; | |
end C.AvailabilityInternal; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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_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_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_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_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_4_AND_LATER_BUT_DEPRECATED_... (attribute) | |
-- 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) | |
-- AVAILABLE_MAC_OS_X_VERSION_10_5_AND_LATER_BUT_DEPRECATED_... (attribute) | |
-- AVAILABLE_MAC_OS_X_VERSION_10_5_AND_LATER_BUT_DEPRECATED_... (attribute) | |
-- AVAILABLE_MAC_OS_X_VERSION_10_5_AND_LATER_BUT_DEPRECATED_... (attribute) | |
-- AVAILABLE_MAC_OS_X_VERSION_10_6_AND_LATER (empty) | |
-- AVAILABLE_MAC_OS_X_VERSION_10_6_AND_LATER_BUT_DEPRECATED (attribute) | |
-- AVAILABLE_MAC_OS_X_VERSION_10_6_AND_LATER_BUT_DEPRECATED_... (attribute) | |
-- AVAILABLE_MAC_OS_X_VERSION_10_6_AND_LATER_BUT_DEPRECATED_... (attribute) | |
-- AVAILABLE_MAC_OS_X_VERSION_10_7_AND_LATER (empty) | |
-- AVAILABLE_MAC_OS_X_VERSION_10_7_AND_LATER_BUT_DEPRECATED (attribute) | |
-- AVAILABLE_MAC_OS_X_VERSION_10_7_AND_LATER_BUT_DEPRECATED_... (attribute) | |
-- AVAILABLE_MAC_OS_X_VERSION_10_8_AND_LATER (empty) | |
-- AVAILABLE_MAC_OS_X_VERSION_10_8_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) | |
-- DEPRECATED_IN_MAC_OS_X_VERSION_10_6_AND_LATER (attribute) | |
-- DEPRECATED_IN_MAC_OS_X_VERSION_10_7_AND_LATER (attribute) | |
-- DEPRECATED_IN_MAC_OS_X_VERSION_10_8_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_10_6 : constant := 1060; | |
MAC_OS_X_VERSION_10_7 : constant := 1070; | |
MAC_OS_X_VERSION_10_8 : constant := 1080; | |
MAC_OS_X_VERSION_MAX_ALLOWED : constant := 1080; | |
MAC_OS_X_VERSION_MIN_REQUIRED : constant := 1080; | |
-- 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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.port; | |
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; | |
subtype au_asflgs_t is i386.types.u_int64_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; | |
ai_flags : aliased au_asflgs_t; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_auditinfo_addr); | |
type struct_auditinfo_addr_ptr is access all struct_auditinfo_addr; | |
for struct_auditinfo_addr_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_auditinfo_addr_ptr); | |
pragma Convention (C, struct_auditinfo_addr_ptr); | |
type struct_auditinfo_addr_const_ptr is | |
access constant struct_auditinfo_addr; | |
for struct_auditinfo_addr_const_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_auditinfo_addr_const_ptr); | |
pragma Convention (C, struct_auditinfo_addr_const_ptr); | |
subtype auditinfo_addr_t is struct_auditinfo_addr; | |
subtype auditinfo_addr_t_ptr is struct_auditinfo_addr_ptr; | |
type struct_auditpinfo; | |
type struct_auditpinfo is record | |
ap_pid : aliased sys.types.pid_t; | |
ap_auid : aliased au_id_t; | |
ap_mask : aliased au_mask_t; | |
ap_termid : aliased au_tid_t; | |
ap_asid : aliased au_asid_t; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_auditpinfo); | |
subtype auditpinfo_t is struct_auditpinfo; | |
type struct_auditpinfo_addr; | |
type struct_auditpinfo_addr is record | |
ap_pid : aliased sys.types.pid_t; | |
ap_auid : aliased au_id_t; | |
ap_mask : aliased au_mask_t; | |
ap_termid : aliased au_tid_addr_t; | |
ap_asid : aliased au_asid_t; | |
ap_flags : aliased au_asflgs_t; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_auditpinfo_addr); | |
subtype auditpinfo_addr_t is struct_auditpinfo_addr; | |
type struct_au_session; | |
type struct_au_session is record | |
as_aia_p : aliased auditinfo_addr_t_ptr; | |
as_mask : aliased au_mask_t; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_au_session); | |
subtype au_session_t is struct_au_session; | |
type struct_au_token (<>) is limited private; | |
subtype token_t is struct_au_token; | |
type struct_au_qctrl; | |
type struct_au_qctrl is record | |
aq_hiwater : aliased signed_int; | |
aq_lowater : aliased signed_int; | |
aq_bufsz : aliased signed_int; | |
aq_delay : aliased signed_int; | |
aq_minfree : aliased signed_int; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_au_qctrl); | |
subtype au_qctrl_t is struct_au_qctrl; | |
type struct_audit_stat; | |
type struct_audit_stat is record | |
as_version : aliased unsigned_int; | |
as_numevent : aliased unsigned_int; | |
as_generated : aliased signed_int; | |
as_nonattrib : aliased signed_int; | |
as_kernel : aliased signed_int; | |
as_audit : aliased signed_int; | |
as_auditctl : aliased signed_int; | |
as_enqueue : aliased signed_int; | |
as_written : aliased signed_int; | |
as_wblocked : aliased signed_int; | |
as_rblocked : aliased signed_int; | |
as_dropped : aliased signed_int; | |
as_totalsize : aliased signed_int; | |
as_memused : aliased unsigned_int; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_audit_stat); | |
subtype au_stat_t is struct_audit_stat; | |
type struct_audit_fstat; | |
type struct_audit_fstat is record | |
af_filesz : aliased i386.types.u_int64_t; | |
af_currsz : aliased i386.types.u_int64_t; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_audit_fstat); | |
subtype au_fstat_t is struct_audit_fstat; | |
type struct_au_evclass_map; | |
type struct_au_evclass_map is record | |
ec_number : aliased au_event_t; | |
ec_class : aliased au_class_t; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_au_evclass_map); | |
subtype au_evclass_map_t is struct_au_evclass_map; | |
function audit (a1 : void_const_ptr; a2 : signed_int) return signed_int; | |
pragma Import (C, audit, "audit"); | |
function auditon (a1 : signed_int; a2 : void_ptr; a3 : signed_int) | |
return signed_int; | |
pragma Import (C, auditon, "auditon"); | |
function auditctl (a1 : access constant char) return signed_int; | |
pragma Import (C, auditctl, "auditctl"); | |
function getauid (a1 : access au_id_t) return signed_int; | |
pragma Import (C, getauid, "getauid"); | |
function setauid (a1 : access constant au_id_t) return signed_int; | |
pragma Import (C, setauid, "setauid"); | |
function getaudit_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"); | |
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"); | |
-- #include <mach/i386/boolean.h> | |
-- #include <mach/i386/vm_types.h> | |
-- #include <mach/port.h> | |
function audit_session_self return mach.port.mach_port_name_t; | |
pragma Import (C, audit_session_self, "audit_session_self"); | |
function audit_session_join (port : mach.port.mach_port_name_t) | |
return au_asid_t; | |
pragma Import (C, audit_session_join, "audit_session_join"); | |
function audit_session_port (asid : au_asid_t; | |
portname : access mach.port.mach_port_name_t) return signed_int; | |
pragma Import (C, audit_session_port, "audit_session_port"); | |
AQ_BUFSZ : constant := 32767; | |
AQ_HIWATER : constant := 100; | |
AQ_LOWATER : constant := 10; | |
AQ_MAXBUFSZ : constant := 1048576; | |
AQ_MAXHIGH : constant := 10000; | |
AT_IPC_MSG : constant := 1; | |
AT_IPC_SEM : constant := 2; | |
AT_IPC_SHM : constant := 3; | |
AUC_AUDITING : constant := 1; | |
AUC_DISABLED : constant := -1; | |
AUC_NOAUDIT : constant := 2; | |
AUC_UNSET : constant := 0; | |
AUDITDEV_FILENAME : constant char_array (0 .. 5) := "audit" | |
& char'Val (0); | |
AUDIT_AHLT : constant := 2; | |
AUDIT_ARGE : constant := 8; | |
AUDIT_ARGV : constant := 4; | |
AUDIT_CNT : constant := 1; | |
AUDIT_GROUP : constant := 128; | |
AUDIT_HARD_LIMIT_FREE_BLOCKS : constant := 4; | |
AUDIT_PATH : constant := 512; | |
AUDIT_PERZONE : constant := 8192; | |
AUDIT_PUBLIC : constant := 2048; | |
AUDIT_RECORD_MAGIC : constant := -2104881381; | |
AUDIT_SCNT : constant := 1024; | |
AUDIT_SEQ : constant := 16; | |
AUDIT_TRAIL : constant := 256; | |
AUDIT_TRIGGER_CLOSE_AND_DIE : constant := 4; | |
AUDIT_TRIGGER_EXPIRE_TRAILS : constant := 8; | |
AUDIT_TRIGGER_FILE : constant char_array (0 .. 10) := "/dev/audit" | |
& char'Val (0); | |
AUDIT_TRIGGER_INITIALIZE : constant := 7; | |
AUDIT_TRIGGER_LOW_SPACE : constant := 1; | |
AUDIT_TRIGGER_MAX : constant := 8; | |
AUDIT_TRIGGER_MIN : constant := 1; | |
AUDIT_TRIGGER_NO_SPACE : constant := 5; | |
AUDIT_TRIGGER_READ_FILE : constant := 3; | |
AUDIT_TRIGGER_ROTATE_KERNEL : constant := 2; | |
AUDIT_TRIGGER_ROTATE_USER : constant := 6; | |
AUDIT_USER : constant := 64; | |
AUDIT_WINDATA : constant := 32; | |
AUDIT_ZONENAME : constant := 4096; | |
AU_ASSIGN_ASID : constant := -1; | |
AU_DEFAUDITID : constant := 4294967295; | |
AU_DEFAUDITSID : constant := 0; | |
AU_FS_MINFREE : constant := 20; | |
AU_IPv4 : constant := 4; | |
AU_IPv6 : constant := 16; | |
A_GETCAR : constant := 9; | |
A_GETCLASS : constant := 22; | |
A_GETCOND : constant := 37; | |
A_GETCWD : constant := 8; | |
A_GETFSIZE : constant := 27; | |
A_GETKAUDIT : constant := 29; | |
A_GETKMASK : constant := 4; | |
A_GETPINFO : constant := 24; | |
A_GETPINFO_ADDR : constant := 28; | |
A_GETPOLICY : constant := 33; | |
A_GETQCTRL : constant := 35; | |
A_GETSFLAGS : constant := 39; | |
A_GETSINFO_ADDR : constant := 32; | |
A_GETSTAT : constant := 12; | |
A_OLDGETCOND : constant := 20; | |
A_OLDGETPOLICY : constant := 2; | |
A_OLDGETQCTRL : constant := 6; | |
A_OLDSETCOND : constant := 21; | |
A_OLDSETPOLICY : constant := 3; | |
A_OLDSETQCTRL : constant := 7; | |
A_SENDTRIGGER : constant := 31; | |
A_SETCLASS : constant := 23; | |
A_SETCOND : constant := 38; | |
A_SETFSIZE : constant := 26; | |
A_SETKAUDIT : constant := 30; | |
A_SETKMASK : constant := 5; | |
A_SETPMASK : constant := 25; | |
A_SETPOLICY : constant := 34; | |
A_SETQCTRL : constant := 36; | |
A_SETSFLAGS : constant := 40; | |
A_SETSMASK : constant := 15; | |
A_SETSTAT : constant := 13; | |
A_SETUMASK : constant := 14; | |
MAXAUDITDATA : constant := 32767; | |
MAX_AUDIT_RECORDS : constant := 20; | |
MAX_AUDIT_RECORD_SIZE : constant := 32767; | |
MIN_AUDIT_FILE_SIZE : constant := 524288; | |
-- _BSM_AUDIT_H (empty) | |
private | |
type struct_au_token is null record; | |
end C.bsm.audit; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.bsm is | |
pragma Preelaborate; | |
end C.bsm; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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"); | |
type access_ce36f86b is access function (a1 : signed_int; a2 : signed_int; | |
a3 : access struct_copyfile_state; a4 : access constant char; | |
a5 : access constant char; a6 : void_ptr) return signed_int; | |
pragma Convention (C, access_ce36f86b); | |
subtype copyfile_callback_t is access_ce36f86b; | |
COPYFILE_ACL : constant := 1; | |
COPYFILE_ALL : constant := 15; | |
COPYFILE_CHECK : constant := 65536; | |
COPYFILE_CONTINUE : constant := 0; | |
COPYFILE_COPY_DATA : constant := 4; | |
COPYFILE_COPY_XATTR : constant := 5; | |
COPYFILE_DATA : constant := 8; | |
COPYFILE_DISABLE_VAR : constant char_array (0 .. 16) := "COPYFILE_DISABLE" | |
& char'Val (0); | |
COPYFILE_ERR : constant := 3; | |
COPYFILE_EXCL : constant := 131072; | |
COPYFILE_FINISH : constant := 2; | |
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_PROGRESS : constant := 4; | |
COPYFILE_QUIT : constant := 2; | |
COPYFILE_RECURSE_DIR : constant := 2; | |
COPYFILE_RECURSE_DIR_CLEANUP : constant := 3; | |
COPYFILE_RECURSE_ERROR : constant := 0; | |
COPYFILE_RECURSE_FILE : constant := 1; | |
COPYFILE_RECURSIVE : constant := 32768; | |
COPYFILE_SECURITY : constant := 3; | |
COPYFILE_SKIP : constant := 1; | |
COPYFILE_START : constant := 1; | |
COPYFILE_STAT : constant := 2; | |
COPYFILE_STATE_COPIED : constant := 8; | |
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_STATE_STATUS_CB : constant := 6; | |
COPYFILE_STATE_STATUS_CTX : constant := 7; | |
COPYFILE_STATE_XATTRNAME : constant := 9; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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_64_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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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 := 3221225472; | |
CTYPE_SWM : constant := 3758096384; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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_e97197ac 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_e97197ac); | |
type struct_e97197ac_ptr is access all struct_e97197ac; | |
for struct_e97197ac_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_e97197ac_ptr); | |
pragma Convention (C, struct_e97197ac_ptr); | |
subtype DIR is struct_e97197ac; | |
subtype DIR_ptr is struct_e97197ac_ptr; | |
function closedir (a1 : access DIR) return signed_int; | |
pragma Import (C, closedir, "closedir"); | |
function opendir (a1 : access constant char) return DIR_ptr; | |
pragma Import (C, opendir, "opendir$INODE64"); | |
function readdir (a1 : access DIR) return sys.dirent.struct_dirent_ptr; | |
pragma Import (C, readdir, "readdir$INODE64"); | |
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$INODE64"); | |
procedure rewinddir (a1 : access DIR); | |
pragma Import (C, rewinddir, "rewinddir$INODE64"); | |
procedure seekdir (a1 : access DIR; a2 : signed_long); | |
pragma Import (C, seekdir, "seekdir$INODE64"); | |
function telldir (a1 : access DIR) return signed_long; | |
pragma Import (C, telldir, "telldir$INODE64"); | |
type access_d5e34212 is access function ( | |
a1 : access sys.dirent.struct_dirent_const_ptr; | |
a2 : access sys.dirent.struct_dirent_const_ptr) return signed_int; | |
pragma Convention (C, access_d5e34212); | |
function alphasort (a1 : access sys.dirent.struct_dirent_const_ptr; | |
a2 : access sys.dirent.struct_dirent_const_ptr) return signed_int; | |
pragma Import (C, alphasort, "alphasort$INODE64"); | |
function dirfd (dirp : access DIR) return signed_int; | |
pragma Import (C, dirfd, "dirfd"); | |
type access_1f98a03b is access function ( | |
a1 : access constant sys.dirent.struct_dirent) return signed_int; | |
pragma Convention (C, access_1f98a03b); | |
function scandir (a1 : access constant char; | |
a2 : access sys.dirent.struct_dirent_ptr_ptr; a3 : access_1f98a03b; | |
a4 : access_d5e34212) return signed_int; | |
pragma Import (C, scandir, "scandir$INODE64"); | |
function getdirentries (a1 : signed_int; a2 : access char; | |
a3 : signed_int; a4 : access signed_long) return signed_int; | |
pragma Import (C, getdirentries, | |
"getdirentries_is_not_available_when_64_bit_inodes_are_in_effect"); | |
function opendir2 (a1 : access constant char; a2 : signed_int) | |
return DIR_ptr; | |
pragma Import (C, opendir2, "__opendir2$INODE64"); | |
DIRBLKSIZ : constant := 1024; | |
DTF_HIDEW : constant := 1; | |
DTF_NODUP : constant := 2; | |
DTF_REWIND : constant := 4; | |
-- _DIRENT_H_ (empty) | |
DTF_READALL : constant := 8; | |
private | |
type struct_telldir is null record; | |
end C.dirent; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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_MAIN_ONLY : constant void_ptr := void_ptr (System'To_Address (-5)); | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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; | |
ENOTRECOVERABLE : constant := sys.errno.ENOTRECOVERABLE; | |
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; | |
EOWNERDEAD : constant := sys.errno.EOWNERDEAD; | |
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; | |
EQFULL : constant := sys.errno.EQFULL; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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_1e8ea41d | |
renames sys.fcntl.FILESEC_OWNER; | |
function FILESEC_GROUP return sys.fcntl.enum_1e8ea41d | |
renames sys.fcntl.FILESEC_GROUP; | |
function FILESEC_UUID return sys.fcntl.enum_1e8ea41d | |
renames sys.fcntl.FILESEC_UUID; | |
function FILESEC_MODE return sys.fcntl.enum_1e8ea41d | |
renames sys.fcntl.FILESEC_MODE; | |
function FILESEC_ACL return sys.fcntl.enum_1e8ea41d | |
renames sys.fcntl.FILESEC_ACL; | |
function FILESEC_GRPUUID return sys.fcntl.enum_1e8ea41d | |
renames sys.fcntl.FILESEC_GRPUUID; | |
function FILESEC_ACL_RAW return sys.fcntl.enum_1e8ea41d | |
renames sys.fcntl.FILESEC_ACL_RAW; | |
function FILESEC_ACL_ALLOCSIZE return sys.fcntl.enum_1e8ea41d | |
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 open_dprotected_np (a1 : access constant char; a2 : signed_int; | |
a3 : signed_int; a4 : signed_int) return signed_int | |
renames sys.fcntl.open_dprotected_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_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; | |
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_unset_property (a1 : access sys.fcntl.struct_filesec; | |
a2 : sys.fcntl.filesec_property_t) return signed_int | |
renames sys.fcntl.filesec_unset_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; | |
FFDSYNC : constant := sys.fcntl.FFDSYNC; | |
FFSYNC : constant := sys.fcntl.FFSYNC; | |
FILESEC_GUID : sys.fcntl.enum_1e8ea41d 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_ADDFILESIGS : constant := sys.fcntl.F_ADDFILESIGS; | |
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_DUPFD_CLOEXEC : constant := sys.fcntl.F_DUPFD_CLOEXEC; | |
F_FLUSH_DATA : constant := sys.fcntl.F_FLUSH_DATA; | |
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_GETLKPID : constant := sys.fcntl.F_GETLKPID; | |
F_GETNOSIGPIPE : constant := sys.fcntl.F_GETNOSIGPIPE; | |
F_GETOWN : constant := sys.fcntl.F_GETOWN; | |
F_GETPATH : constant := sys.fcntl.F_GETPATH; | |
F_GETPATH_MTMINFO : constant := sys.fcntl.F_GETPATH_MTMINFO; | |
F_GETPROTECTIONCLASS : constant := sys.fcntl.F_GETPROTECTIONCLASS; | |
F_GETPROTECTIONLEVEL : constant := sys.fcntl.F_GETPROTECTIONLEVEL; | |
F_GLOBAL_NOCACHE : constant := sys.fcntl.F_GLOBAL_NOCACHE; | |
F_LOG2PHYS : constant := sys.fcntl.F_LOG2PHYS; | |
F_LOG2PHYS_EXT : constant := sys.fcntl.F_LOG2PHYS_EXT; | |
F_MARKDEPENDENCY : constant := sys.fcntl.F_MARKDEPENDENCY; | |
F_NOCACHE : constant := sys.fcntl.F_NOCACHE; | |
F_NODIRECT : constant := sys.fcntl.F_NODIRECT; | |
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_SETBACKINGSTORE : constant := sys.fcntl.F_SETBACKINGSTORE; | |
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_SETNOSIGPIPE : constant := sys.fcntl.F_SETNOSIGPIPE; | |
F_SETOWN : constant := sys.fcntl.F_SETOWN; | |
F_SETPROTECTIONCLASS : constant := sys.fcntl.F_SETPROTECTIONCLASS; | |
F_SETSIZE : constant := sys.fcntl.F_SETSIZE; | |
F_SINGLE_WRITER : constant := sys.fcntl.F_SINGLE_WRITER; | |
F_THAW_FS : constant := sys.fcntl.F_THAW_FS; | |
F_TRANSCODEKEY : constant := sys.fcntl.F_TRANSCODEKEY; | |
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_CLOEXEC : constant := sys.fcntl.O_CLOEXEC; | |
O_CREAT : constant := sys.fcntl.O_CREAT; | |
O_DIRECTORY : constant := sys.fcntl.O_DIRECTORY; | |
O_DP_GETRAWENCRYPTED : constant := sys.fcntl.O_DP_GETRAWENCRYPTED; | |
O_DSYNC : constant := sys.fcntl.O_DSYNC; | |
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_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) | |
qFILESEC_UNSET_PROPERTY : void_ptr | |
renames sys.fcntl.qFILESEC_UNSET_PROPERTY; | |
-- SYS_FCNTL_H renames sys.fcntl.SYS_FCNTL_H (empty) | |
end C.fcntl; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.fnmatch is | |
pragma Preelaborate; | |
function fnmatch (a1 : access constant char; a2 : access constant char; | |
a3 : signed_int) return signed_int; | |
pragma Import (C, fnmatch, "fnmatch"); | |
FNM_CASEFOLD : constant := 16; | |
FNM_FILE_NAME : constant := 2; | |
FNM_IGNORECASE : constant := 16; | |
FNM_LEADING_DIR : constant := 8; | |
FNM_NOESCAPE : constant := 1; | |
FNM_NOMATCH : constant := 1; | |
FNM_NOSYS : constant := -1; | |
FNM_PATHNAME : constant := 2; | |
FNM_PERIOD : constant := 4; | |
-- _FNMATCH_H_ (empty) | |
end C.fnmatch; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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"); | |
function getgruuid (a1 : access unsigned_char) return struct_group_ptr; | |
pragma Import (C, getgruuid, "getgruuid"); | |
function getgruuid_r (a1 : access unsigned_char; a2 : access struct_group; | |
a3 : access char; a4 : stddef.size_t; a5 : access struct_group_ptr) | |
return signed_int; | |
pragma Import (C, getgruuid_r, "getgruuid_r"); | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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; | |
CHAR_BIT : constant := 8; | |
CHAR_MAX : constant := 127; | |
CHAR_MIN : constant := -128; | |
CLK_TCK : constant := 100; | |
INT_MAX : constant := 2147483647; | |
INT_MIN : constant := -2147483648; | |
LLONG_MAX : constant := 9223372036854775807; | |
LLONG_MIN : constant := -9223372036854775808; | |
LONG_BIT : constant := 64; | |
LONG_MAX : constant := 9223372036854775807; | |
LONG_MIN : constant := -9223372036854775808; | |
MB_LEN_MAX : constant := 6; | |
QUAD_MAX : constant := 9223372036854775807; | |
QUAD_MIN : constant := -9223372036854775808; | |
SCHAR_MAX : constant := 127; | |
SCHAR_MIN : constant := -128; | |
SHRT_MAX : constant := 32767; | |
SHRT_MIN : constant := -32768; | |
SIZE_T_MAX : constant := 18446744073709551615; | |
SSIZE_MAX : constant := 9223372036854775807; | |
UCHAR_MAX : constant := 255; | |
UINT_MAX : constant := -1; | |
ULLONG_MAX : constant := 18446744073709551615; | |
ULONG_MAX : constant := 18446744073709551615; | |
UQUAD_MAX : constant := 18446744073709551615; | |
USHRT_MAX : constant := 65535; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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 := 7; | |
-- BASEPRI (function macro) | |
BLKDEV_IOSIZE : constant := 2048; | |
CLSIZE : constant := 1; | |
CLSIZELOG2 : constant := 0; | |
-- DELAY (function macro) | |
DEV_BSHIFT : constant := 9; | |
DEV_BSIZE : constant := 512; | |
M16KCLBYTES : constant := 16384; | |
M16KCLSHIFT : constant := 14; | |
MAXPHYS : constant := 131072; | |
MBIGCLBYTES : constant := 4096; | |
MBIGCLSHIFT : constant := 12; | |
MCLBYTES : constant := 2048; | |
MCLOFSET : constant := 2047; | |
MCLSHIFT : constant := 11; | |
MSIZE : constant := 256; | |
MSIZESHIFT : constant := 8; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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_ALIGN32 (function macro) | |
DARWIN_ALIGNBYTES : constant := 7; | |
DARWIN_ALIGNBYTES32 : 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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_mcontext_avx32; | |
type struct_darwin_mcontext_avx32 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_avx_state; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_darwin_mcontext_avx32); | |
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); | |
type struct_darwin_mcontext64_ptr is access all struct_darwin_mcontext64; | |
for struct_darwin_mcontext64_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_darwin_mcontext64_ptr); | |
pragma Convention (C, struct_darwin_mcontext64_ptr); | |
type struct_darwin_mcontext_avx64; | |
type struct_darwin_mcontext_avx64 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_avx_state64; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_darwin_mcontext_avx64); | |
subtype mcontext_t is struct_darwin_mcontext64_ptr; | |
-- I386_MCONTEXT_SIZE (unparsible) | |
-- _MCONTEXT_T (empty) | |
subtype STRUCT_MCONTEXT is struct_darwin_mcontext64; | |
subtype STRUCT_MCONTEXT32 is struct_darwin_mcontext32; | |
subtype STRUCT_MCONTEXT64 is struct_darwin_mcontext64; | |
subtype STRUCT_MCONTEXT_AVX32 is struct_darwin_mcontext_avx32; | |
subtype STRUCT_MCONTEXT_AVX64 is struct_darwin_mcontext_avx64; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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_array is signed_long_long_array; | |
subtype int64_t_ptr is signed_long_long_ptr; | |
subtype int64_t_const_ptr is signed_long_long_const_ptr; | |
subtype uint64_t is unsigned_long_long; | |
subtype uint64_t_ptr is unsigned_long_long_ptr; | |
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_ct_rune_t is signed_int; | |
type union_17c24ca5 (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_17c24ca5); | |
pragma Convention (C_Pass_By_Copy, union_17c24ca5); | |
type union_17c24ca5_ptr is access all union_17c24ca5; | |
for union_17c24ca5_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (union_17c24ca5_ptr); | |
pragma Convention (C, union_17c24ca5_ptr); | |
type union_17c24ca5_const_ptr is access constant union_17c24ca5; | |
for union_17c24ca5_const_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (union_17c24ca5_const_ptr); | |
pragma Convention (C, union_17c24ca5_const_ptr); | |
subtype mbstate_t is union_17c24ca5; | |
subtype mbstate_t_ptr is union_17c24ca5_ptr; | |
subtype mbstate_t_const_ptr is union_17c24ca5_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_long; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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.int64_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 user_off_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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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_eb42dd00 is access procedure (uc : unsigned_int; | |
data : void_ptr); | |
pragma Convention (C, access_eb42dd00); | |
subtype iconv_unicode_char_hook is access_eb42dd00; | |
type access_0795baf5 is access procedure (wc : stddef.wchar_t; | |
data : void_ptr); | |
pragma Convention (C, access_0795baf5); | |
subtype iconv_wide_char_hook is access_0795baf5; | |
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_1985415c is access procedure ( | |
buf : access constant unsigned_int; buflen : stddef.size_t; | |
callback_arg : void_ptr); | |
pragma Convention (C, access_1985415c); | |
type access_bc2e2fb8 is access procedure (inbuf : access constant char; | |
inbufsize : stddef.size_t; write_replacement : access_1985415c; | |
callback_arg : void_ptr; data : void_ptr); | |
pragma Convention (C, access_bc2e2fb8); | |
subtype iconv_unicode_mb_to_uc_fallback is access_bc2e2fb8; | |
type access_01ded4d8 is access procedure (buf : access constant char; | |
buflen : stddef.size_t; callback_arg : void_ptr); | |
pragma Convention (C, access_01ded4d8); | |
type access_d9739b82 is access procedure (code : unsigned_int; | |
write_replacement : access_01ded4d8; callback_arg : void_ptr; | |
data : void_ptr); | |
pragma Convention (C, access_d9739b82); | |
subtype iconv_unicode_uc_to_mb_fallback is access_d9739b82; | |
type access_05d86e80 is access procedure ( | |
buf : access constant stddef.wchar_t; buflen : stddef.size_t; | |
callback_arg : void_ptr); | |
pragma Convention (C, access_05d86e80); | |
type access_11246ef8 is access procedure (inbuf : access constant char; | |
inbufsize : stddef.size_t; write_replacement : access_05d86e80; | |
callback_arg : void_ptr; data : void_ptr); | |
pragma Convention (C, access_11246ef8); | |
subtype iconv_wchar_mb_to_wc_fallback is access_11246ef8; | |
type access_3fdc01af is access procedure (buf : access constant char; | |
buflen : stddef.size_t; callback_arg : void_ptr); | |
pragma Convention (C, access_3fdc01af); | |
type access_5235563a is access procedure (code : stddef.wchar_t; | |
write_replacement : access_3fdc01af; callback_arg : void_ptr; | |
data : void_ptr); | |
pragma Convention (C, access_5235563a); | |
subtype iconv_wchar_wc_to_mb_fallback is access_5235563a; | |
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_cdbbec24 is access function (a1 : unsigned_int; | |
a2 : access char_const_ptr; a3 : void_ptr) return signed_int; | |
pragma Convention (C, access_cdbbec24); | |
procedure iconvlist (a1 : access_cdbbec24; 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- 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 : C.i386.qtypes.uint16_t) | |
return C.i386.qtypes.uint16_t is | |
begin | |
return C.i386.qtypes.uint16_t'(Shift_Left (data, 8)) | |
or C.i386.qtypes.uint16_t'(Shift_Right (data, 8)); | |
end OSSwapInt16; | |
function OSSwapInt32 (data : C.i386.qtypes.uint32_t) | |
return C.i386.qtypes.uint32_t | |
is | |
Mutable_data : C.i386.qtypes.uint32_t := data; | |
begin | |
Asm ("bswap %0", | |
Outputs => C.i386.qtypes.uint32_t'Asm_Output ("+r", Mutable_data), | |
Volatile => True); | |
return Mutable_data; | |
end OSSwapInt32; | |
function OSSwapInt64 (data : C.i386.qtypes.uint64_t) | |
return C.i386.qtypes.uint64_t | |
is | |
Mutable_data : C.i386.qtypes.uint64_t := data; | |
begin | |
Asm ("bswap %0", | |
Outputs => C.i386.qtypes.uint64_t'Asm_Output ("+r", 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 : C.i386.qtypes.uint16_t) | |
return C.i386.qtypes.uint16_t; | |
pragma Convention (C, OSSwapInt16); | |
pragma Inline (OSSwapInt16); | |
function OSSwapInt32 (data : C.i386.qtypes.uint32_t) | |
return C.i386.qtypes.uint32_t; | |
pragma Convention (C, OSSwapInt32); | |
pragma Inline (OSSwapInt32); | |
function OSSwapInt64 (data : C.i386.qtypes.uint64_t) | |
return 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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; | |
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; | |
OFF_MAX : constant := 9223372036854775807; | |
OFF_MIN : constant := -9223372036854775808; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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_MSEC : constant := 1000000; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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.port; | |
with C.mach.thread_status; | |
with C.stdint; | |
package C.mach.exception_types is | |
pragma Preelaborate; | |
subtype exception_type_t is signed_int; | |
subtype exception_data_type_t is i386.vm_types.integer_t; | |
subtype exception_data_type_t_ptr is 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 | |
thread_status.thread_state_flavor_t_ptr; | |
subtype exception_port_array_t is port.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_MACF_MAX : constant := 196607; | |
EXC_MACF_MIN : constant := 131072; | |
EXC_MACH_SYSCALL : constant := 8; | |
EXC_MASK_ALL : constant := 3070; | |
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_RESOURCE : constant := 2048; | |
EXC_MASK_RPC_ALERT : constant := 512; | |
EXC_MASK_SOFTWARE : constant := 32; | |
EXC_MASK_SYSCALL : constant := 128; | |
EXC_RESOURCE : constant := 11; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 i386.vm_types.integer_t_ptr; | |
subtype host_info64_t is i386.vm_types.integer_t_ptr; | |
subtype host_info_data_t is 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 i386.vm_types.integer_t; | |
type struct_host_basic_info; | |
type struct_host_basic_info is record | |
max_cpus : aliased i386.vm_types.integer_t; | |
avail_cpus : aliased i386.vm_types.integer_t; | |
memory_size : aliased i386.vm_types.natural_t; | |
cpu_type : aliased machine.cpu_type_t; | |
cpu_subtype : aliased machine.cpu_subtype_t; | |
cpu_threadtype : aliased machine.cpu_threadtype_t; | |
physical_cpu : aliased i386.vm_types.integer_t; | |
physical_cpu_max : aliased i386.vm_types.integer_t; | |
logical_cpu : aliased i386.vm_types.integer_t; | |
logical_cpu_max : aliased 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 i386.vm_types.integer_t; | |
min_quantum : aliased 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 i386.vm_types.natural_t; | |
thread : aliased i386.vm_types.natural_t; | |
port : aliased i386.vm_types.natural_t; | |
memory_region : aliased i386.vm_types.natural_t; | |
memory_object : aliased 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 i386.vm_types.integer_t; | |
system_priority : aliased i386.vm_types.integer_t; | |
server_priority : aliased i386.vm_types.integer_t; | |
user_priority : aliased i386.vm_types.integer_t; | |
depress_priority : aliased i386.vm_types.integer_t; | |
idle_priority : aliased i386.vm_types.integer_t; | |
minimum_priority : aliased i386.vm_types.integer_t; | |
maximum_priority : aliased 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 i386.vm_types.integer_t_array (0 .. 2); | |
mach_factor : aliased 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 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_EXTMOD_INFO64 : constant := 5; | |
HOST_EXTMOD_INFO64_COUNT : constant := 12; | |
HOST_EXTMOD_INFO64_LATEST_COUNT : constant := 12; | |
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_INFO64 : constant := 4; | |
HOST_VM_INFO64_COUNT : constant := 24; | |
HOST_VM_INFO64_LATEST_COUNT : constant := 24; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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_AMFID_PORT : constant := 18; | |
HOST_AUDIT_CONTROL_PORT : constant := 9; | |
HOST_AUTOMOUNTD_PORT : constant := 11; | |
HOST_CHUD_PORT : constant := 16; | |
HOST_DYNAMIC_PAGER_PORT : constant := 8; | |
HOST_GSSD_PORT : constant := 19; | |
HOST_IO_MASTER_PORT : constant := 3; | |
HOST_KEXTD_PORT : constant := 15; | |
HOST_LOCAL_NODE : constant := -1; | |
HOST_LOCKD_PORT : constant := 12; | |
HOST_MAX_SPECIAL_KERNEL_PORT : constant := 7; | |
HOST_MAX_SPECIAL_PORT : constant := 20; | |
HOST_PORT : constant := 1; | |
HOST_PRIV_PORT : constant := 2; | |
HOST_SEATBELT_PORT : constant := 14; | |
HOST_SECURITY_PORT : constant := 0; | |
HOST_UNFREED_PORT : constant := 17; | |
HOST_USER_NOTIFICATION_PORT : constant := 10; | |
-- _MACH_HOST_SPECIAL_PORTS_H_ (empty) | |
-- host_get_amfid_port (unparsible) | |
-- host_get_audit_control_port (unparsible) | |
-- host_get_automountd_port (unparsible) | |
-- host_get_chud_port (unparsible) | |
-- host_get_dynamic_pager_port (unparsible) | |
-- host_get_gssd_port (unparsible) | |
-- host_get_host_port (unparsible) | |
-- host_get_host_priv_port (unparsible) | |
-- host_get_io_master_port (unparsible) | |
-- host_get_kextd_port (unparsible) | |
-- host_get_lockd_port (unparsible) | |
-- host_get_unfreed_port (unparsible) | |
-- host_get_user_notification_port (unparsible) | |
-- host_set_amfid_port (unparsible) | |
-- host_set_audit_control_port (unparsible) | |
-- host_set_automountd_port (unparsible) | |
-- host_set_chud_port (unparsible) | |
-- host_set_dynamic_pager_port (unparsible) | |
-- host_set_gssd_port (unparsible) | |
-- host_set_host_port (function macro) | |
-- host_set_host_priv_port (function macro) | |
-- host_set_io_master_port (function macro) | |
-- host_set_kextd_port (unparsible) | |
-- host_set_lockd_port (unparsible) | |
-- host_set_unfreed_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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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 unsigned_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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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 := 12; | |
-- _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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 C.i386.qtypes.uint8_t; | |
fpu_rsrv1 : aliased C.i386.qtypes.uint8_t; | |
fpu_fop : aliased C.i386.qtypes.uint16_t; | |
fpu_ip : aliased C.i386.qtypes.uint32_t; | |
fpu_cs : aliased C.i386.qtypes.uint16_t; | |
fpu_rsrv2 : aliased C.i386.qtypes.uint16_t; | |
fpu_dp : aliased C.i386.qtypes.uint32_t; | |
fpu_ds : aliased C.i386.qtypes.uint16_t; | |
fpu_rsrv3 : aliased C.i386.qtypes.uint16_t; | |
fpu_mxcsr : aliased C.i386.qtypes.uint32_t; | |
fpu_mxcsrmask : aliased 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_avx_state; | |
type struct_darwin_i386_avx_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 C.i386.qtypes.uint8_t; | |
fpu_rsrv1 : aliased C.i386.qtypes.uint8_t; | |
fpu_fop : aliased C.i386.qtypes.uint16_t; | |
fpu_ip : aliased C.i386.qtypes.uint32_t; | |
fpu_cs : aliased C.i386.qtypes.uint16_t; | |
fpu_rsrv2 : aliased C.i386.qtypes.uint16_t; | |
fpu_dp : aliased C.i386.qtypes.uint32_t; | |
fpu_ds : aliased C.i386.qtypes.uint16_t; | |
fpu_rsrv3 : aliased C.i386.qtypes.uint16_t; | |
fpu_mxcsr : aliased C.i386.qtypes.uint32_t; | |
fpu_mxcsrmask : aliased 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; | |
avx_reserved1 : aliased char_array (0 .. 63); | |
fpu_ymmh0 : aliased struct_darwin_xmm_reg; | |
fpu_ymmh1 : aliased struct_darwin_xmm_reg; | |
fpu_ymmh2 : aliased struct_darwin_xmm_reg; | |
fpu_ymmh3 : aliased struct_darwin_xmm_reg; | |
fpu_ymmh4 : aliased struct_darwin_xmm_reg; | |
fpu_ymmh5 : aliased struct_darwin_xmm_reg; | |
fpu_ymmh6 : aliased struct_darwin_xmm_reg; | |
fpu_ymmh7 : aliased struct_darwin_xmm_reg; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_darwin_i386_avx_state); | |
type struct_darwin_i386_exception_state; | |
type struct_darwin_i386_exception_state is record | |
trapno : aliased C.i386.qtypes.uint16_t; | |
cpu : aliased C.i386.qtypes.uint16_t; | |
err : aliased C.i386.qtypes.uint32_t; | |
faultvaddr : aliased C.i386.qtypes.uint32_t; | |
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 C.i386.qtypes.uint64_t; | |
rbx : aliased C.i386.qtypes.uint64_t; | |
rcx : aliased C.i386.qtypes.uint64_t; | |
rdx : aliased C.i386.qtypes.uint64_t; | |
rdi : aliased C.i386.qtypes.uint64_t; | |
rsi : aliased C.i386.qtypes.uint64_t; | |
rbp : aliased C.i386.qtypes.uint64_t; | |
rsp : aliased C.i386.qtypes.uint64_t; | |
r8 : aliased C.i386.qtypes.uint64_t; | |
r9 : aliased C.i386.qtypes.uint64_t; | |
r10 : aliased C.i386.qtypes.uint64_t; | |
r11 : aliased C.i386.qtypes.uint64_t; | |
r12 : aliased C.i386.qtypes.uint64_t; | |
r13 : aliased C.i386.qtypes.uint64_t; | |
r14 : aliased C.i386.qtypes.uint64_t; | |
r15 : aliased C.i386.qtypes.uint64_t; | |
rip : aliased C.i386.qtypes.uint64_t; | |
rflags : aliased C.i386.qtypes.uint64_t; | |
cs : aliased C.i386.qtypes.uint64_t; | |
fs : aliased C.i386.qtypes.uint64_t; | |
gs : aliased 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 C.i386.qtypes.uint8_t; | |
fpu_rsrv1 : aliased C.i386.qtypes.uint8_t; | |
fpu_fop : aliased C.i386.qtypes.uint16_t; | |
fpu_ip : aliased C.i386.qtypes.uint32_t; | |
fpu_cs : aliased C.i386.qtypes.uint16_t; | |
fpu_rsrv2 : aliased C.i386.qtypes.uint16_t; | |
fpu_dp : aliased C.i386.qtypes.uint32_t; | |
fpu_ds : aliased C.i386.qtypes.uint16_t; | |
fpu_rsrv3 : aliased C.i386.qtypes.uint16_t; | |
fpu_mxcsr : aliased C.i386.qtypes.uint32_t; | |
fpu_mxcsrmask : aliased 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_avx_state64; | |
type struct_darwin_x86_avx_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 C.i386.qtypes.uint8_t; | |
fpu_rsrv1 : aliased C.i386.qtypes.uint8_t; | |
fpu_fop : aliased C.i386.qtypes.uint16_t; | |
fpu_ip : aliased C.i386.qtypes.uint32_t; | |
fpu_cs : aliased C.i386.qtypes.uint16_t; | |
fpu_rsrv2 : aliased C.i386.qtypes.uint16_t; | |
fpu_dp : aliased C.i386.qtypes.uint32_t; | |
fpu_ds : aliased C.i386.qtypes.uint16_t; | |
fpu_rsrv3 : aliased C.i386.qtypes.uint16_t; | |
fpu_mxcsr : aliased C.i386.qtypes.uint32_t; | |
fpu_mxcsrmask : aliased 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; | |
avx_reserved1 : aliased char_array (0 .. 63); | |
fpu_ymmh0 : aliased struct_darwin_xmm_reg; | |
fpu_ymmh1 : aliased struct_darwin_xmm_reg; | |
fpu_ymmh2 : aliased struct_darwin_xmm_reg; | |
fpu_ymmh3 : aliased struct_darwin_xmm_reg; | |
fpu_ymmh4 : aliased struct_darwin_xmm_reg; | |
fpu_ymmh5 : aliased struct_darwin_xmm_reg; | |
fpu_ymmh6 : aliased struct_darwin_xmm_reg; | |
fpu_ymmh7 : aliased struct_darwin_xmm_reg; | |
fpu_ymmh8 : aliased struct_darwin_xmm_reg; | |
fpu_ymmh9 : aliased struct_darwin_xmm_reg; | |
fpu_ymmh10 : aliased struct_darwin_xmm_reg; | |
fpu_ymmh11 : aliased struct_darwin_xmm_reg; | |
fpu_ymmh12 : aliased struct_darwin_xmm_reg; | |
fpu_ymmh13 : aliased struct_darwin_xmm_reg; | |
fpu_ymmh14 : aliased struct_darwin_xmm_reg; | |
fpu_ymmh15 : aliased struct_darwin_xmm_reg; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_darwin_x86_avx_state64); | |
type struct_darwin_x86_exception_state64; | |
type struct_darwin_x86_exception_state64 is record | |
trapno : aliased C.i386.qtypes.uint16_t; | |
cpu : aliased C.i386.qtypes.uint16_t; | |
err : aliased C.i386.qtypes.uint32_t; | |
faultvaddr : aliased 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 C.i386.qtypes.uint64_t; | |
dr1 : aliased C.i386.qtypes.uint64_t; | |
dr2 : aliased C.i386.qtypes.uint64_t; | |
dr3 : aliased C.i386.qtypes.uint64_t; | |
dr4 : aliased C.i386.qtypes.uint64_t; | |
dr5 : aliased C.i386.qtypes.uint64_t; | |
dr6 : aliased C.i386.qtypes.uint64_t; | |
dr7 : aliased 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_AVX_STATE32 is struct_darwin_i386_avx_state; | |
subtype STRUCT_X86_AVX_STATE64 is struct_darwin_x86_avx_state64; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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 := 224; | |
THREAD_STATE_MAX : constant := 224; | |
-- _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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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; | |
with C.stdint; | |
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 qstructs.struct_darwin_i386_thread_state; | |
subtype x86_thread_state32_t is qstructs.struct_darwin_i386_thread_state; | |
subtype i386_float_state_t is qstructs.struct_darwin_i386_float_state; | |
subtype x86_float_state32_t is qstructs.struct_darwin_i386_float_state; | |
subtype x86_avx_state32_t is qstructs.struct_darwin_i386_avx_state; | |
subtype i386_exception_state_t is | |
qstructs.struct_darwin_i386_exception_state; | |
subtype x86_exception_state32_t is | |
qstructs.struct_darwin_i386_exception_state; | |
subtype x86_debug_state32_t is qstructs.struct_darwin_x86_debug_state32; | |
subtype x86_thread_state64_t is qstructs.struct_darwin_x86_thread_state64; | |
subtype x86_float_state64_t is qstructs.struct_darwin_x86_float_state64; | |
subtype x86_avx_state64_t is qstructs.struct_darwin_x86_avx_state64; | |
subtype x86_exception_state64_t is | |
qstructs.struct_darwin_x86_exception_state64; | |
subtype x86_debug_state64_t is qstructs.struct_darwin_x86_debug_state64; | |
type struct_x86_thread_state; | |
type union_3c47d0df (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_3c47d0df); | |
pragma Convention (C_Pass_By_Copy, union_3c47d0df); | |
type struct_x86_thread_state is record | |
tsh : aliased x86_state_hdr_t; | |
uts : aliased union_3c47d0df; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_x86_thread_state); | |
type struct_x86_float_state; | |
type union_42f68b20 (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_42f68b20); | |
pragma Convention (C_Pass_By_Copy, union_42f68b20); | |
type struct_x86_float_state is record | |
fsh : aliased x86_state_hdr_t; | |
ufs : aliased union_42f68b20; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_x86_float_state); | |
type struct_x86_exception_state; | |
type union_6344b8a7 (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_6344b8a7); | |
pragma Convention (C_Pass_By_Copy, union_6344b8a7); | |
type struct_x86_exception_state is record | |
esh : aliased x86_state_hdr_t; | |
ues : aliased union_6344b8a7; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_x86_exception_state); | |
type struct_x86_debug_state; | |
type union_e5c0428a (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_e5c0428a); | |
pragma Convention (C_Pass_By_Copy, union_e5c0428a); | |
type struct_x86_debug_state is record | |
dsh : aliased x86_state_hdr_t; | |
uds : aliased union_e5c0428a; | |
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 stdint.uint16_t; | |
cpu : aliased stdint.uint16_t; | |
err : aliased stdint.uint32_t; | |
eip : aliased stdint.uint32_t; | |
cs : aliased stdint.uint32_t; | |
efl : aliased stdint.uint32_t; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_x86_seg_load_fault32); | |
I386_EXCEPTION_STATE_COUNT_U : 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 := 224; | |
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_U : constant := 8; | |
X86_DEBUG_STATE64_COUNT_U : constant := 16; | |
X86_EXCEPTION_STATE64_COUNT_U : 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_AVX_STATE32 : constant := 16; | |
x86_AVX_STATE32_COUNT : constant := 179; | |
x86_AVX_STATE64 : constant := 17; | |
x86_AVX_STATE64_COUNT : constant := 211; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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_LPGBYTES : constant := 2097152; | |
I386_LPGMASK : constant := 2097151; | |
I386_LPGSHIFT : constant := 21; | |
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 := 18446744073707454464; | |
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 := 18446744072635809792; | |
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) | |
-- machine_ptob (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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 C.i386.qtypes.darwin_natural_t; | |
subtype natural_t_ptr is C.i386.qtypes.darwin_natural_t_ptr; | |
subtype natural_t_array is C.i386.qtypes.darwin_natural_t_array; | |
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 stdint.uintptr_t; | |
subtype vm_offset_t_ptr is stdint.uintptr_t_ptr; | |
subtype vm_offset_t_ptr_ptr is stdint.uintptr_t_ptr_ptr; | |
subtype vm_size_t is stdint.uintptr_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; | |
subtype mach_port_context_t is mach_vm_address_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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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_CODESIGN_ERROR : constant := 50; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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; | |
with C.stdint; | |
package C.mach.kmod is | |
pragma Preelaborate; | |
subtype kmod_t is signed_int; | |
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 access_1b23e53d is access function (ki : access struct_kmod_info; | |
data : void_ptr) return i386.kern_return.kern_return_t; | |
pragma Convention (C, access_1b23e53d); | |
-- subtype kmod_start_func_t is ... (function type) | |
subtype kmod_start_func_t_ptr is access_1b23e53d; | |
type access_5c1c85c3 is access function (ki : access struct_kmod_info; | |
data : void_ptr) return i386.kern_return.kern_return_t; | |
pragma Convention (C, access_5c1c85c3); | |
-- subtype kmod_stop_func_t is ... (function type) | |
subtype kmod_stop_func_t_ptr is access_5c1c85c3; | |
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_reference is record | |
next : aliased struct_kmod_reference_ptr; | |
info : aliased struct_kmod_info_ptr; | |
end record; | |
for struct_kmod_reference'Alignment use 8; | |
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 struct_kmod_info is record | |
next : aliased struct_kmod_info_ptr; | |
info_version : aliased stdint.int32_t; | |
id : aliased stdint.uint32_t; | |
name : aliased char_array (0 .. 63); | |
version : aliased char_array (0 .. 63); | |
reference_count : aliased stdint.int32_t; | |
reference_list : aliased kmod_reference_t_ptr; | |
address : aliased vm_types.vm_address_t; | |
size : aliased i386.vm_types.vm_size_t; | |
hdr_size : aliased 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 8; | |
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; | |
type struct_kmod_info_32_v1; | |
type struct_kmod_info_32_v1 is record | |
next_addr : aliased stdint.uint32_t; | |
info_version : aliased stdint.int32_t; | |
id : aliased stdint.uint32_t; | |
name : aliased stdint.uint8_t_array (0 .. 63); | |
version : aliased stdint.uint8_t_array (0 .. 63); | |
reference_count : aliased stdint.int32_t; | |
reference_list_addr : aliased stdint.uint32_t; | |
address : aliased stdint.uint32_t; | |
size : aliased stdint.uint32_t; | |
hdr_size : aliased stdint.uint32_t; | |
start_addr : aliased stdint.uint32_t; | |
stop_addr : aliased stdint.uint32_t; | |
end record; | |
for struct_kmod_info_32_v1'Alignment use 4; | |
pragma Convention (C_Pass_By_Copy, struct_kmod_info_32_v1); | |
subtype kmod_info_32_v1_t is struct_kmod_info_32_v1; | |
type struct_kmod_info_64_v1; | |
type struct_kmod_info_64_v1 is record | |
next_addr : aliased stdint.uint64_t; | |
info_version : aliased stdint.int32_t; | |
id : aliased stdint.uint32_t; | |
name : aliased stdint.uint8_t_array (0 .. 63); | |
version : aliased stdint.uint8_t_array (0 .. 63); | |
reference_count : aliased stdint.int32_t; | |
reference_list_addr : aliased stdint.uint64_t; | |
address : aliased stdint.uint64_t; | |
size : aliased stdint.uint64_t; | |
hdr_size : aliased stdint.uint64_t; | |
start_addr : aliased stdint.uint64_t; | |
stop_addr : aliased stdint.uint64_t; | |
end record; | |
for struct_kmod_info_64_v1'Alignment use 8; | |
pragma Convention (C_Pass_By_Copy, struct_kmod_info_64_v1); | |
subtype kmod_info_64_v1_t is struct_kmod_info_64_v1; | |
subtype kmod_args_t is void_ptr; | |
subtype kmod_control_flavor_t is signed_int; | |
subtype kmod_info_array_t is kmod_info_t_ptr; | |
-- KMOD_DECL (has # or ##) | |
-- KMOD_EXPLICIT_DECL (has # or ##) | |
-- subtype KMOD_INFO_NAME is struct kmod_info; | |
KMOD_INFO_VERSION : constant := 1; | |
KMOD_MAX_NAME : constant := 64; | |
KMOD_RETURN_FAILURE : constant := 5; | |
KMOD_RETURN_SUCCESS : constant := 0; | |
-- _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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 i386.kern_return.kern_return_t; | |
pragma Import (C, mach_timebase_info, "mach_timebase_info"); | |
function mach_wait_until (deadline : stdint.uint64_t) | |
return 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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.port; | |
with C.stdint; | |
package C.mach.mach_types is | |
pragma Preelaborate; | |
subtype task_t is port.mach_port_t; | |
subtype task_t_ptr is port.mach_port_t_ptr; | |
subtype task_name_t is port.mach_port_t; | |
subtype thread_t is port.mach_port_t; | |
subtype thread_t_ptr is port.mach_port_t_ptr; | |
subtype thread_act_t is port.mach_port_t; | |
subtype thread_act_t_ptr is port.mach_port_t_ptr; | |
subtype ipc_space_t is port.mach_port_t; | |
subtype host_t is port.mach_port_t; | |
subtype host_priv_t is port.mach_port_t; | |
subtype host_security_t is port.mach_port_t; | |
subtype processor_t is port.mach_port_t; | |
subtype processor_t_ptr is port.mach_port_t_ptr; | |
subtype processor_set_t is port.mach_port_t; | |
subtype processor_set_t_ptr is port.mach_port_t_ptr; | |
subtype processor_set_control_t is port.mach_port_t; | |
subtype semaphore_t is port.mach_port_t; | |
subtype lock_set_t is port.mach_port_t; | |
subtype ledger_t is port.mach_port_t; | |
subtype ledger_t_ptr is port.mach_port_t_ptr; | |
subtype alarm_t is port.mach_port_t; | |
subtype clock_serv_t is port.mach_port_t; | |
subtype clock_ctrl_t is port.mach_port_t; | |
subtype processor_set_name_t is processor_set_t; | |
subtype clock_reply_t is port.mach_port_t; | |
subtype bootstrap_t is port.mach_port_t; | |
subtype mem_entry_name_port_t is port.mach_port_t; | |
subtype exception_handler_t is port.mach_port_t; | |
subtype exception_handler_t_ptr is port.mach_port_t_ptr; | |
subtype exception_handler_array_t is exception_handler_t_ptr; | |
subtype vm_task_entry_t is port.mach_port_t; | |
subtype io_master_t is port.mach_port_t; | |
subtype UNDServerRef is port.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 i386.vm_types.natural_t; | |
subtype ledger_amount_t is stdint.int64_t; | |
subtype emulation_vector_t is 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_LIMIT_INFINITY : constant := 9223372036854775807; | |
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; | |
TID_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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 i386.vm_types.integer_t; | |
subtype cpu_type_t_ptr is i386.vm_types.integer_t_ptr; | |
subtype cpu_subtype_t is i386.vm_types.integer_t; | |
subtype cpu_threadtype_t is i386.vm_types.integer_t; | |
CPUFAMILY_ARM_11 : constant := -1879695144; | |
CPUFAMILY_ARM_13 : constant := 214503012; | |
CPUFAMILY_ARM_14 : constant := -1777893647; | |
CPUFAMILY_ARM_9 : constant := -416119890; | |
CPUFAMILY_ARM_XSCALE : constant := 1404044789; | |
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_IVYBRIDGE : constant := 526772277; | |
CPUFAMILY_INTEL_MEROM : constant := 1114597871; | |
CPUFAMILY_INTEL_NEHALEM : constant := 1801080018; | |
CPUFAMILY_INTEL_PENRYN : constant := 2028621756; | |
CPUFAMILY_INTEL_SANDYBRIDGE : constant := 1418770316; | |
CPUFAMILY_INTEL_WESTMERE : constant := 1463508716; | |
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_V5TEJ : constant := 7; | |
CPU_SUBTYPE_ARM_V6 : constant := 6; | |
CPU_SUBTYPE_ARM_V7 : constant := 9; | |
CPU_SUBTYPE_ARM_V7F : constant := 10; | |
CPU_SUBTYPE_ARM_V7K : constant := 12; | |
CPU_SUBTYPE_ARM_XSCALE : constant := 8; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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.port; | |
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 i386.vm_types.natural_t; | |
subtype memory_object_fault_info_t is i386.vm_types.natural_t_ptr; | |
subtype vm_object_id_t is unsigned_long_long; | |
subtype memory_object_t is port.mach_port_t; | |
subtype memory_object_t_ptr is port.mach_port_t_ptr; | |
subtype memory_object_control_t is port.mach_port_t; | |
subtype memory_object_array_t is memory_object_t_ptr; | |
subtype memory_object_name_t is port.mach_port_t; | |
subtype memory_object_default_t is port.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 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 i386.boolean.boolean_t; | |
temporary : aliased 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 i386.boolean.boolean_t; | |
invalidate : aliased i386.boolean.boolean_t; | |
silent_overwrite : aliased i386.boolean.boolean_t; | |
advisory_pageout : aliased 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_INNERWBACK : constant := 5; | |
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_FLUSH_ALL : constant := 64; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- 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.mach.i386.boolean; | |
with C.mach.i386.kern_return; | |
with C.mach.i386.vm_types; | |
with C.mach.port; | |
with C.stdint; | |
package C.mach.message is | |
pragma Preelaborate; | |
subtype mach_msg_timeout_t is i386.vm_types.natural_t; | |
subtype mach_msg_bits_t is unsigned_int; | |
subtype mach_msg_size_t is i386.vm_types.natural_t; | |
subtype mach_msg_size_t_ptr is i386.vm_types.natural_t_ptr; | |
function Cast is new Ada.Unchecked_Conversion (signed_long, | |
mach_msg_size_t_ptr); | |
subtype mach_msg_id_t is 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_43dcf904 is record | |
pad1 : aliased 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_43dcf904 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_43dcf904'Alignment use 4; | |
pragma Convention (C_Pass_By_Copy, struct_43dcf904); | |
subtype mach_msg_type_descriptor_t is struct_43dcf904; | |
type struct_a2a17cd6 is record | |
name : aliased port.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_a2a17cd6 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_a2a17cd6'Alignment use 4; | |
pragma Convention (C_Pass_By_Copy, struct_a2a17cd6); | |
subtype mach_msg_port_descriptor_t is struct_a2a17cd6; | |
type struct_e95c89bd is record | |
address : aliased stdint.uint32_t; | |
size : aliased mach_msg_size_t; | |
deallocate : i386.boolean.boolean_t range 0 .. 255; | |
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_e95c89bd 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_e95c89bd'Alignment use 4; | |
pragma Convention (C_Pass_By_Copy, struct_e95c89bd); | |
subtype mach_msg_ool_descriptor32_t is struct_e95c89bd; | |
type struct_5c5bea27 is record | |
address : aliased stdint.uint64_t; | |
deallocate : i386.boolean.boolean_t range 0 .. 255; | |
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_5c5bea27 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_5c5bea27'Alignment use 8; | |
pragma Convention (C_Pass_By_Copy, struct_5c5bea27); | |
subtype mach_msg_ool_descriptor64_t is struct_5c5bea27; | |
type struct_41798f48 is record | |
address : aliased void_ptr; | |
deallocate : i386.boolean.boolean_t range 0 .. 255; | |
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_41798f48 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_41798f48'Alignment use 8; | |
pragma Convention (C_Pass_By_Copy, struct_41798f48); | |
subtype mach_msg_ool_descriptor_t is struct_41798f48; | |
type struct_144d9230 is record | |
address : aliased stdint.uint32_t; | |
count : aliased mach_msg_size_t; | |
deallocate : i386.boolean.boolean_t range 0 .. 255; | |
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_144d9230 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_144d9230'Alignment use 4; | |
pragma Convention (C_Pass_By_Copy, struct_144d9230); | |
subtype mach_msg_ool_ports_descriptor32_t is struct_144d9230; | |
type struct_6ccef7b3 is record | |
address : aliased stdint.uint64_t; | |
deallocate : i386.boolean.boolean_t range 0 .. 255; | |
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_6ccef7b3 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_6ccef7b3'Alignment use 8; | |
pragma Convention (C_Pass_By_Copy, struct_6ccef7b3); | |
subtype mach_msg_ool_ports_descriptor64_t is struct_6ccef7b3; | |
type struct_26271605 is record | |
address : aliased void_ptr; | |
deallocate : i386.boolean.boolean_t range 0 .. 255; | |
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_26271605 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_26271605'Alignment use 8; | |
pragma Convention (C_Pass_By_Copy, struct_26271605); | |
subtype mach_msg_ool_ports_descriptor_t is struct_26271605; | |
type union_cd6dbab5 (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_cd6dbab5); | |
pragma Convention (C_Pass_By_Copy, union_cd6dbab5); | |
type union_cd6dbab5_ptr is access all union_cd6dbab5; | |
for union_cd6dbab5_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (union_cd6dbab5_ptr); | |
pragma Convention (C, union_cd6dbab5_ptr); | |
subtype mach_msg_descriptor_t is union_cd6dbab5; | |
subtype mach_msg_descriptor_t_ptr is union_cd6dbab5_ptr; | |
function Cast is new Ada.Unchecked_Conversion (signed_long, | |
mach_msg_descriptor_t_ptr); | |
type struct_8191fd16 is record | |
msgh_descriptor_count : aliased mach_msg_size_t; | |
end record; | |
for struct_8191fd16'Alignment use 4; | |
pragma Convention (C_Pass_By_Copy, struct_8191fd16); | |
type struct_8191fd16_ptr is access all struct_8191fd16; | |
for struct_8191fd16_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_8191fd16_ptr); | |
pragma Convention (C, struct_8191fd16_ptr); | |
subtype mach_msg_body_t is struct_8191fd16; | |
subtype mach_msg_body_t_ptr is struct_8191fd16_ptr; | |
function Cast is new Ada.Unchecked_Conversion (signed_long, | |
mach_msg_body_t_ptr); | |
type struct_c391f713 is record | |
msgh_bits : aliased mach_msg_bits_t; | |
msgh_size : aliased mach_msg_size_t; | |
msgh_remote_port : aliased port.mach_port_t; | |
msgh_local_port : aliased port.mach_port_t; | |
msgh_reserved : aliased mach_msg_size_t; | |
msgh_id : aliased mach_msg_id_t; | |
end record; | |
for struct_c391f713'Alignment use 4; | |
pragma Convention (C_Pass_By_Copy, struct_c391f713); | |
type struct_c391f713_ptr is access all struct_c391f713; | |
for struct_c391f713_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_c391f713_ptr); | |
pragma Convention (C, struct_c391f713_ptr); | |
subtype mach_msg_header_t is struct_c391f713; | |
subtype mach_msg_header_t_ptr is struct_c391f713_ptr; | |
function Cast is new Ada.Unchecked_Conversion (signed_long, | |
mach_msg_header_t_ptr); | |
type struct_f33cf061 is record | |
header : aliased mach_msg_header_t; | |
F_body : aliased mach_msg_body_t; | |
end record; | |
for struct_f33cf061'Alignment use 4; | |
pragma Convention (C_Pass_By_Copy, struct_f33cf061); | |
subtype mach_msg_base_t is struct_f33cf061; | |
subtype mach_msg_trailer_type_t is unsigned_int; | |
subtype mach_msg_trailer_size_t is unsigned_int; | |
type struct_03762bd3 is record | |
msgh_trailer_type : aliased mach_msg_trailer_type_t; | |
msgh_trailer_size : aliased mach_msg_trailer_size_t; | |
end record; | |
for struct_03762bd3'Alignment use 4; | |
pragma Convention (C_Pass_By_Copy, struct_03762bd3); | |
subtype mach_msg_trailer_t is struct_03762bd3; | |
type struct_d55c4cb9 is record | |
msgh_trailer_type : aliased mach_msg_trailer_type_t; | |
msgh_trailer_size : aliased mach_msg_trailer_size_t; | |
msgh_seqno : aliased port.mach_port_seqno_t; | |
end record; | |
for struct_d55c4cb9'Alignment use 4; | |
pragma Convention (C_Pass_By_Copy, struct_d55c4cb9); | |
subtype mach_msg_seqno_trailer_t is struct_d55c4cb9; | |
type struct_08b9e843 is record | |
val : aliased unsigned_int_array (0 .. 1); | |
end record; | |
for struct_08b9e843'Alignment use 4; | |
pragma Convention (C_Pass_By_Copy, struct_08b9e843); | |
subtype security_token_t is struct_08b9e843; | |
type struct_47295be4 is record | |
msgh_trailer_type : aliased mach_msg_trailer_type_t; | |
msgh_trailer_size : aliased mach_msg_trailer_size_t; | |
msgh_seqno : aliased port.mach_port_seqno_t; | |
msgh_sender : aliased security_token_t; | |
end record; | |
for struct_47295be4'Alignment use 4; | |
pragma Convention (C_Pass_By_Copy, struct_47295be4); | |
subtype mach_msg_security_trailer_t is struct_47295be4; | |
type struct_189a511f is record | |
val : aliased unsigned_int_array (0 .. 7); | |
end record; | |
for struct_189a511f'Alignment use 4; | |
pragma Convention (C_Pass_By_Copy, struct_189a511f); | |
subtype audit_token_t is struct_189a511f; | |
type struct_f9d0f6f7 is record | |
msgh_trailer_type : aliased mach_msg_trailer_type_t; | |
msgh_trailer_size : aliased mach_msg_trailer_size_t; | |
msgh_seqno : aliased port.mach_port_seqno_t; | |
msgh_sender : aliased security_token_t; | |
msgh_audit : aliased audit_token_t; | |
end record; | |
for struct_f9d0f6f7'Alignment use 4; | |
pragma Convention (C_Pass_By_Copy, struct_f9d0f6f7); | |
subtype mach_msg_audit_trailer_t is struct_f9d0f6f7; | |
type struct_469d8990 is record | |
msgh_trailer_type : aliased mach_msg_trailer_type_t; | |
msgh_trailer_size : aliased mach_msg_trailer_size_t; | |
msgh_seqno : aliased port.mach_port_seqno_t; | |
msgh_sender : aliased security_token_t; | |
msgh_audit : aliased audit_token_t; | |
msgh_context : aliased i386.vm_types.mach_port_context_t; | |
end record; | |
for struct_469d8990'Alignment use 8; | |
pragma Convention (C_Pass_By_Copy, struct_469d8990); | |
subtype mach_msg_context_trailer_t is struct_469d8990; | |
type struct_20b27539 is record | |
sender : aliased port.mach_port_name_t; | |
end record; | |
for struct_20b27539'Alignment use 4; | |
pragma Convention (C_Pass_By_Copy, struct_20b27539); | |
subtype msg_labels_t is struct_20b27539; | |
type struct_3181dd55 is record | |
msgh_trailer_type : aliased mach_msg_trailer_type_t; | |
msgh_trailer_size : aliased mach_msg_trailer_size_t; | |
msgh_seqno : aliased port.mach_port_seqno_t; | |
msgh_sender : aliased security_token_t; | |
msgh_audit : aliased audit_token_t; | |
msgh_context : aliased i386.vm_types.mach_port_context_t; | |
msgh_ad : aliased signed_int; | |
msgh_labels : aliased msg_labels_t; | |
end record; | |
for struct_3181dd55'Alignment use 8; | |
pragma Convention (C_Pass_By_Copy, struct_3181dd55); | |
subtype mach_msg_mac_trailer_t is struct_3181dd55; | |
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 i386.vm_types.integer_t; | |
type struct_6aaa81e8 is record | |
header : aliased mach_msg_header_t; | |
end record; | |
for struct_6aaa81e8'Alignment use 4; | |
pragma Convention (C_Pass_By_Copy, struct_6aaa81e8); | |
subtype mach_msg_empty_send_t is struct_6aaa81e8; | |
type struct_8b8d11c1 is record | |
header : aliased mach_msg_header_t; | |
trailer : aliased mach_msg_trailer_t; | |
end record; | |
for struct_8b8d11c1'Alignment use 4; | |
pragma Convention (C_Pass_By_Copy, struct_8b8d11c1); | |
subtype mach_msg_empty_rcv_t is struct_8b8d11c1; | |
type union_495689f3 (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_495689f3); | |
pragma Convention (C_Pass_By_Copy, union_495689f3); | |
subtype mach_msg_empty_t is union_495689f3; | |
subtype mach_msg_type_size_t is i386.vm_types.natural_t; | |
subtype mach_msg_type_number_t is i386.vm_types.natural_t; | |
subtype mach_msg_option_t is i386.vm_types.integer_t; | |
subtype mach_msg_return_t is 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 : port.mach_port_name_t; | |
timeout : mach_msg_timeout_t; notify : 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 : port.mach_port_name_t; | |
timeout : mach_msg_timeout_t; notify : 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; | |
function MACH_MSG_BODY_NULL (Value : signed_long := signed_long'(0)) | |
return mach_msg_body_t_ptr renames Cast; | |
function MACH_MSG_DESCRIPTOR_NULL (Value : signed_long := signed_long'(0)) | |
return mach_msg_descriptor_t_ptr renames Cast; | |
MACH_MSG_IPC_KERNEL : constant := 2048; | |
MACH_MSG_IPC_SPACE : constant := 8192; | |
MACH_MSG_MASK : constant := 15872; | |
function MACH_MSG_NULL (Value : signed_long := signed_long'(0)) | |
return mach_msg_header_t_ptr renames Cast; | |
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_U : constant := 3; | |
MACH_MSG_PHYSICAL_COPY : constant := 0; | |
MACH_MSG_PORT_DESCRIPTOR : constant := 0; | |
MACH_MSG_SIZE_MAX : constant := 4294967295; | |
function MACH_MSG_SIZE_NULL (Value : signed_long := signed_long'(0)) | |
return mach_msg_size_t_ptr renames Cast; | |
MACH_MSG_SIZE_RELIABLE : constant := 262144; | |
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 := 7; | |
MACH_RCV_TRAILER_CTX : constant := 4; | |
-- MACH_RCV_TRAILER_ELEMENTS (function macro) | |
MACH_RCV_TRAILER_LABELS : constant := 8; | |
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_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_NOTIFY : constant := 128; | |
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 := 72; | |
-- REQUESTED_TRAILER_SIZE (function macro) | |
-- REQUESTED_TRAILER_SIZE_NATIVE (function macro) | |
-- _MACH_MESSAGE_H_ (empty) | |
subtype mach_msg_kind_t is 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 i386.vm_types.integer_t_ptr; | |
subtype policy_base_t is i386.vm_types.integer_t_ptr; | |
subtype policy_limit_t is i386.vm_types.integer_t_ptr; | |
type struct_policy_timeshare_base; | |
type struct_policy_timeshare_base is record | |
base_priority : aliased 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 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 i386.vm_types.integer_t; | |
base_priority : aliased i386.vm_types.integer_t; | |
cur_priority : aliased i386.vm_types.integer_t; | |
depressed : aliased i386.boolean.boolean_t; | |
depress_priority : aliased 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 i386.vm_types.integer_t; | |
quantum : aliased 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 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 i386.vm_types.integer_t; | |
base_priority : aliased i386.vm_types.integer_t; | |
quantum : aliased i386.vm_types.integer_t; | |
depressed : aliased i386.boolean.boolean_t; | |
depress_priority : aliased 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 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 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 i386.vm_types.integer_t; | |
base_priority : aliased i386.vm_types.integer_t; | |
depressed : aliased i386.boolean.boolean_t; | |
depress_priority : aliased 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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.port is | |
pragma Preelaborate; | |
subtype mach_port_name_t is i386.vm_types.natural_t; | |
subtype mach_port_name_t_ptr is i386.vm_types.natural_t_ptr; | |
subtype mach_port_name_array_t is mach_port_name_t_ptr; | |
subtype mach_port_t is mach_port_name_t; | |
subtype mach_port_t_ptr is mach_port_name_t_ptr; | |
subtype mach_port_array_t is mach_port_t_ptr; | |
subtype mach_port_right_t is i386.vm_types.natural_t; | |
subtype mach_port_type_t is i386.vm_types.natural_t; | |
subtype mach_port_type_t_ptr is i386.vm_types.natural_t_ptr; | |
subtype mach_port_type_array_t is mach_port_type_t_ptr; | |
subtype mach_port_urefs_t is i386.vm_types.natural_t; | |
subtype mach_port_delta_t is i386.vm_types.integer_t; | |
subtype mach_port_seqno_t is i386.vm_types.natural_t; | |
subtype mach_port_mscount_t is i386.vm_types.natural_t; | |
subtype mach_port_msgcount_t is i386.vm_types.natural_t; | |
subtype mach_port_rights_t is 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 i386.boolean.boolean_t; | |
mps_pdrequest : aliased i386.boolean.boolean_t; | |
mps_nsrequest : aliased i386.boolean.boolean_t; | |
mps_flags : aliased 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 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 : i386.boolean.boolean_t range 0 .. 1073741823; | |
len : aliased 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_KERNEL : constant := 65536; | |
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_TYPE_SPREQUEST : constant := 1073741824; | |
MACH_PORT_TYPE_SPREQUEST_DELAYED : constant := 536870912; | |
-- MACH_PORT_VALID (function macro) | |
-- _MACH_PORT_H_ (empty) | |
-- _MACH_PORT_T (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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 i386.vm_types.integer_t_ptr; | |
subtype processor_info_array_t is i386.vm_types.integer_t_ptr; | |
subtype processor_info_data_t is | |
i386.vm_types.integer_t_array (0 .. 1023); | |
subtype processor_set_info_t is i386.vm_types.integer_t_ptr; | |
subtype processor_set_info_data_t is | |
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 machine.cpu_type_t; | |
cpu_subtype : aliased machine.cpu_subtype_t; | |
running : aliased i386.boolean.boolean_t; | |
slot_num : aliased signed_int; | |
is_master : aliased 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 i386.vm_types.integer_t; | |
mach_factor : aliased 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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.mach.vm_statistics; | |
with C.stdint; | |
package C.mach.task_info is | |
pragma Preelaborate; | |
subtype task_flavor_t is i386.vm_types.natural_t; | |
subtype task_info_t is i386.vm_types.integer_t_ptr; | |
subtype task_info_data_t is 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 i386.vm_types.integer_t; | |
virtual_size : aliased i386.vm_types.natural_t; | |
resident_size : aliased i386.vm_types.natural_t; | |
user_time : aliased time_value.time_value_t; | |
system_time : aliased 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 i386.vm_types.integer_t; | |
virtual_size : aliased i386.vm_types.mach_vm_size_t; | |
resident_size : aliased i386.vm_types.mach_vm_size_t; | |
user_time : aliased time_value.time_value_t; | |
system_time : aliased 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 i386.vm_types.integer_t; | |
virtual_size : aliased i386.vm_types.vm_size_t; | |
resident_size : aliased i386.vm_types.vm_size_t; | |
user_time : aliased time_value.time_value_t; | |
system_time : aliased time_value.time_value_t; | |
policy : aliased mach.policy.policy_t; | |
end record; | |
for struct_task_basic_info'Alignment use 8; | |
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 i386.vm_types.integer_t; | |
pageins : aliased i386.vm_types.integer_t; | |
cow_faults : aliased i386.vm_types.integer_t; | |
messages_sent : aliased i386.vm_types.integer_t; | |
messages_received : aliased i386.vm_types.integer_t; | |
syscalls_mach : aliased i386.vm_types.integer_t; | |
syscalls_unix : aliased i386.vm_types.integer_t; | |
csw : aliased 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 time_value.time_value_t; | |
system_time : aliased 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_kernelmemory_info; | |
type struct_task_kernelmemory_info is record | |
total_palloc : aliased stdint.uint64_t; | |
total_pfree : aliased stdint.uint64_t; | |
total_salloc : aliased stdint.uint64_t; | |
total_sfree : aliased stdint.uint64_t; | |
end record; | |
for struct_task_kernelmemory_info'Alignment use 8; | |
pragma Convention (C_Pass_By_Copy, struct_task_kernelmemory_info); | |
type struct_task_kernelmemory_info_ptr is | |
access all struct_task_kernelmemory_info; | |
for struct_task_kernelmemory_info_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_task_kernelmemory_info_ptr); | |
pragma Convention (C, struct_task_kernelmemory_info_ptr); | |
subtype task_kernelmemory_info_data_t is struct_task_kernelmemory_info; | |
subtype task_kernelmemory_info_t is struct_task_kernelmemory_info_ptr; | |
type struct_task_affinity_tag_info; | |
type struct_task_affinity_tag_info is record | |
set_count : aliased i386.vm_types.integer_t; | |
min : aliased i386.vm_types.integer_t; | |
max : aliased i386.vm_types.integer_t; | |
task_count : aliased 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; | |
type struct_task_dyld_info; | |
type struct_task_dyld_info is record | |
all_image_info_addr : aliased i386.vm_types.mach_vm_address_t; | |
all_image_info_size : aliased i386.vm_types.mach_vm_size_t; | |
all_image_info_format : aliased i386.vm_types.integer_t; | |
end record; | |
for struct_task_dyld_info'Alignment use 8; | |
pragma Convention (C_Pass_By_Copy, struct_task_dyld_info); | |
type struct_task_dyld_info_ptr is access all struct_task_dyld_info; | |
for struct_task_dyld_info_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_task_dyld_info_ptr); | |
pragma Convention (C, struct_task_dyld_info_ptr); | |
subtype task_dyld_info_data_t is struct_task_dyld_info; | |
subtype task_dyld_info_t is struct_task_dyld_info_ptr; | |
type struct_task_extmod_info; | |
type struct_task_extmod_info is record | |
task_uuid : aliased unsigned_char_array (0 .. 15); | |
extmod_statistics : aliased vm_statistics.vm_extmod_statistics_data_t; | |
end record; | |
for struct_task_extmod_info'Alignment use 8; | |
pragma Convention (C_Pass_By_Copy, struct_task_extmod_info); | |
type struct_task_extmod_info_ptr is access all struct_task_extmod_info; | |
for struct_task_extmod_info_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_task_extmod_info_ptr); | |
pragma Convention (C, struct_task_extmod_info_ptr); | |
subtype task_extmod_info_data_t is struct_task_extmod_info; | |
subtype task_extmod_info_t is struct_task_extmod_info_ptr; | |
type struct_mach_task_basic_info; | |
type struct_mach_task_basic_info is record | |
virtual_size : aliased i386.vm_types.mach_vm_size_t; | |
resident_size : aliased i386.vm_types.mach_vm_size_t; | |
resident_size_max : aliased i386.vm_types.mach_vm_size_t; | |
user_time : aliased time_value.time_value_t; | |
system_time : aliased time_value.time_value_t; | |
policy : aliased mach.policy.policy_t; | |
suspend_count : aliased i386.vm_types.integer_t; | |
end record; | |
for struct_mach_task_basic_info'Alignment use 8; | |
pragma Convention (C_Pass_By_Copy, struct_mach_task_basic_info); | |
type struct_mach_task_basic_info_ptr is | |
access all struct_mach_task_basic_info; | |
for struct_mach_task_basic_info_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_mach_task_basic_info_ptr); | |
pragma Convention (C, struct_mach_task_basic_info_ptr); | |
subtype mach_task_basic_info_data_t is struct_mach_task_basic_info; | |
subtype mach_task_basic_info_t is struct_mach_task_basic_info_ptr; | |
MACH_TASK_BASIC_INFO : constant := 20; | |
MACH_TASK_BASIC_INFO_COUNT : constant := 12; | |
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 := 5; | |
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 := 12; | |
TASK_DYLD_ALL_IMAGE_INFO_32 : constant := 0; | |
TASK_DYLD_ALL_IMAGE_INFO_64 : constant := 1; | |
TASK_DYLD_INFO : constant := 17; | |
TASK_DYLD_INFO_COUNT : constant := 6; | |
TASK_EVENTS_INFO : constant := 2; | |
TASK_EVENTS_INFO_COUNT : constant := 8; | |
TASK_EXTMOD_INFO : constant := 19; | |
TASK_EXTMOD_INFO_COUNT : constant := 16; | |
TASK_INFO_MAX : constant := 1024; | |
TASK_KERNELMEMORY_INFO : constant := 7; | |
TASK_KERNELMEMORY_INFO_COUNT : constant := 8; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 i386.vm_types.natural_t; | |
subtype task_policy_t is 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, | |
TASK_THROTTLE_APPLICATION, TASK_NONUI_APPLICATION, | |
TASK_DEFAULT_APPLICATION); | |
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, | |
TASK_THROTTLE_APPLICATION => 5, TASK_NONUI_APPLICATION => 6, | |
TASK_DEFAULT_APPLICATION => 7); | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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_BOOTSTRAP_PORT : constant := 4; | |
TASK_HOST_PORT : constant := 2; | |
TASK_KERNEL_PORT : constant := 1; | |
TASK_NAME_PORT : constant := 3; | |
TASK_SEATBELT_PORT : constant := 7; | |
-- _MACH_TASK_SPECIAL_PORTS_H_ (empty) | |
-- task_get_bootstrap_port (unparsible) | |
-- task_get_host_port (unparsible) | |
-- task_get_kernel_port (unparsible) | |
-- task_get_task_access_port (unparsible) | |
-- task_set_bootstrap_port (unparsible) | |
-- task_set_host_port (unparsible) | |
-- task_set_kernel_port (unparsible) | |
-- task_set_task_access_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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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.thread_info is | |
pragma Preelaborate; | |
subtype thread_flavor_t is i386.vm_types.natural_t; | |
subtype thread_info_t is i386.vm_types.integer_t_ptr; | |
subtype thread_info_data_t is i386.vm_types.integer_t_array (0 .. 1023); | |
type struct_thread_basic_info; | |
type struct_thread_basic_info is record | |
user_time : aliased time_value.time_value_t; | |
system_time : aliased time_value.time_value_t; | |
cpu_usage : aliased i386.vm_types.integer_t; | |
policy : aliased mach.policy.policy_t; | |
run_state : aliased i386.vm_types.integer_t; | |
flags : aliased i386.vm_types.integer_t; | |
suspend_count : aliased i386.vm_types.integer_t; | |
sleep_time : aliased 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; | |
type struct_thread_identifier_info; | |
type struct_thread_identifier_info is record | |
thread_id : aliased stdint.uint64_t; | |
thread_handle : aliased stdint.uint64_t; | |
dispatch_qaddr : aliased stdint.uint64_t; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_thread_identifier_info); | |
type struct_thread_identifier_info_ptr is | |
access all struct_thread_identifier_info; | |
for struct_thread_identifier_info_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_thread_identifier_info_ptr); | |
pragma Convention (C, struct_thread_identifier_info_ptr); | |
subtype thread_identifier_info_data_t is struct_thread_identifier_info; | |
subtype thread_identifier_info_t is struct_thread_identifier_info_ptr; | |
THREAD_BASIC_INFO : constant := 3; | |
THREAD_BASIC_INFO_COUNT : constant := 10; | |
THREAD_IDENTIFIER_INFO : constant := 4; | |
THREAD_IDENTIFIER_INFO_COUNT : constant := 6; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 i386.vm_types.natural_t; | |
subtype thread_policy_t is i386.vm_types.integer_t_ptr; | |
type struct_thread_standard_policy; | |
type struct_thread_standard_policy is record | |
no_data : aliased 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 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 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 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 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; | |
type struct_thread_background_policy; | |
type struct_thread_background_policy is record | |
priority : aliased i386.vm_types.integer_t; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_thread_background_policy); | |
type struct_thread_background_policy_ptr is | |
access all struct_thread_background_policy; | |
for struct_thread_background_policy_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_thread_background_policy_ptr); | |
pragma Convention (C, struct_thread_background_policy_ptr); | |
subtype thread_background_policy_data_t is | |
struct_thread_background_policy; | |
subtype thread_background_policy_t is struct_thread_background_policy_ptr; | |
THREAD_AFFINITY_POLICY : constant := 4; | |
THREAD_AFFINITY_POLICY_COUNT : constant := 1; | |
THREAD_AFFINITY_TAG_NULL : constant := 0; | |
THREAD_BACKGROUND_POLICY : constant := 5; | |
THREAD_BACKGROUND_POLICY_COUNT : constant := 1; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 i386.vm_types.natural_t_ptr; | |
subtype thread_state_data_t is i386.vm_types.natural_t_array (0 .. 223); | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 i386.vm_types.integer_t; | |
microseconds : aliased 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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_CAN_REUSE : constant := 10; | |
VM_BEHAVIOR_DEFAULT : constant := 0; | |
VM_BEHAVIOR_DONTNEED : constant := 5; | |
VM_BEHAVIOR_FREE : constant := 6; | |
VM_BEHAVIOR_RANDOM : constant := 1; | |
VM_BEHAVIOR_REUSABLE : constant := 8; | |
VM_BEHAVIOR_REUSE : constant := 9; | |
VM_BEHAVIOR_RSEQNTL : constant := 3; | |
VM_BEHAVIOR_SEQUENTIAL : constant := 2; | |
VM_BEHAVIOR_WILLNEED : constant := 4; | |
VM_BEHAVIOR_ZERO_WIRED_PAGES : constant := 7; | |
-- _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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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_IS_MASK : constant := 64; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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_ALL_MASKS : constant := 14195; | |
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_DEBUG_EMPTY : constant := 4096; | |
VM_PURGABLE_DEBUG_FAULT : constant := 8192; | |
VM_PURGABLE_DEBUG_MASK : constant := 12288; | |
VM_PURGABLE_DEBUG_SHIFT : constant := 12; | |
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_PURGE_ALL : constant := 2; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 vm32_object_id_t is stdint.uint32_t; | |
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 vm_prot.vm_prot_t; | |
max_protection : aliased vm_prot.vm_prot_t; | |
inheritance : aliased vm_inherit.vm_inherit_t; | |
shared : aliased i386.boolean.boolean_t; | |
reserved : aliased i386.boolean.boolean_t; | |
offset : aliased memory_object_types.memory_object_offset_t; | |
behavior : aliased 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 vm_prot.vm_prot_t; | |
max_protection : aliased vm_prot.vm_prot_t; | |
inheritance : aliased vm_inherit.vm_inherit_t; | |
shared : aliased i386.boolean.boolean_t; | |
reserved : aliased i386.boolean.boolean_t; | |
offset : aliased stdint.uint32_t; | |
behavior : aliased 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 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 vm_prot.vm_prot_t; | |
max_protection : aliased vm_prot.vm_prot_t; | |
inheritance : aliased 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 i386.boolean.boolean_t; | |
behavior : aliased vm_behavior.vm_behavior_t; | |
object_id : aliased vm32_object_id_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 vm_prot.vm_prot_t; | |
max_protection : aliased vm_prot.vm_prot_t; | |
inheritance : aliased vm_inherit.vm_inherit_t; | |
offset : aliased 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 i386.boolean.boolean_t; | |
behavior : aliased vm_behavior.vm_behavior_t; | |
object_id : aliased vm32_object_id_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 vm_prot.vm_prot_t; | |
max_protection : aliased vm_prot.vm_prot_t; | |
inheritance : aliased vm_inherit.vm_inherit_t; | |
offset : aliased 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 i386.boolean.boolean_t; | |
behavior : aliased vm_behavior.vm_behavior_t; | |
object_id : aliased vm32_object_id_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 i386.vm_types.mach_vm_address_t; | |
size : aliased 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 vm_types.vm_address_t; | |
size : aliased i386.vm_types.vm_size_t; | |
end record; | |
for struct_vm_read_entry'Alignment use 8; | |
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); | |
subtype vm_page_info_t is signed_int_ptr; | |
subtype vm_page_info_data_t is signed_int_array; | |
subtype vm_page_info_flavor_t is signed_int; | |
type struct_vm_page_info_basic; | |
type struct_vm_page_info_basic is record | |
disposition : aliased signed_int; | |
ref_count : aliased signed_int; | |
object_id : aliased memory_object_types.vm_object_id_t; | |
offset : aliased memory_object_types.memory_object_offset_t; | |
depth : aliased signed_int; | |
pad : aliased signed_int; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_vm_page_info_basic); | |
type struct_vm_page_info_basic_ptr is | |
access all struct_vm_page_info_basic; | |
for struct_vm_page_info_basic_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_vm_page_info_basic_ptr); | |
pragma Convention (C, struct_vm_page_info_basic_ptr); | |
subtype vm_page_info_basic_t is struct_vm_page_info_basic_ptr; | |
subtype vm_page_info_basic_data_t is struct_vm_page_info_basic; | |
SM_COW : constant := 1; | |
SM_EMPTY : constant := 3; | |
SM_LARGE_PAGE : constant := 8; | |
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_PAGE_INFO_BASIC : constant := 1; | |
VM_PAGE_INFO_BASIC_COUNT : constant := 8; | |
-- VM_PAGE_INFO_MAX (empty) | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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.stdint; | |
package C.mach.vm_statistics is | |
pragma Preelaborate; | |
type struct_vm_statistics; | |
type struct_vm_statistics is record | |
free_count : aliased i386.vm_types.natural_t; | |
active_count : aliased i386.vm_types.natural_t; | |
inactive_count : aliased i386.vm_types.natural_t; | |
wire_count : aliased i386.vm_types.natural_t; | |
zero_fill_count : aliased i386.vm_types.natural_t; | |
reactivations : aliased i386.vm_types.natural_t; | |
pageins : aliased i386.vm_types.natural_t; | |
pageouts : aliased i386.vm_types.natural_t; | |
faults : aliased i386.vm_types.natural_t; | |
cow_faults : aliased i386.vm_types.natural_t; | |
lookups : aliased i386.vm_types.natural_t; | |
hits : aliased i386.vm_types.natural_t; | |
purgeable_count : aliased i386.vm_types.natural_t; | |
purges : aliased i386.vm_types.natural_t; | |
speculative_count : aliased 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; | |
type struct_vm_statistics64; | |
type struct_vm_statistics64 is record | |
free_count : aliased i386.vm_types.natural_t; | |
active_count : aliased i386.vm_types.natural_t; | |
inactive_count : aliased i386.vm_types.natural_t; | |
wire_count : aliased i386.vm_types.natural_t; | |
zero_fill_count : aliased stdint.uint64_t; | |
reactivations : aliased stdint.uint64_t; | |
pageins : aliased stdint.uint64_t; | |
pageouts : aliased stdint.uint64_t; | |
faults : aliased stdint.uint64_t; | |
cow_faults : aliased stdint.uint64_t; | |
lookups : aliased stdint.uint64_t; | |
hits : aliased stdint.uint64_t; | |
purges : aliased stdint.uint64_t; | |
purgeable_count : aliased i386.vm_types.natural_t; | |
speculative_count : aliased i386.vm_types.natural_t; | |
end record; | |
for struct_vm_statistics64'Alignment use 8; | |
pragma Convention (C_Pass_By_Copy, struct_vm_statistics64); | |
type struct_vm_statistics64_ptr is access all struct_vm_statistics64; | |
for struct_vm_statistics64_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_vm_statistics64_ptr); | |
pragma Convention (C, struct_vm_statistics64_ptr); | |
subtype vm_statistics64_t is struct_vm_statistics64_ptr; | |
subtype vm_statistics64_data_t is struct_vm_statistics64; | |
type struct_vm_extmod_statistics; | |
type struct_vm_extmod_statistics is record | |
task_for_pid_count : aliased stdint.int64_t; | |
task_for_pid_caller_count : aliased stdint.int64_t; | |
thread_creation_count : aliased stdint.int64_t; | |
thread_creation_caller_count : aliased stdint.int64_t; | |
thread_set_state_count : aliased stdint.int64_t; | |
thread_set_state_caller_count : aliased stdint.int64_t; | |
end record; | |
for struct_vm_extmod_statistics'Alignment use 8; | |
pragma Convention (C_Pass_By_Copy, struct_vm_extmod_statistics); | |
type struct_vm_extmod_statistics_ptr is | |
access all struct_vm_extmod_statistics; | |
for struct_vm_extmod_statistics_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_vm_extmod_statistics_ptr); | |
pragma Convention (C, struct_vm_extmod_statistics_ptr); | |
subtype vm_extmod_statistics_t is struct_vm_extmod_statistics_ptr; | |
subtype vm_extmod_statistics_data_t is struct_vm_extmod_statistics; | |
SUPERPAGE_NONE : constant := 0; | |
SUPERPAGE_SIZE_2MB : constant := 2; | |
SUPERPAGE_SIZE_ANY : constant := 1; | |
VM_FLAGS_ALIAS_MASK : constant := -16777216; | |
VM_FLAGS_ANYWHERE : constant := 1; | |
VM_FLAGS_FIXED : constant := 0; | |
VM_FLAGS_NO_CACHE : constant := 16; | |
VM_FLAGS_OVERWRITE : constant := 16384; | |
VM_FLAGS_PURGABLE : constant := 2; | |
VM_FLAGS_SUPERPAGE_MASK : constant := 458752; | |
VM_FLAGS_SUPERPAGE_NONE : constant := 0; | |
VM_FLAGS_SUPERPAGE_SHIFT : constant := 16; | |
VM_FLAGS_SUPERPAGE_SIZE_2MB : constant := 131072; | |
VM_FLAGS_SUPERPAGE_SIZE_ANY : constant := 65536; | |
VM_FLAGS_USER_ALLOCATE : constant := -16302061; | |
VM_FLAGS_USER_MAP : constant := -16302061; | |
VM_FLAGS_USER_REMAP : constant := 16385; | |
-- 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_ASSETSD : constant := 72; | |
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_COREIMAGE : constant := 68; | |
VM_MEMORY_COREPROFILE : constant := 71; | |
VM_MEMORY_CORESERVICES : constant := 43; | |
VM_MEMORY_DYLD : constant := 60; | |
VM_MEMORY_DYLD_MALLOC : constant := 61; | |
VM_MEMORY_DYLIB : constant := 33; | |
VM_MEMORY_FOUNDATION : constant := 41; | |
VM_MEMORY_GLSL : constant := 66; | |
VM_MEMORY_GUARD : constant := 31; | |
VM_MEMORY_IMAGEIO : constant := 70; | |
VM_MEMORY_IOKIT : constant := 21; | |
VM_MEMORY_JAVA : constant := 44; | |
VM_MEMORY_JAVASCRIPT_CORE : constant := 63; | |
VM_MEMORY_JAVASCRIPT_JIT_EXECUTABLE_ALLOCATOR : constant := 64; | |
VM_MEMORY_JAVASCRIPT_JIT_REGISTER_FILE : constant := 65; | |
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_LARGE_REUSABLE : constant := 8; | |
VM_MEMORY_MALLOC_LARGE_REUSED : constant := 9; | |
VM_MEMORY_MALLOC_SMALL : constant := 2; | |
VM_MEMORY_MALLOC_TINY : constant := 7; | |
VM_MEMORY_OBJC_DISPATCHERS : constant := 34; | |
VM_MEMORY_OPENCL : constant := 67; | |
VM_MEMORY_REALLOC : constant := 6; | |
VM_MEMORY_SBRK : constant := 5; | |
VM_MEMORY_SHARED_PMAP : constant := 32; | |
VM_MEMORY_SQLITE : constant := 62; | |
VM_MEMORY_STACK : constant := 30; | |
VM_MEMORY_TCMALLOC : constant := 53; | |
VM_MEMORY_UNSHARED_PMAP : constant := 35; | |
VM_MEMORY_WEBCORE_PURGEABLE_BUFFERS : constant := 69; | |
VM_PAGE_QUERY_PAGE_COPIED : constant := 32; | |
VM_PAGE_QUERY_PAGE_CS_TAINTED : constant := 512; | |
VM_PAGE_QUERY_PAGE_CS_VALIDATED : constant := 256; | |
VM_PAGE_QUERY_PAGE_DIRTY : constant := 8; | |
VM_PAGE_QUERY_PAGE_EXTERNAL : constant := 128; | |
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) | |
-- VM_STATISTICS_TRUNCATE_TO_32_BIT (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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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_REUSABLEPAGES : constant := 64; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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.port; | |
with C.stdint; | |
package C.mach.vm_types is | |
pragma Preelaborate; | |
subtype pointer_t is i386.vm_types.vm_offset_t; | |
subtype vm_address_t is i386.vm_types.vm_offset_t; | |
subtype vm_address_t_ptr is i386.vm_types.vm_offset_t_ptr; | |
subtype vm_address_t_ptr_ptr is 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 port.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 port.mach_port_t; | |
subtype vm_named_entry_t is port.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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 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_3ffdfd06 is access procedure ( | |
mh : access constant loader.struct_mach_header; | |
vmaddr_slide : stdint.intptr_t); | |
pragma Convention (C, access_3ffdfd06); | |
procedure dyld_register_func_for_add_image (func : access_3ffdfd06); | |
pragma Import (C, dyld_register_func_for_add_image, | |
"_dyld_register_func_for_add_image"); | |
type access_8155bba6 is access procedure ( | |
mh : access constant loader.struct_mach_header; | |
vmaddr_slide : stdint.intptr_t); | |
pragma Convention (C, access_8155bba6); | |
procedure dyld_register_func_for_remove_image (func : access_8155bba6); | |
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_465a8071 is access procedure (lowpc : access char; | |
highpc : access char); | |
pragma Convention (C, access_465a8071); | |
procedure dyld_moninit (monaddition : access_465a8071); | |
pragma Import (C, dyld_moninit, "_dyld_moninit"); | |
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_37c3b333 is (NSObjectFileImageFailure, NSObjectFileImageSuccess, | |
NSObjectFileImageInappropriateFile, NSObjectFileImageArch, | |
NSObjectFileImageFormat, NSObjectFileImageAccess); | |
for enum_37c3b333 use (NSObjectFileImageFailure => 0, | |
NSObjectFileImageSuccess => 1, NSObjectFileImageInappropriateFile => 2, | |
NSObjectFileImageArch => 3, NSObjectFileImageFormat => 4, | |
NSObjectFileImageAccess => 5); | |
pragma Convention (C, enum_37c3b333); | |
subtype NSObjectFileImageReturnCode is enum_37c3b333; | |
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 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 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_cf3ef332 is (NSLinkEditFileAccessError, | |
NSLinkEditFileFormatError, NSLinkEditMachResourceError, | |
NSLinkEditUnixResourceError, NSLinkEditOtherError, | |
NSLinkEditWarningError, NSLinkEditMultiplyDefinedError, | |
NSLinkEditUndefinedError); | |
for enum_cf3ef332 use (NSLinkEditFileAccessError => 0, | |
NSLinkEditFileFormatError => 1, NSLinkEditMachResourceError => 2, | |
NSLinkEditUnixResourceError => 3, NSLinkEditOtherError => 4, | |
NSLinkEditWarningError => 5, NSLinkEditMultiplyDefinedError => 6, | |
NSLinkEditUndefinedError => 7); | |
pragma Convention (C, enum_cf3ef332); | |
type enum_cf3ef332_ptr is access all enum_cf3ef332; | |
for enum_cf3ef332_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (enum_cf3ef332_ptr); | |
pragma Convention (C, enum_cf3ef332_ptr); | |
subtype NSLinkEditErrors is enum_cf3ef332; | |
subtype NSLinkEditErrors_ptr is enum_cf3ef332_ptr; | |
type enum_c216ad85 is (NSOtherErrorRelocation, NSOtherErrorLazyBind, | |
NSOtherErrorIndrLoop, NSOtherErrorLazyInit, NSOtherErrorInvalidArgs); | |
for enum_c216ad85 use (NSOtherErrorRelocation => 0, | |
NSOtherErrorLazyBind => 1, NSOtherErrorIndrLoop => 2, | |
NSOtherErrorLazyInit => 3, NSOtherErrorInvalidArgs => 4); | |
pragma Convention (C, enum_c216ad85); | |
subtype NSOtherErrorNumbers is enum_c216ad85; | |
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_026b1dca is access procedure ( | |
symbolName : access constant char); | |
pragma Convention (C, access_026b1dca); | |
type access_ef5b26c0 is access function (s : access struct_NSSymbol; | |
oldModule : access struct_NSModule; newModule : access struct_NSModule) | |
return NSModule; | |
pragma Convention (C, access_ef5b26c0); | |
type access_a22f1574 is access procedure (errorClass : NSLinkEditErrors; | |
errorNumber : signed_int; fileName : access constant char; | |
errorString : access constant char); | |
pragma Convention (C, access_a22f1574); | |
type struct_9cc83410 is record | |
undefined : aliased access_026b1dca; | |
multiple : aliased access_ef5b26c0; | |
linkEdit : aliased access_a22f1574; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_9cc83410); | |
type struct_9cc83410_const_ptr is access constant struct_9cc83410; | |
for struct_9cc83410_const_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_9cc83410_const_ptr); | |
pragma Convention (C, struct_9cc83410_const_ptr); | |
subtype NSLinkEditErrorHandlers is struct_9cc83410; | |
subtype NSLinkEditErrorHandlers_const_ptr is struct_9cc83410_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 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 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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_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_mach_header_64_ptr is access all struct_mach_header_64; | |
for struct_mach_header_64_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_mach_header_64_ptr); | |
pragma Convention (C, struct_mach_header_64_ptr); | |
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 others => | |
offset : stdint.uint32_t; | |
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_version_min_command; | |
type struct_version_min_command is record | |
cmd : aliased stdint.uint32_t; | |
cmdsize : aliased stdint.uint32_t; | |
version : aliased stdint.uint32_t; | |
sdk : aliased stdint.uint32_t; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_version_min_command); | |
type struct_dyld_info_command; | |
type struct_dyld_info_command is record | |
cmd : aliased stdint.uint32_t; | |
cmdsize : aliased stdint.uint32_t; | |
rebase_off : aliased stdint.uint32_t; | |
rebase_size : aliased stdint.uint32_t; | |
bind_off : aliased stdint.uint32_t; | |
bind_size : aliased stdint.uint32_t; | |
weak_bind_off : aliased stdint.uint32_t; | |
weak_bind_size : aliased stdint.uint32_t; | |
lazy_bind_off : aliased stdint.uint32_t; | |
lazy_bind_size : aliased stdint.uint32_t; | |
export_off : aliased stdint.uint32_t; | |
export_size : aliased stdint.uint32_t; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_dyld_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); | |
type struct_entry_point_command; | |
type struct_entry_point_command is record | |
cmd : aliased stdint.uint32_t; | |
cmdsize : aliased stdint.uint32_t; | |
entryoff : aliased stdint.uint64_t; | |
stacksize : aliased stdint.uint64_t; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_entry_point_command); | |
type struct_source_version_command; | |
type struct_source_version_command is record | |
cmd : aliased stdint.uint32_t; | |
cmdsize : aliased stdint.uint32_t; | |
version : aliased stdint.uint64_t; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_source_version_command); | |
type struct_data_in_code_entry; | |
type struct_data_in_code_entry is record | |
offset : aliased stdint.uint32_t; | |
length : aliased stdint.uint16_t; | |
kind : aliased stdint.uint16_t; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_data_in_code_entry); | |
type struct_tlv_descriptor; | |
type struct_tlv_descriptor_ptr is access all struct_tlv_descriptor; | |
for struct_tlv_descriptor_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_tlv_descriptor_ptr); | |
pragma Convention (C, struct_tlv_descriptor_ptr); | |
type access_85c9b8a5 is access function ( | |
a1 : access struct_tlv_descriptor) return void_ptr; | |
pragma Convention (C, access_85c9b8a5); | |
type struct_tlv_descriptor is record | |
thunk : aliased access_85c9b8a5; | |
key : aliased unsigned_long; | |
offset : aliased unsigned_long; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_tlv_descriptor); | |
BIND_IMMEDIATE_MASK : constant := 15; | |
BIND_OPCODE_ADD_ADDR_ULEB : constant := 128; | |
BIND_OPCODE_DONE : constant := 0; | |
BIND_OPCODE_DO_BIND : constant := 144; | |
BIND_OPCODE_DO_BIND_ADD_ADDR_IMM_SCALED : constant := 176; | |
BIND_OPCODE_DO_BIND_ADD_ADDR_ULEB : constant := 160; | |
BIND_OPCODE_DO_BIND_ULEB_TIMES_SKIPPING_ULEB : constant := 192; | |
BIND_OPCODE_MASK : constant := 240; | |
BIND_OPCODE_SET_ADDEND_SLEB : constant := 96; | |
BIND_OPCODE_SET_DYLIB_ORDINAL_IMM : constant := 16; | |
BIND_OPCODE_SET_DYLIB_ORDINAL_ULEB : constant := 32; | |
BIND_OPCODE_SET_DYLIB_SPECIAL_IMM : constant := 48; | |
BIND_OPCODE_SET_SEGMENT_AND_OFFSET_ULEB : constant := 112; | |
BIND_OPCODE_SET_SYMBOL_TRAILING_FLAGS_IMM : constant := 64; | |
BIND_OPCODE_SET_TYPE_IMM : constant := 80; | |
BIND_SPECIAL_DYLIB_FLAT_LOOKUP : constant := -2; | |
BIND_SPECIAL_DYLIB_MAIN_EXECUTABLE : constant := -1; | |
BIND_SPECIAL_DYLIB_SELF : constant := 0; | |
BIND_SYMBOL_FLAGS_NON_WEAK_DEFINITION : constant := 8; | |
BIND_SYMBOL_FLAGS_WEAK_IMPORT : constant := 1; | |
BIND_TYPE_POINTER : constant := 1; | |
BIND_TYPE_TEXT_ABSOLUTE32 : constant := 2; | |
BIND_TYPE_TEXT_PCREL32 : constant := 3; | |
DICE_KIND_ABS_JUMP_TABLE32 : constant := 5; | |
DICE_KIND_DATA : constant := 1; | |
DICE_KIND_JUMP_TABLE16 : constant := 3; | |
DICE_KIND_JUMP_TABLE32 : constant := 4; | |
DICE_KIND_JUMP_TABLE8 : constant := 2; | |
EXPORT_SYMBOL_FLAGS_KIND_MASK : constant := 3; | |
EXPORT_SYMBOL_FLAGS_KIND_REGULAR : constant := 0; | |
EXPORT_SYMBOL_FLAGS_KIND_THREAD_LOCAL : constant := 1; | |
EXPORT_SYMBOL_FLAGS_REEXPORT : constant := 8; | |
EXPORT_SYMBOL_FLAGS_STUB_AND_RESOLVER : constant := 16; | |
EXPORT_SYMBOL_FLAGS_WEAK_DEFINITION : constant := 4; | |
INDIRECT_SYMBOL_ABS : constant := 1073741824; | |
INDIRECT_SYMBOL_LOCAL : constant := -2147483648; | |
LC_CODE_SIGNATURE : constant := 29; | |
LC_DATA_IN_CODE : constant := 41; | |
LC_DYLD_ENVIRONMENT : constant := 39; | |
LC_DYLD_INFO : constant := 34; | |
LC_DYLD_INFO_ONLY : constant := -2147483614; | |
LC_DYLIB_CODE_SIGN_DRS : constant := 43; | |
LC_DYSYMTAB : constant := 11; | |
LC_ENCRYPTION_INFO : constant := 33; | |
LC_FUNCTION_STARTS : constant := 38; | |
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_UPWARD_DYLIB : constant := -2147483613; | |
LC_LOAD_WEAK_DYLIB : constant := -2147483624; | |
LC_MAIN : constant := -2147483608; | |
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_SOURCE_VERSION : constant := 42; | |
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; | |
LC_VERSION_MIN_IPHONEOS : constant := 37; | |
LC_VERSION_MIN_MACOSX : constant := 36; | |
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_DEAD_STRIPPABLE_DYLIB : constant := 4194304; | |
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_HAS_TLV_DESCRIPTORS : constant := 8388608; | |
MH_INCRLINK : constant := 2; | |
MH_KEXT_BUNDLE : constant := 11; | |
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_HEAP_EXECUTION : constant := 16777216; | |
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; | |
REBASE_IMMEDIATE_MASK : constant := 15; | |
REBASE_OPCODE_ADD_ADDR_IMM_SCALED : constant := 64; | |
REBASE_OPCODE_ADD_ADDR_ULEB : constant := 48; | |
REBASE_OPCODE_DONE : constant := 0; | |
REBASE_OPCODE_DO_REBASE_ADD_ADDR_ULEB : constant := 112; | |
REBASE_OPCODE_DO_REBASE_IMM_TIMES : constant := 80; | |
REBASE_OPCODE_DO_REBASE_ULEB_TIMES : constant := 96; | |
REBASE_OPCODE_DO_REBASE_ULEB_TIMES_SKIPPING_ULEB : constant := 128; | |
REBASE_OPCODE_MASK : constant := 240; | |
REBASE_OPCODE_SET_SEGMENT_AND_OFFSET_ULEB : constant := 32; | |
REBASE_OPCODE_SET_TYPE_IMM : constant := 16; | |
REBASE_TYPE_POINTER : constant := 1; | |
REBASE_TYPE_TEXT_ABSOLUTE32 : constant := 2; | |
REBASE_TYPE_TEXT_PCREL32 : constant := 3; | |
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_THREAD_LOCAL_INIT_FUNCTION_POINTERS : constant := 21; | |
S_THREAD_LOCAL_REGULAR : constant := 17; | |
S_THREAD_LOCAL_VARIABLES : constant := 19; | |
S_THREAD_LOCAL_VARIABLE_POINTERS : constant := 20; | |
S_THREAD_LOCAL_ZEROFILL : constant := 18; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.machine is | |
pragma Preelaborate; | |
end C.machine; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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_fa4da3ae is access function ( | |
zone : access struct_malloc_zone_t; ptr : void_const_ptr) | |
return stddef.size_t; | |
pragma Convention (C, access_fa4da3ae); | |
type access_f85c254b is access function ( | |
zone : access struct_malloc_zone_t; size : stddef.size_t) | |
return void_ptr; | |
pragma Convention (C, access_f85c254b); | |
type access_fb791cac 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_fb791cac); | |
type access_e90d5bc9 is access function ( | |
zone : access struct_malloc_zone_t; size : stddef.size_t) | |
return void_ptr; | |
pragma Convention (C, access_e90d5bc9); | |
type access_94e29945 is access procedure ( | |
zone : access struct_malloc_zone_t; ptr : void_ptr); | |
pragma Convention (C, access_94e29945); | |
type access_5ea6551f is access function ( | |
zone : access struct_malloc_zone_t; ptr : void_ptr; | |
size : stddef.size_t) return void_ptr; | |
pragma Convention (C, access_5ea6551f); | |
type access_9bb7d51c is access procedure ( | |
zone : access struct_malloc_zone_t); | |
pragma Convention (C, access_9bb7d51c); | |
type access_72e1e196 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_72e1e196); | |
type access_013bac98 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_013bac98); | |
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 access_84ff6382 is access function ( | |
zone : access struct_malloc_zone_t; alignment : stddef.size_t; | |
size : stddef.size_t) return void_ptr; | |
pragma Convention (C, access_84ff6382); | |
type access_b557daee is access procedure ( | |
zone : access struct_malloc_zone_t; ptr : void_ptr; | |
size : stddef.size_t); | |
pragma Convention (C, access_b557daee); | |
type access_41023c42 is access function ( | |
zone : access struct_malloc_zone_t; goal : stddef.size_t) | |
return stddef.size_t; | |
pragma Convention (C, access_41023c42); | |
type struct_malloc_zone_t is record | |
reserved1 : aliased void_ptr; | |
reserved2 : aliased void_ptr; | |
size : aliased access_fa4da3ae; | |
malloc : aliased access_f85c254b; | |
calloc : aliased access_fb791cac; | |
valloc : aliased access_e90d5bc9; | |
free : aliased access_94e29945; | |
realloc : aliased access_5ea6551f; | |
destroy : aliased access_9bb7d51c; | |
zone_name : aliased char_const_ptr; | |
batch_malloc : aliased access_72e1e196; | |
batch_free : aliased access_013bac98; | |
introspect : aliased struct_malloc_introspection_t_ptr; | |
version : aliased unsigned_int; | |
memalign : aliased access_84ff6382; | |
free_definite_size : aliased access_b557daee; | |
pressure_relief : aliased access_41023c42; | |
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_memalign (zone : access malloc_zone_t; | |
alignment : stddef.size_t; size : stddef.size_t) return void_ptr; | |
pragma Import (C, malloc_zone_memalign, "malloc_zone_memalign"); | |
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"); | |
function malloc_default_purgeable_zone return malloc_zone_t_ptr; | |
pragma Import (C, malloc_default_purgeable_zone, | |
"malloc_default_purgeable_zone"); | |
procedure malloc_make_purgeable (ptr : void_ptr); | |
pragma Import (C, malloc_make_purgeable, "malloc_make_purgeable"); | |
function malloc_make_nonpurgeable (ptr : void_ptr) return signed_int; | |
pragma Import (C, malloc_make_nonpurgeable, "malloc_make_nonpurgeable"); | |
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"); | |
function malloc_zone_pressure_relief (zone : access malloc_zone_t; | |
goal : stddef.size_t) return stddef.size_t; | |
pragma Import (C, malloc_zone_pressure_relief, | |
"malloc_zone_pressure_relief"); | |
type struct_bf73b81d 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_bf73b81d); | |
type struct_bf73b81d_ptr is access all struct_bf73b81d; | |
for struct_bf73b81d_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_bf73b81d_ptr); | |
pragma Convention (C, struct_bf73b81d_ptr); | |
subtype vm_range_t is struct_bf73b81d; | |
subtype vm_range_t_ptr is struct_bf73b81d_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_b3447588 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_b3447588); | |
-- subtype memory_reader_t is ... (function type) | |
type access_426119df 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_426119df); | |
-- subtype vm_range_recorder_t is ... (function type) | |
type access_fdc0cd55 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_b3447588; | |
recorder : access_426119df) return mach.i386.kern_return.kern_return_t; | |
pragma Convention (C, access_fdc0cd55); | |
type access_af91986a is access function (zone : access malloc_zone_t; | |
size : stddef.size_t) return stddef.size_t; | |
pragma Convention (C, access_af91986a); | |
type access_c24efb3d is access function (zone : access malloc_zone_t) | |
return mach.i386.boolean.boolean_t; | |
pragma Convention (C, access_c24efb3d); | |
type access_b4a43666 is access procedure (zone : access malloc_zone_t; | |
verbose : mach.i386.boolean.boolean_t); | |
pragma Convention (C, access_b4a43666); | |
type access_8247b2dc is access procedure (zone : access malloc_zone_t; | |
address : void_ptr); | |
pragma Convention (C, access_8247b2dc); | |
type access_879d723b is access procedure (zone : access malloc_zone_t); | |
pragma Convention (C, access_879d723b); | |
type access_35e941fe is access procedure (zone : access malloc_zone_t); | |
pragma Convention (C, access_35e941fe); | |
type access_9e2eb218 is access procedure (zone : access malloc_zone_t; | |
stats : access malloc_statistics_t); | |
pragma Convention (C, access_9e2eb218); | |
type access_90b2d91b is access function (zone : access malloc_zone_t) | |
return mach.i386.boolean.boolean_t; | |
pragma Convention (C, access_90b2d91b); | |
type access_5c55fefd is access function (zone : access malloc_zone_t) | |
return mach.i386.boolean.boolean_t; | |
pragma Convention (C, access_5c55fefd); | |
type access_8d54e059 is access procedure (zone : access malloc_zone_t); | |
pragma Convention (C, access_8d54e059); | |
type access_7506235d is access procedure (zone : access malloc_zone_t; | |
memory : void_ptr); | |
pragma Convention (C, access_7506235d); | |
type struct_malloc_introspection_t is record | |
enumerator : aliased access_fdc0cd55; | |
good_size : aliased access_af91986a; | |
check : aliased access_c24efb3d; | |
print : aliased access_b4a43666; | |
log : aliased access_8247b2dc; | |
force_lock : aliased access_879d723b; | |
force_unlock : aliased access_35e941fe; | |
statistics : aliased access_9e2eb218; | |
zone_locked : aliased access_90b2d91b; | |
enable_discharge_checking : aliased access_5c55fefd; | |
disable_discharge_checking : aliased access_8d54e059; | |
discharge : aliased access_7506235d; | |
enumerate_unavailable_without_blocks : aliased void_ptr; | |
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_b3447588; | |
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"); | |
function malloc_zone_enable_discharge_checking ( | |
zone : access malloc_zone_t) return mach.i386.boolean.boolean_t; | |
pragma Import (C, malloc_zone_enable_discharge_checking, | |
"malloc_zone_enable_discharge_checking"); | |
procedure malloc_zone_disable_discharge_checking ( | |
zone : access malloc_zone_t); | |
pragma Import (C, malloc_zone_disable_discharge_checking, | |
"malloc_zone_disable_discharge_checking"); | |
procedure malloc_zone_discharge (zone : access malloc_zone_t; | |
memory : void_ptr); | |
pragma Import (C, malloc_zone_discharge, "malloc_zone_discharge"); | |
procedure malloc_zone_enumerate_discharged_pointers ( | |
zone : access malloc_zone_t; a2 : void_ptr); | |
pragma Import (C, malloc_zone_enumerate_discharged_pointers, | |
"malloc_zone_enumerate_discharged_pointers"); | |
MALLOC_ADMIN_REGION_RANGE_TYPE : constant := 4; | |
MALLOC_PTR_IN_USE_RANGE_TYPE : constant := 1; | |
MALLOC_PTR_REGION_RANGE_TYPE : constant := 2; | |
MALLOC_ZONE_SPECIFIC_FLAGS : constant := 65280; | |
-- _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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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_int) 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 := 5127; | |
AI_NUMERICHOST : constant := 4; | |
AI_NUMERICSERV : constant := 4096; | |
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 := 15; | |
EAI_MEMORY : constant := 6; | |
EAI_NODATA : constant := 7; | |
EAI_NONAME : constant := 8; | |
EAI_OVERFLOW : constant := 14; | |
EAI_PROTOCOL : constant := 13; | |
EAI_SERVICE : constant := 9; | |
EAI_SOCKTYPE : constant := 10; | |
EAI_SYSTEM : constant := 11; | |
HOST_NOT_FOUND : constant := 1; | |
NETDB_INTERNAL : constant := -1; | |
NETDB_SUCCESS : constant := 0; | |
NI_DGRAM : constant := 16; | |
NI_MAXHOST : constant := 1025; | |
NI_MAXSERV : constant := 32; | |
NI_NAMEREQD : constant := 4; | |
NI_NOFQDN : constant := 1; | |
NI_NUMERICHOST : constant := 2; | |
NI_NUMERICSERV : constant := 8; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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; | |
with C.sys.socket; | |
with C.sys.types; | |
package C.netinet.in_h is | |
pragma Preelaborate; | |
type struct_in_addr; | |
type struct_in_addr is record | |
s_addr : aliased sys.types.in_addr_t; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_in_addr); | |
type struct_in_addr_ptr is access all struct_in_addr; | |
for struct_in_addr_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_in_addr_ptr); | |
pragma Convention (C, struct_in_addr_ptr); | |
type struct_sockaddr_in; | |
type struct_sockaddr_in is record | |
sin_len : aliased 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_sockaddr_in_ptr is access all struct_sockaddr_in; | |
for struct_sockaddr_in_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_sockaddr_in_ptr); | |
pragma Convention (C, struct_sockaddr_in_ptr); | |
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); | |
type struct_ip_mreqn; | |
type struct_ip_mreqn is record | |
imr_multiaddr : aliased struct_in_addr; | |
imr_address : aliased struct_in_addr; | |
imr_ifindex : aliased signed_int; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_ip_mreqn); | |
type struct_ip_mreq_source; | |
type struct_ip_mreq_source is record | |
imr_multiaddr : aliased struct_in_addr; | |
imr_sourceaddr : aliased struct_in_addr; | |
imr_interface : aliased struct_in_addr; | |
end record; | |
for struct_ip_mreq_source'Alignment use 4; | |
pragma Convention (C_Pass_By_Copy, struct_ip_mreq_source); | |
type struct_group_req; | |
type struct_group_req is record | |
gr_interface : aliased stdint.uint32_t; | |
gr_group : aliased sys.socket.struct_sockaddr_storage; | |
end record; | |
for struct_group_req'Alignment use 8; | |
pragma Convention (C_Pass_By_Copy, struct_group_req); | |
type struct_group_source_req; | |
type struct_group_source_req is record | |
gsr_interface : aliased stdint.uint32_t; | |
gsr_group : aliased sys.socket.struct_sockaddr_storage; | |
gsr_source : aliased sys.socket.struct_sockaddr_storage; | |
end record; | |
for struct_group_source_req'Alignment use 8; | |
pragma Convention (C_Pass_By_Copy, struct_group_source_req); | |
type struct_msfilterreq; | |
type struct_msfilterreq is record | |
msfr_ifindex : aliased stdint.uint32_t; | |
msfr_fmode : aliased stdint.uint32_t; | |
msfr_nsrcs : aliased stdint.uint32_t; | |
msfr_align : aliased stdint.uint32_t; | |
msfr_group : aliased sys.socket.struct_sockaddr_storage; | |
msfr_srcs : aliased sys.socket.struct_sockaddr_storage_ptr; | |
end record; | |
for struct_msfilterreq'Alignment use 8; | |
pragma Convention (C_Pass_By_Copy, struct_msfilterreq); | |
function setipv4sourcefilter (a1 : signed_int; a2 : struct_in_addr; | |
a3 : struct_in_addr; a4 : stdint.uint32_t; a5 : stdint.uint32_t; | |
a6 : access struct_in_addr) return signed_int; | |
pragma Import (C, setipv4sourcefilter, "setipv4sourcefilter"); | |
function getipv4sourcefilter (a1 : signed_int; a2 : struct_in_addr; | |
a3 : struct_in_addr; a4 : access stdint.uint32_t; | |
a5 : access stdint.uint32_t; a6 : access struct_in_addr) | |
return signed_int; | |
pragma Import (C, getipv4sourcefilter, "getipv4sourcefilter"); | |
function setsourcefilter (a1 : signed_int; a2 : stdint.uint32_t; | |
a3 : access sys.socket.struct_sockaddr; a4 : sys.socket.socklen_t; | |
a5 : stdint.uint32_t; a6 : stdint.uint32_t; | |
a7 : access sys.socket.struct_sockaddr_storage) return signed_int; | |
pragma Import (C, setsourcefilter, "setsourcefilter"); | |
function getsourcefilter (a1 : signed_int; a2 : stdint.uint32_t; | |
a3 : access sys.socket.struct_sockaddr; a4 : sys.socket.socklen_t; | |
a5 : access stdint.uint32_t; a6 : access stdint.uint32_t; | |
a7 : access sys.socket.struct_sockaddr_storage) return signed_int; | |
pragma Import (C, getsourcefilter, "getsourcefilter"); | |
type struct_in_pktinfo; | |
type struct_in_pktinfo is record | |
ipi_ifindex : aliased unsigned_int; | |
ipi_spec_dst : aliased struct_in_addr; | |
ipi_addr : aliased struct_in_addr; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_in_pktinfo); | |
-- #include <netinet6/in6.h> | |
function bindresvport (a1 : signed_int; a2 : access struct_sockaddr_in) | |
return signed_int; | |
pragma Import (C, bindresvport, "bindresvport"); | |
function bindresvport_sa (a1 : signed_int; | |
a2 : access sys.socket.struct_sockaddr) return signed_int; | |
pragma Import (C, bindresvport_sa, "bindresvport_sa"); | |
INADDR_ALLHOSTS_GROUP : constant := 3758096385; | |
INADDR_ALLMDNS_GROUP : constant := 3758096635; | |
INADDR_ALLRPTS_GROUP : constant := 3758096406; | |
INADDR_ALLRTRS_GROUP : constant := 3758096386; | |
INADDR_ANY : constant := 0; | |
INADDR_BROADCAST : constant := 4294967295; | |
INADDR_CARP_GROUP : constant := 3758096402; | |
INADDR_LOOPBACK : constant := 2130706433; | |
INADDR_MAX_LOCAL_GROUP : constant := 3758096639; | |
INADDR_NONE : constant := -1; | |
INADDR_PFSYNC_GROUP : constant := 3758096624; | |
INADDR_UNSPEC_GROUP : constant := 3758096384; | |
INET_ADDRSTRLEN : constant := 16; | |
-- IN_ANY_LOCAL (function macro) | |
-- IN_BADCLASS (function macro) | |
-- IN_CLASSA (function macro) | |
IN_CLASSA_HOST : constant := 16777215; | |
IN_CLASSA_MAX : constant := 128; | |
IN_CLASSA_NET : constant := -16777216; | |
IN_CLASSA_NSHIFT : constant := 24; | |
-- IN_CLASSB (function macro) | |
IN_CLASSB_HOST : constant := 65535; | |
IN_CLASSB_MAX : constant := 65536; | |
IN_CLASSB_NET : constant := -65536; | |
IN_CLASSB_NSHIFT : constant := 16; | |
-- IN_CLASSC (function macro) | |
IN_CLASSC_HOST : constant := 255; | |
IN_CLASSC_NET : constant := -256; | |
IN_CLASSC_NSHIFT : constant := 8; | |
-- IN_CLASSD (function macro) | |
IN_CLASSD_HOST : constant := 268435455; | |
IN_CLASSD_NET : constant := -268435456; | |
IN_CLASSD_NSHIFT : constant := 28; | |
-- IN_EXPERIMENTAL (function macro) | |
-- IN_LINKLOCAL (function macro) | |
IN_LINKLOCALNETNUM : constant := 2851995648; | |
-- IN_LOCAL_GROUP (function macro) | |
-- IN_LOOPBACK (function macro) | |
IN_LOOPBACKNET : constant := 127; | |
-- IN_MULTICAST (function macro) | |
-- IN_PRIVATE (function macro) | |
-- IN_ZERONET (function macro) | |
IPCTL_ACCEPTSOURCEROUTE : constant := 13; | |
IPCTL_DEFTTL : constant := 3; | |
IPCTL_DIRECTEDBROADCAST : constant := 9; | |
IPCTL_FASTFORWARDING : constant := 14; | |
IPCTL_FORWARDING : constant := 1; | |
IPCTL_GIF_TTL : constant := 16; | |
IPCTL_INTRQDROPS : constant := 11; | |
IPCTL_INTRQMAXLEN : constant := 10; | |
IPCTL_KEEPFAITH : constant := 15; | |
IPCTL_MAXID : constant := 17; | |
IPCTL_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_SCTP : constant := 132; | |
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_ADD_SOURCE_MEMBERSHIP : constant := 70; | |
IP_BLOCK_SOURCE : constant := 72; | |
IP_BOUND_IF : constant := 25; | |
IP_DEFAULT_MULTICAST_LOOP : constant := 1; | |
IP_DEFAULT_MULTICAST_TTL : constant := 1; | |
IP_DROP_MEMBERSHIP : constant := 13; | |
IP_DROP_SOURCE_MEMBERSHIP : constant := 71; | |
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_GROUP_SRC_FILTER : constant := 512; | |
IP_MAX_MEMBERSHIPS : constant := 4095; | |
IP_MAX_SOCK_MUTE_FILTER : constant := 128; | |
IP_MAX_SOCK_SRC_FILTER : constant := 128; | |
IP_MIN_MEMBERSHIPS : constant := 31; | |
IP_MSFILTER : constant := 74; | |
IP_MULTICAST_IF : constant := 9; | |
IP_MULTICAST_IFINDEX : constant := 66; | |
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_PKTINFO : constant := 26; | |
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_RECVPKTINFO : constant := 26; | |
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; | |
IP_UNBLOCK_SOURCE : constant := 73; | |
MCAST_BLOCK_SOURCE : constant := 84; | |
MCAST_EXCLUDE : constant := 2; | |
MCAST_INCLUDE : constant := 1; | |
MCAST_JOIN_GROUP : constant := 80; | |
MCAST_JOIN_SOURCE_GROUP : constant := 82; | |
MCAST_LEAVE_GROUP : constant := 81; | |
MCAST_LEAVE_SOURCE_GROUP : constant := 83; | |
MCAST_UNBLOCK_SOURCE : constant := 85; | |
MCAST_UNDEFINED : constant := 0; | |
-- _NETINET_IN_H_ (empty) | |
DARWIN_IPPORT_RESERVED : constant := 1024; | |
-- __MSFILTERREQ_DEFINED (empty) | |
end C.netinet.in_h; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.netinet is | |
pragma Preelaborate; | |
end C.netinet; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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.stdint; | |
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_8e2040f2 (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_8e2040f2); | |
pragma Convention (C_Pass_By_Copy, union_8e2040f2); | |
type struct_in6_addr is record | |
u6_addr : aliased union_8e2040f2; | |
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"); | |
in6addr_linklocal_allv2routers : aliased struct_in6_addr; | |
pragma Import (C, in6addr_linklocal_allv2routers, | |
"in6addr_linklocal_allv2routers"); | |
type struct_ipv6_mreq; | |
type struct_ipv6_mreq is record | |
ipv6mr_multiaddr : aliased struct_in6_addr; | |
ipv6mr_interface : aliased unsigned_int; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_ipv6_mreq); | |
type struct_in6_pktinfo; | |
type struct_in6_pktinfo is record | |
ipi6_addr : aliased struct_in6_addr; | |
ipi6_ifindex : aliased unsigned_int; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_in6_pktinfo); | |
type struct_ip6_mtuinfo; | |
type struct_ip6_mtuinfo is record | |
ip6m_addr : aliased struct_sockaddr_in6; | |
ip6m_mtu : aliased stdint.uint32_t; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_ip6_mtuinfo); | |
function inet6_option_space (a1 : signed_int) return signed_int; | |
pragma Import (C, inet6_option_space, "inet6_option_space"); | |
function inet6_option_init (a1 : void_ptr; | |
a2 : access sys.socket.struct_cmsghdr_ptr; a3 : signed_int) | |
return signed_int; | |
pragma Import (C, inet6_option_init, "inet6_option_init"); | |
function inet6_option_append (a1 : access sys.socket.struct_cmsghdr; | |
a2 : access constant 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 : sys.socket.socklen_t) | |
return signed_int; | |
pragma Import (C, inet6_opt_init, "inet6_opt_init"); | |
function inet6_opt_append (a1 : void_ptr; a2 : sys.socket.socklen_t; | |
a3 : signed_int; a4 : i386.qtypes.uint8_t; a5 : sys.socket.socklen_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 : sys.socket.socklen_t; | |
a3 : signed_int) return signed_int; | |
pragma Import (C, inet6_opt_finish, "inet6_opt_finish"); | |
function inet6_opt_set_val (a1 : void_ptr; a2 : signed_int; a3 : void_ptr; | |
a4 : sys.socket.socklen_t) return signed_int; | |
pragma Import (C, inet6_opt_set_val, "inet6_opt_set_val"); | |
function inet6_opt_next (a1 : void_ptr; a2 : sys.socket.socklen_t; | |
a3 : signed_int; a4 : access i386.qtypes.uint8_t; | |
a5 : access sys.socket.socklen_t; a6 : access void_ptr) | |
return signed_int; | |
pragma Import (C, inet6_opt_next, "inet6_opt_next"); | |
function inet6_opt_find (a1 : void_ptr; a2 : sys.socket.socklen_t; | |
a3 : signed_int; a4 : i386.qtypes.uint8_t; | |
a5 : access sys.socket.socklen_t; a6 : access void_ptr) | |
return signed_int; | |
pragma Import (C, inet6_opt_find, "inet6_opt_find"); | |
function inet6_opt_get_val (a1 : void_ptr; a2 : signed_int; a3 : void_ptr; | |
a4 : sys.socket.socklen_t) return signed_int; | |
pragma Import (C, inet6_opt_get_val, "inet6_opt_get_val"); | |
function inet6_rth_space (a1 : signed_int; a2 : signed_int) | |
return sys.socket.socklen_t; | |
pragma Import (C, inet6_rth_space, "inet6_rth_space"); | |
function inet6_rth_init (a1 : void_ptr; a2 : sys.socket.socklen_t; | |
a3 : signed_int; a4 : signed_int) return void_ptr; | |
pragma Import (C, inet6_rth_init, "inet6_rth_init"); | |
function inet6_rth_add (a1 : void_ptr; | |
a2 : access constant struct_in6_addr) return signed_int; | |
pragma Import (C, inet6_rth_add, "inet6_rth_add"); | |
function inet6_rth_reverse (a1 : void_const_ptr; a2 : void_ptr) | |
return signed_int; | |
pragma Import (C, inet6_rth_reverse, "inet6_rth_reverse"); | |
function inet6_rth_segments (a1 : void_const_ptr) return signed_int; | |
pragma Import (C, inet6_rth_segments, "inet6_rth_segments"); | |
function inet6_rth_getaddr (a1 : void_const_ptr; a2 : signed_int) | |
return struct_in6_addr_ptr; | |
pragma Import (C, inet6_rth_getaddr, "inet6_rth_getaddr"); | |
procedure addrsel_policy_init; | |
pragma Import (C, addrsel_policy_init, "addrsel_policy_init"); | |
ICMP6_FILTER : constant := 18; | |
ICMPV6CTL_ND6_ONLINKNSRFC4861 : constant := 50; | |
-- IN6ADDR_ANY_INIT (plase type with #pragma instance) | |
-- IN6ADDR_INTFACELOCAL_ALLNODES_INIT (plase type with #pragma instance) | |
-- IN6ADDR_LINKLOCAL_ALLNODES_INIT (plase type with #pragma instance) | |
-- IN6ADDR_LINKLOCAL_ALLROUTERS_INIT (plase type with #pragma instance) | |
-- IN6ADDR_LINKLOCAL_ALLV2ROUTERS_INIT (plase type with #pragma instance) | |
-- IN6ADDR_LOOPBACK_INIT (plase type with #pragma instance) | |
-- IN6ADDR_NODELOCAL_ALLNODES_INIT (plase type with #pragma instance) | |
-- IN6ADDR_V4MAPPED_INIT (plase type with #pragma instance) | |
-- IN6_ARE_ADDR_EQUAL (unparsible) | |
-- IN6_IS_ADDR_6TO4 (uninterpretable) | |
-- 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_UNIQUE_LOCAL (uninterpretable) | |
-- IN6_IS_ADDR_UNSPECIFIED (uninterpretable) | |
-- IN6_IS_ADDR_V4COMPAT (uninterpretable) | |
-- IN6_IS_ADDR_V4MAPPED (uninterpretable) | |
INET6_ADDRSTRLEN : constant := 46; | |
IPV6CTL_ACCEPT_RTADV : constant := 12; | |
IPV6CTL_ADDRCTLPOLICY : constant := 38; | |
IPV6CTL_AUTO_FLOWLABEL : constant := 17; | |
IPV6CTL_AUTO_LINKLOCAL : constant := 35; | |
IPV6CTL_DAD_COUNT : constant := 16; | |
IPV6CTL_DEFHLIM : constant := 3; | |
IPV6CTL_DEFMCASTHLIM : constant := 18; | |
IPV6CTL_FORWARDING : constant := 1; | |
IPV6CTL_FORWSRCRT : constant := 5; | |
IPV6CTL_GIF_HLIM : constant := 19; | |
IPV6CTL_HDRNESTLIMIT : constant := 15; | |
IPV6CTL_KAME_VERSION : constant := 20; | |
IPV6CTL_KEEPFAITH : constant := 13; | |
IPV6CTL_LOG_INTERVAL : constant := 14; | |
IPV6CTL_MAXDYNROUTES : constant := 49; | |
IPV6CTL_MAXFRAGPACKETS : constant := 9; | |
IPV6CTL_MAXFRAGS : constant := 41; | |
IPV6CTL_MAXID : constant := 51; | |
IPV6CTL_MAXIFDEFROUTERS : constant := 48; | |
IPV6CTL_MAXIFPREFIXES : constant := 47; | |
IPV6CTL_MCAST_PMTU : constant := 44; | |
IPV6CTL_MRTPROTO : constant := 8; | |
IPV6CTL_MRTSTATS : constant := 7; | |
IPV6CTL_NEIGHBORGCTHRESH : constant := 46; | |
IPV6CTL_PREFER_TEMPADDR : constant := 37; | |
IPV6CTL_RIP6STATS : constant := 36; | |
IPV6CTL_RR_PRUNE : constant := 22; | |
IPV6CTL_RTEXPIRE : constant := 25; | |
IPV6CTL_RTMAXCACHE : constant := 27; | |
IPV6CTL_RTMINEXPIRE : constant := 26; | |
IPV6CTL_SENDREDIRECTS : constant := 2; | |
IPV6CTL_SOURCECHECK : constant := 10; | |
IPV6CTL_SOURCECHECK_LOGINT : constant := 11; | |
IPV6CTL_STATS : constant := 6; | |
IPV6CTL_TEMPPLTIME : constant := 33; | |
IPV6CTL_TEMPVLTIME : constant := 34; | |
IPV6CTL_USETEMPADDR : constant := 32; | |
IPV6CTL_USE_DEFAULTZONE : constant := 39; | |
IPV6CTL_USE_DEPRECATED : constant := 21; | |
IPV6CTL_V6ONLY : constant := 24; | |
IPV6PORT_ANONMAX : constant := 65535; | |
IPV6PORT_ANONMIN : constant := 49152; | |
IPV6PORT_RESERVED : constant := 1024; | |
IPV6PORT_RESERVEDMAX : constant := 1023; | |
IPV6PORT_RESERVEDMIN : constant := 600; | |
IPV6PROTO_MAXID : constant := 104; | |
IPV6_2292DSTOPTS : constant := 23; | |
IPV6_2292HOPLIMIT : constant := 20; | |
IPV6_2292HOPOPTS : constant := 22; | |
IPV6_2292NEXTHOP : constant := 21; | |
IPV6_2292PKTINFO : constant := 19; | |
IPV6_2292PKTOPTIONS : constant := 25; | |
IPV6_2292RTHDR : constant := 24; | |
IPV6_BINDV6ONLY : constant := 27; | |
IPV6_BOUND_IF : constant := 125; | |
IPV6_CHECKSUM : constant := 26; | |
IPV6_DEFAULT_MULTICAST_HOPS : constant := 1; | |
IPV6_DEFAULT_MULTICAST_LOOP : constant := 1; | |
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_IPSEC_POLICY : constant := 28; | |
IPV6_JOIN_GROUP : constant := 12; | |
IPV6_LEAVE_GROUP : constant := 13; | |
IPV6_MAX_GROUP_SRC_FILTER : constant := 512; | |
IPV6_MAX_MEMBERSHIPS : constant := 4095; | |
IPV6_MAX_SOCK_SRC_FILTER : constant := 128; | |
IPV6_MIN_MEMBERSHIPS : constant := 31; | |
IPV6_MULTICAST_HOPS : constant := 10; | |
IPV6_MULTICAST_IF : constant := 9; | |
IPV6_MULTICAST_LOOP : constant := 11; | |
IPV6_PORTRANGE : constant := 14; | |
IPV6_PORTRANGE_DEFAULT : constant := 0; | |
IPV6_PORTRANGE_HIGH : constant := 1; | |
IPV6_PORTRANGE_LOW : constant := 2; | |
IPV6_RECVTCLASS : constant := 35; | |
IPV6_RTHDR_LOOSE : constant := 0; | |
IPV6_RTHDR_STRICT : constant := 1; | |
IPV6_RTHDR_TYPE_0 : constant := 0; | |
IPV6_SOCKOPT_RESERVED1 : constant := 3; | |
IPV6_TCLASS : constant := 36; | |
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_INTFACELOCAL : constant := 1; | |
IPV6_ADDR_SCOPE_LINKLOCAL : constant := 2; | |
IPV6_ADDR_SCOPE_NODELOCAL : constant := 1; | |
IPV6_ADDR_SCOPE_ORGLOCAL : constant := 8; | |
IPV6_ADDR_SCOPE_SITELOCAL : constant := 5; | |
KAME_VERSION : constant char_array (0 .. 17) := "2009/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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.netinet6 is | |
pragma Preelaborate; | |
end C.netinet6; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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.mach.port; | |
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) | |
SIGRTMAX : constant := signal.SIGRTMAX; | |
SIGRTMIN : constant := signal.SIGRTMIN; | |
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) | |
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"); | |
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"); | |
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"); | |
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"); | |
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_be949f21 is access function (a1 : void_ptr) return void_ptr; | |
pragma Convention (C, access_be949f21); | |
function pthread_create (a1 : access sys.types.pthread_t; | |
a2 : access constant sys.types.pthread_attr_t; a3 : access_be949f21; | |
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_c225b430 is access procedure (a1 : void_ptr); | |
pragma Convention (C, access_c225b430); | |
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"); | |
function pthread_key_create (a1 : access sys.types.pthread_key_t; | |
a2 : access_c225b430) 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"); | |
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"); | |
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"); | |
function pthread_rwlock_rdlock (a1 : access sys.types.pthread_rwlock_t) | |
return signed_int; | |
pragma Import (C, pthread_rwlock_rdlock, "pthread_rwlock_rdlock"); | |
function pthread_rwlock_tryrdlock (a1 : access sys.types.pthread_rwlock_t) | |
return signed_int; | |
pragma Import (C, pthread_rwlock_tryrdlock, "pthread_rwlock_tryrdlock"); | |
function pthread_rwlock_trywrlock (a1 : access sys.types.pthread_rwlock_t) | |
return signed_int; | |
pragma Import (C, pthread_rwlock_trywrlock, "pthread_rwlock_trywrlock"); | |
function pthread_rwlock_wrlock (a1 : access sys.types.pthread_rwlock_t) | |
return signed_int; | |
pragma Import (C, pthread_rwlock_wrlock, "pthread_rwlock_wrlock"); | |
function pthread_rwlock_unlock (a1 : access sys.types.pthread_rwlock_t) | |
return signed_int; | |
pragma Import (C, pthread_rwlock_unlock, "pthread_rwlock_unlock"); | |
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"); | |
function pthread_setcanceltype (a1 : signed_int; a2 : access signed_int) | |
return signed_int; | |
pragma Import (C, pthread_setcanceltype, "pthread_setcanceltype"); | |
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"); | |
function pthread_is_threaded_np return signed_int; | |
pragma Import (C, pthread_is_threaded_np, "pthread_is_threaded_np"); | |
function pthread_threadid_np ( | |
a1 : access sys.qtypes.struct_opaque_pthread_t; | |
a2 : access i386.qtypes.uint64_t) return signed_int; | |
pragma Import (C, pthread_threadid_np, "pthread_threadid_np"); | |
function pthread_rwlock_longrdlock_np ( | |
a1 : access sys.types.pthread_rwlock_t) return signed_int; | |
pragma Import (C, pthread_rwlock_longrdlock_np, | |
"pthread_rwlock_longrdlock_np"); | |
function pthread_rwlock_yieldwrlock_np ( | |
a1 : access sys.types.pthread_rwlock_t) return signed_int; | |
pragma Import (C, pthread_rwlock_yieldwrlock_np, | |
"pthread_rwlock_yieldwrlock_np"); | |
function pthread_rwlock_downgrade_np ( | |
a1 : access sys.types.pthread_rwlock_t) return signed_int; | |
pragma Import (C, pthread_rwlock_downgrade_np, | |
"pthread_rwlock_downgrade_np"); | |
function pthread_rwlock_upgrade_np ( | |
a1 : access sys.types.pthread_rwlock_t) return signed_int; | |
pragma Import (C, pthread_rwlock_upgrade_np, "pthread_rwlock_upgrade_np"); | |
function pthread_rwlock_tryupgrade_np ( | |
a1 : access sys.types.pthread_rwlock_t) return signed_int; | |
pragma Import (C, pthread_rwlock_tryupgrade_np, | |
"pthread_rwlock_tryupgrade_np"); | |
function pthread_rwlock_held_np (a1 : access sys.types.pthread_rwlock_t) | |
return signed_int; | |
pragma Import (C, pthread_rwlock_held_np, "pthread_rwlock_held_np"); | |
function pthread_rwlock_rdheld_np (a1 : access sys.types.pthread_rwlock_t) | |
return signed_int; | |
pragma Import (C, pthread_rwlock_rdheld_np, "pthread_rwlock_rdheld_np"); | |
function pthread_rwlock_wrheld_np (a1 : access sys.types.pthread_rwlock_t) | |
return signed_int; | |
pragma Import (C, pthread_rwlock_wrheld_np, "pthread_rwlock_wrheld_np"); | |
function pthread_getname_np ( | |
a1 : access sys.qtypes.struct_opaque_pthread_t; a2 : access char; | |
a3 : stddef.size_t) return signed_int; | |
pragma Import (C, pthread_getname_np, "pthread_getname_np"); | |
function pthread_setname_np (a1 : access constant char) return signed_int; | |
pragma Import (C, pthread_setname_np, "pthread_setname_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.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_be949f21; | |
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.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_ERRORCHECK_MUTEX_INITIALIZER (plase type with #pragma instance) | |
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_RECURSIVE_MUTEX_INITIALIZER (plase type with #pragma instance) | |
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; | |
-- _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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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_ERRORCHECK_MUTEX_SIG_init : constant := 850045857; | |
PTHREAD_FIRSTFIT_MUTEX_SIG_init : constant := 850045859; | |
-- _PTHREAD_IMPL_H_ (empty) | |
PTHREAD_MUTEX_SIG_init : constant := 850045863; | |
PTHREAD_ONCE_SIG_init : constant := 816954554; | |
PTHREAD_RECURSIVE_MUTEX_SIG_init : constant := 850045858; | |
PTHREAD_RWLOCK_SIG_init : constant := 766030772; | |
qqSCHED_PARAM_SIZEqq : 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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"); | |
procedure setpwent; | |
pragma Import (C, setpwent, "setpwent"); | |
procedure endpwent; | |
pragma Import (C, endpwent, "endpwent"); | |
-- #include <uuid/uuid.h> | |
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"); | |
function getpwuuid (a1 : access unsigned_char) return struct_passwd_ptr; | |
pragma Import (C, getpwuuid, "getpwuuid"); | |
function getpwuuid_r (a1 : access unsigned_char; | |
a2 : access struct_passwd; a3 : access char; a4 : stddef.size_t; | |
a5 : access struct_passwd_ptr) return signed_int; | |
pragma Import (C, getpwuuid_r, "getpwuuid_r"); | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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.qtypes is | |
pragma Preelaborate; | |
subtype darwin_nl_item is signed_int; | |
subtype darwin_wctrans_t is signed_int; | |
subtype darwin_wctype_t is i386.qtypes.uint32_t; | |
FORTIFY_SOURCE : constant := 2; | |
DARWIN_WCHAR_MAX : constant := 2147483647; | |
DARWIN_WCHAR_MIN : constant := -2147483648; | |
DARWIN_WEOF : constant := -1; | |
-- __TYPES_H_ (empty) | |
-- __strfmonlike (parameterized declaration-specifiers) | |
-- __strftimelike (parameterized declaration-specifiers) | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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_c2effd87 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_c2effd87); | |
type struct_c2effd87_ptr is access all struct_c2effd87; | |
for struct_c2effd87_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_c2effd87_ptr); | |
pragma Convention (C, struct_c2effd87_ptr); | |
subtype RuneEntry is struct_c2effd87; | |
subtype RuneEntry_ptr is struct_c2effd87_ptr; | |
type struct_131e1002 is record | |
nranges : aliased signed_int; | |
ranges : aliased RuneEntry_ptr; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_131e1002); | |
subtype RuneRange is struct_131e1002; | |
type struct_87554cf8 is record | |
name : aliased char_array (0 .. 13); | |
mask : aliased i386.qtypes.uint32_t; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_87554cf8); | |
type struct_87554cf8_ptr is access all struct_87554cf8; | |
for struct_87554cf8_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_87554cf8_ptr); | |
pragma Convention (C, struct_87554cf8_ptr); | |
subtype RuneCharClass is struct_87554cf8; | |
subtype RuneCharClass_ptr is struct_87554cf8_ptr; | |
type access_33c1b7ff 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_33c1b7ff); | |
type access_0d0222f1 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_0d0222f1); | |
type struct_09590e35 is record | |
magic : aliased char_array (0 .. 7); | |
encoding : aliased char_array (0 .. 31); | |
sgetrune : aliased access_33c1b7ff; | |
sputrune : aliased access_0d0222f1; | |
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_09590e35); | |
type struct_09590e35_ptr is access all struct_09590e35; | |
for struct_09590e35_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_09590e35_ptr); | |
pragma Convention (C, struct_09590e35_ptr); | |
subtype RuneLocale is struct_09590e35; | |
subtype RuneLocale_ptr is struct_09590e35_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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.secure.qcommon is | |
pragma Preelaborate; | |
-- _SECURE__COMMON_H_ (empty) | |
USE_FORTIFY_LEVEL : constant := 2; | |
-- __darwin_obsz (function macro) | |
-- __darwin_obsz0 (function macro) | |
end C.secure.qcommon; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
with C.stdarg; | |
with C.stddef; | |
package C.secure.qstdio is | |
pragma Preelaborate; | |
function sprintf_chk (a1 : access char; a2 : signed_int; | |
a3 : stddef.size_t; a4 : access constant char) return signed_int; | |
pragma Import (C, sprintf_chk, "__sprintf_chk"); | |
function snprintf_chk (a1 : access char; a2 : stddef.size_t; | |
a3 : signed_int; a4 : stddef.size_t; a5 : access constant char) | |
return signed_int; | |
pragma Import (C, snprintf_chk, "__snprintf_chk"); | |
function vsprintf_chk (a1 : access char; a2 : signed_int; | |
a3 : stddef.size_t; a4 : access constant char; a5 : stdarg.va_list) | |
return signed_int; | |
pragma Import (C, vsprintf_chk, "__vsprintf_chk"); | |
function vsnprintf_chk (a1 : access char; a2 : stddef.size_t; | |
a3 : signed_int; a4 : stddef.size_t; a5 : access constant char; | |
a6 : stdarg.va_list) return signed_int; | |
pragma Import (C, vsnprintf_chk, "__vsnprintf_chk"); | |
-- _SECURE__STDIO_H_ (empty) | |
-- snprintf (variadic macro) | |
-- sprintf (variadic macro) | |
end C.secure.qstdio; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.secure.qstring is | |
function inline_memcpy_chk (dest : void_ptr; src : void_const_ptr; | |
len : stddef.size_t) return void_ptr is | |
begin | |
return void_ptr'(Cast (builtin_memcpy_chk (char_ptr'(Cast (dest)), | |
char_const_ptr'(Cast (src)), len, 18446744073709551615))); | |
end inline_memcpy_chk; | |
function inline_memmove_chk (dest : void_ptr; src : void_const_ptr; | |
len : stddef.size_t) return void_ptr is | |
begin | |
return void_ptr'(Cast (builtin_memmove_chk (char_ptr'(Cast (dest)), | |
char_const_ptr'(Cast (src)), len, 18446744073709551615))); | |
end inline_memmove_chk; | |
function inline_memset_chk (dest : void_ptr; val : signed_int; | |
len : stddef.size_t) return void_ptr is | |
begin | |
return void_ptr'(Cast (builtin_memset_chk (char_ptr'(Cast (dest)), val, | |
len, 18446744073709551615))); | |
end inline_memset_chk; | |
function inline_strcpy_chk (dest : access char; | |
src : access constant char) return char_ptr is | |
begin | |
return builtin_strcpy_chk (dest, src, 18446744073709551615); | |
end inline_strcpy_chk; | |
function inline_stpcpy_chk (dest : access char; | |
src : access constant char) return char_ptr is | |
begin | |
return builtin_stpcpy_chk (dest, src, 18446744073709551615); | |
end inline_stpcpy_chk; | |
function inline_stpncpy_chk (dest : access char; | |
src : access constant char; len : stddef.size_t) return char_ptr is | |
begin | |
return builtin_stpncpy_chk (dest, src, len, 18446744073709551615); | |
end inline_stpncpy_chk; | |
function inline_strncpy_chk (dest : access char; | |
src : access constant char; len : stddef.size_t) return char_ptr is | |
begin | |
return builtin_strncpy_chk (dest, src, len, 18446744073709551615); | |
end inline_strncpy_chk; | |
function inline_strcat_chk (dest : access char; | |
src : access constant char) return char_ptr is | |
begin | |
return builtin_strcat_chk (dest, src, 18446744073709551615); | |
end inline_strcat_chk; | |
function inline_strncat_chk (dest : access char; | |
src : access constant char; len : stddef.size_t) return char_ptr is | |
begin | |
return builtin_strncat_chk (dest, src, len, 18446744073709551615); | |
end inline_strncat_chk; | |
end C.secure.qstring; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
with Ada.Unchecked_Conversion; | |
with C.stddef; | |
package C.secure.qstring is | |
pragma Preelaborate; | |
function Cast is new Ada.Unchecked_Conversion (void_const_ptr, | |
char_const_ptr); | |
function Cast is new Ada.Unchecked_Conversion (void_ptr, char_ptr); | |
function Cast is new Ada.Unchecked_Conversion (char_ptr, void_ptr); | |
function inline_memcpy_chk (dest : void_ptr; src : void_const_ptr; | |
len : stddef.size_t) return void_ptr; | |
pragma Convention (C, inline_memcpy_chk); | |
pragma Inline (inline_memcpy_chk); | |
function inline_memmove_chk (dest : void_ptr; src : void_const_ptr; | |
len : stddef.size_t) return void_ptr; | |
pragma Convention (C, inline_memmove_chk); | |
pragma Inline (inline_memmove_chk); | |
function inline_memset_chk (dest : void_ptr; val : signed_int; | |
len : stddef.size_t) return void_ptr; | |
pragma Convention (C, inline_memset_chk); | |
pragma Inline (inline_memset_chk); | |
function inline_strcpy_chk (dest : access char; | |
src : access constant char) return char_ptr; | |
pragma Convention (C, inline_strcpy_chk); | |
pragma Inline (inline_strcpy_chk); | |
function inline_stpcpy_chk (dest : access char; | |
src : access constant char) return char_ptr; | |
pragma Convention (C, inline_stpcpy_chk); | |
pragma Inline (inline_stpcpy_chk); | |
function inline_stpncpy_chk (dest : access char; | |
src : access constant char; len : stddef.size_t) return char_ptr; | |
pragma Convention (C, inline_stpncpy_chk); | |
pragma Inline (inline_stpncpy_chk); | |
function inline_strncpy_chk (dest : access char; | |
src : access constant char; len : stddef.size_t) return char_ptr; | |
pragma Convention (C, inline_strncpy_chk); | |
pragma Inline (inline_strncpy_chk); | |
function inline_strcat_chk (dest : access char; | |
src : access constant char) return char_ptr; | |
pragma Convention (C, inline_strcat_chk); | |
pragma Inline (inline_strcat_chk); | |
function inline_strncat_chk (dest : access char; | |
src : access constant char; len : stddef.size_t) return char_ptr; | |
pragma Convention (C, inline_strncat_chk); | |
pragma Inline (inline_strncat_chk); | |
-- _SECURE__STRING_H_ (empty) | |
end C.secure.qstring; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.secure is | |
pragma Preelaborate; | |
end C.secure; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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_f71469d2 return signed_int; | |
function Cond_f71469d2 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_f71469d2; | |
begin | |
return Cond_f71469d2; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 constant 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_long := signed_long'(-1)) | |
return sys.signal.access_af5b653e 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; | |
function SIG_DFL (Value : signed_long := signed_long'(0)) | |
return sys.signal.access_af5b653e renames sys.signal.SIG_DFL; | |
function SIG_ERR (Value : signed_long := signed_long'(-1)) | |
return sys.signal.access_af5b653e renames sys.signal.SIG_ERR; | |
function SIG_HOLD (Value : signed_long := signed_long'(5)) | |
return sys.signal.access_af5b653e renames sys.signal.SIG_HOLD; | |
function SIG_IGN (Value : signed_long := signed_long'(1)) | |
return sys.signal.access_af5b653e 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) | |
-- .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_b1d4c85d is access procedure (a1 : signed_int); | |
pragma Convention (C, access_b1d4c85d); | |
function bsd_signal (a1 : signed_int; a2 : access_b1d4c85d) | |
return access_b1d4c85d; | |
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"); | |
function killpg (a1 : sys.types.pid_t; a2 : signed_int) return signed_int; | |
pragma Import (C, killpg, "killpg"); | |
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"); | |
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"); | |
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"); | |
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_b1d4c85d) | |
return access_b1d4c85d; | |
pragma Import (C, sigset, "sigset"); | |
function sigsuspend (a1 : access constant sys.ucontext.sigset_t) | |
return signed_int; | |
pragma Import (C, sigsuspend, "sigsuspend"); | |
function sigwait (a1 : access constant sys.ucontext.sigset_t; | |
a2 : access signed_int) return signed_int; | |
pragma Import (C, sigwait, "sigwait"); | |
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) | |
SIGRTMAX : constant := 0; | |
SIGRTMIN : constant := 0; | |
end C.signal; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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.port; | |
with C.mach.thread_status; | |
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/kern_return.h> | |
-- #include <mach/message.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_setauditsessionport_np ( | |
a1 : access posix_spawnattr_t; a2 : mach.port.mach_port_t) | |
return signed_int; | |
pragma Import (C, posix_spawnattr_setauditsessionport_np, | |
"posix_spawnattr_setauditsessionport_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_setexceptionports_np ( | |
a1 : access posix_spawnattr_t; | |
a2 : mach.exception_types.exception_mask_t; a3 : mach.port.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"); | |
function posix_spawnattr_setspecialport_np (a1 : access posix_spawnattr_t; | |
a2 : mach.port.mach_port_t; a3 : signed_int) return signed_int; | |
pragma Import (C, posix_spawnattr_setspecialport_np, | |
"posix_spawnattr_setspecialport_np"); | |
function posix_spawn_file_actions_addinherit_np ( | |
a1 : access posix_spawn_file_actions_t; a2 : signed_int) | |
return signed_int; | |
pragma Import (C, posix_spawn_file_actions_addinherit_np, | |
"posix_spawn_file_actions_addinherit_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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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; | |
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_ptr is unsigned_int_ptr; | |
subtype uint32_t_array is unsigned_int_array; | |
subtype uint64_t is unsigned_long_long; | |
subtype uint64_t_array is unsigned_long_long_array; | |
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 uintptr_t_ptr is unsigned_long_ptr; | |
subtype uintptr_t_ptr_ptr is unsigned_long_ptr_ptr; | |
subtype intmax_t is signed_long; | |
subtype uintmax_t is unsigned_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 := 9223372036854775807; | |
INTPTR_MIN : constant := -9223372036854775808; | |
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 := 9223372036854775807; | |
PTRDIFF_MIN : constant := -9223372036854775808; | |
SIG_ATOMIC_MAX : constant := 2147483647; | |
SIG_ATOMIC_MIN : constant := -2147483648; | |
SIZE_MAX : constant := 18446744073709551615; | |
-- UINT16_C (has # or ##) | |
UINT16_MAX : constant := 65535; | |
-- UINT32_C (has # or ##) | |
UINT32_MAX : constant := 4294967295; | |
-- UINT64_C (has # or ##) | |
UINT64_MAX : constant := 18446744073709551615; | |
-- UINT8_C (has # or ##) | |
UINT8_MAX : constant := 255; | |
-- UINTMAX_C (has # or ##) | |
UINTMAX_MAX : constant := 18446744073709551615; | |
UINTPTR_MAX : constant := 18446744073709551615; | |
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 := 64; | |
-- _GCC_WRAP_STDINT_H (empty) | |
end C.stdint; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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_f5fedb9d return signed_int; | |
function Assign_f5fedb9d return signed_int is | |
Left : signed_int renames p.w; | |
begin | |
Left := Left - 1; | |
return Left; | |
end Assign_f5fedb9d; | |
begin | |
if Assign_f5fedb9d >= 0 or else (p.w >= p.lbfsize | |
and then char'Val (c) /= char'Val (10)) | |
then | |
declare | |
function Assign_06ccf8f2 return unsigned_char; | |
function Assign_a18195b4 return unsigned_char_ptr; | |
function Assign_06ccf8f2 return unsigned_char is | |
Left : unsigned_char renames Assign_a18195b4.all; | |
begin | |
Left := unsigned_char'Mod (c); | |
return Left; | |
end Assign_06ccf8f2; | |
function Assign_a18195b4 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_a18195b4; | |
begin | |
return signed_int (Assign_06ccf8f2); | |
end; | |
else | |
return swbuf (c, p); | |
end if; | |
end; | |
end sputc; | |
end C.stdio; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- 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_2a7988bb is access function (a1 : void_ptr) return signed_int; | |
pragma Convention (C, access_2a7988bb); | |
type access_16dabe2e is access function (a1 : void_ptr; a2 : access char; | |
a3 : signed_int) return signed_int; | |
pragma Convention (C, access_16dabe2e); | |
type access_c62d063e is access function (a1 : void_ptr; a2 : fpos_t; | |
a3 : signed_int) return fpos_t; | |
pragma Convention (C, access_c62d063e); | |
type access_73340703 is access function (a1 : void_ptr; | |
a2 : access constant char; a3 : signed_int) return signed_int; | |
pragma Convention (C, access_73340703); | |
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_2a7988bb; | |
read : aliased access_16dabe2e; | |
seek : aliased access_c62d063e; | |
write : aliased access_73340703; | |
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"); | |
function fread (a1 : void_ptr; a2 : stddef.size_t; a3 : stddef.size_t; | |
a4 : access FILE) return stddef.size_t; | |
pragma Import (C, fread, "fread"); | |
function freopen (a1 : access constant char; a2 : access constant char; | |
a3 : access FILE) return FILE_ptr; | |
pragma Import (C, freopen, "freopen"); | |
function fscanf (a1 : access FILE; a2 : access constant char) | |
return signed_int; | |
pragma Import (C, fscanf, "fscanf"); | |
function fseek (a1 : access FILE; a2 : signed_long; a3 : signed_int) | |
return signed_int; | |
pragma Import (C, fseek, "fseek"); | |
function fsetpos (a1 : access FILE; a2 : access constant fpos_t) | |
return signed_int; | |
pragma Import (C, fsetpos, "fsetpos"); | |
function ftell (a1 : access FILE) return signed_long; | |
pragma Import (C, ftell, "ftell"); | |
function fwrite (a1 : void_const_ptr; a2 : stddef.size_t; | |
a3 : stddef.size_t; a4 : access FILE) return stddef.size_t; | |
pragma Import (C, fwrite, "fwrite"); | |
function getc (a1 : access FILE) return signed_int; | |
pragma Import (C, getc, "getc"); | |
function getchar return signed_int; | |
pragma Import (C, getchar, "getchar"); | |
function gets (a1 : access char) return char_ptr; | |
pragma Import (C, gets, "gets"); | |
procedure perror (a1 : access constant char); | |
pragma Import (C, perror, "perror"); | |
function printf (a1 : access constant char) return signed_int; | |
pragma Import (C, printf, "printf"); | |
function putc (a1 : signed_int; a2 : access FILE) return signed_int; | |
pragma Import (C, putc, "putc"); | |
function putchar (a1 : signed_int) return signed_int; | |
pragma Import (C, putchar, "putchar"); | |
function puts (a1 : access constant char) return signed_int; | |
pragma Import (C, puts, "puts"); | |
function remove (a1 : access constant char) return signed_int; | |
pragma Import (C, remove, "remove"); | |
function rename (a1 : access constant char; a2 : access constant char) | |
return signed_int; | |
pragma Import (C, rename, "rename"); | |
procedure rewind (a1 : access FILE); | |
pragma Import (C, rewind, "rewind"); | |
function scanf (a1 : access constant char) return signed_int; | |
pragma Import (C, scanf, "scanf"); | |
procedure setbuf (a1 : access FILE; a2 : access char); | |
pragma Import (C, setbuf, "setbuf"); | |
function setvbuf (a1 : access FILE; a2 : access char; a3 : signed_int; | |
a4 : stddef.size_t) return signed_int; | |
pragma Import (C, setvbuf, "setvbuf"); | |
function sprintf (a1 : access char; a2 : access constant char) | |
return signed_int; | |
pragma Import (C, sprintf, "sprintf"); | |
function sscanf (a1 : access constant char; a2 : access constant char) | |
return signed_int; | |
pragma Import (C, sscanf, "sscanf"); | |
function tmpfile return FILE_ptr; | |
pragma Import (C, tmpfile, "tmpfile"); | |
function tmpnam (a1 : access char) return char_ptr; | |
pragma Import (C, tmpnam, "tmpnam"); | |
function ungetc (a1 : signed_int; a2 : access FILE) return signed_int; | |
pragma Import (C, ungetc, "ungetc"); | |
function vfprintf (a1 : access FILE; a2 : access constant char; | |
a3 : 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 fdopen (a1 : signed_int; a2 : access constant char) | |
return FILE_ptr; | |
pragma Import (C, fdopen, "fdopen"); | |
function fileno (a1 : access FILE) return signed_int; | |
pragma Import (C, fileno, "fileno"); | |
function pclose (a1 : access FILE) return signed_int; | |
pragma Import (C, pclose, "pclose"); | |
function popen (a1 : access constant char; a2 : access constant char) | |
return FILE_ptr; | |
pragma Import (C, popen, "popen"); | |
function 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); | |
procedure flockfile (a1 : access FILE); | |
pragma Import (C, flockfile, "flockfile"); | |
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 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 getw (a1 : access FILE) return signed_int; | |
pragma Import (C, getw, "getw"); | |
function putw (a1 : signed_int; a2 : access FILE) return signed_int; | |
pragma Import (C, putw, "putw"); | |
function tempnam (a1 : access constant char; a2 : access constant char) | |
return char_ptr; | |
pragma Import (C, tempnam, "tempnam"); | |
function 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 snprintf (a1 : access char; a2 : stddef.size_t; | |
a3 : access constant char) return signed_int; | |
pragma Import (C, snprintf, "snprintf"); | |
function vfscanf (a1 : access FILE; a2 : access constant char; | |
a3 : 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 dprintf (a1 : signed_int; a2 : access constant char) | |
return signed_int; | |
pragma Import (C, dprintf, "dprintf"); | |
function vdprintf (a1 : signed_int; a2 : access constant char; | |
a3 : stdarg.va_list) return signed_int; | |
pragma Import (C, vdprintf, "vdprintf"); | |
function getdelim (a1 : access char_ptr; a2 : access stddef.size_t; | |
a3 : signed_int; a4 : access FILE) return sys.types.ssize_t; | |
pragma Import (C, getdelim, "getdelim"); | |
function getline (a1 : access char_ptr; a2 : access stddef.size_t; | |
a3 : access FILE) return sys.types.ssize_t; | |
pragma Import (C, getline, "getline"); | |
sys_nerr : aliased signed_int; | |
pragma Import (C, sys_nerr, "sys_nerr"); | |
sys_errlist : aliased char_const_ptr_array (0 .. 0); | |
pragma Import (C, sys_errlist, "sys_errlist"); | |
function asprintf (a1 : access char_ptr; a2 : access constant char) | |
return signed_int; | |
pragma Import (C, asprintf, "asprintf"); | |
function ctermid_r (a1 : access char) return char_ptr; | |
pragma Import (C, ctermid_r, "ctermid_r"); | |
function fgetln (a1 : access FILE; a2 : access stddef.size_t) | |
return char_ptr; | |
pragma Import (C, fgetln, "fgetln"); | |
function fmtcheck (a1 : access constant char; a2 : access constant char) | |
return char_const_ptr; | |
pragma Import (C, fmtcheck, "fmtcheck"); | |
function fpurge (a1 : access FILE) return signed_int; | |
pragma Import (C, fpurge, "fpurge"); | |
procedure setbuffer (a1 : access FILE; a2 : access char; a3 : signed_int); | |
pragma Import (C, setbuffer, "setbuffer"); | |
function setlinebuf (a1 : access FILE) return signed_int; | |
pragma Import (C, setlinebuf, "setlinebuf"); | |
function vasprintf (a1 : access char_ptr; a2 : access constant char; | |
a3 : stdarg.va_list) return signed_int; | |
pragma Import (C, vasprintf, "vasprintf"); | |
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_16dabe2e; | |
a3 : access_73340703; a4 : access_c62d063e; a5 : access_2a7988bb) | |
return FILE_ptr; | |
pragma Import (C, funopen, "funopen"); | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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_741f9b6d is record | |
quot : aliased signed_int; | |
F_rem : aliased signed_int; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_741f9b6d); | |
subtype div_t is struct_741f9b6d; | |
type struct_76620ff5 is record | |
quot : aliased signed_long; | |
F_rem : aliased signed_long; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_76620ff5); | |
subtype ldiv_t is struct_76620ff5; | |
type struct_f4569da0 is record | |
quot : aliased signed_long_long; | |
F_rem : aliased signed_long_long; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_f4569da0); | |
subtype lldiv_t is struct_f4569da0; | |
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_9fd997c5 is access function (a1 : void_const_ptr; | |
a2 : void_const_ptr) return signed_int; | |
pragma Convention (C, access_9fd997c5); | |
function bsearch (a1 : void_const_ptr; a2 : void_const_ptr; | |
a3 : stddef.size_t; a4 : stddef.size_t; a5 : access_9fd997c5) | |
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"); | |
function posix_memalign (a1 : access void_ptr; a2 : stddef.size_t; | |
a3 : stddef.size_t) return signed_int; | |
pragma Import (C, posix_memalign, "posix_memalign"); | |
procedure qsort (a1 : void_ptr; a2 : stddef.size_t; a3 : stddef.size_t; | |
a4 : access_9fd997c5); | |
pragma Import (C, qsort, "qsort"); | |
function rand return signed_int; | |
pragma Import (C, rand, "rand"); | |
function realloc (a1 : void_ptr; a2 : stddef.size_t) return void_ptr; | |
pragma Import (C, realloc, "realloc"); | |
procedure srand (a1 : unsigned_int); | |
pragma Import (C, srand, "srand"); | |
function strtod (a1 : access constant char; a2 : access char_ptr) | |
return double; | |
pragma Import (C, strtod, "strtod"); | |
function strtof (a1 : access constant char; a2 : access char_ptr) | |
return float; | |
pragma Import (C, strtof, "strtof"); | |
function strtol (a1 : access constant char; a2 : access char_ptr; | |
a3 : signed_int) return signed_long; | |
pragma Import (C, strtol, "strtol"); | |
function strtold (a1 : access constant char; a2 : access char_ptr) | |
return long_double; | |
pragma Import (C, strtold, "strtold"); | |
function 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"); | |
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"); | |
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"); | |
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"); | |
function arc4random return i386.types.u_int32_t; | |
pragma Import (C, arc4random, "arc4random"); | |
procedure arc4random_addrandom (a1 : access unsigned_char; | |
a2 : signed_int); | |
pragma Import (C, arc4random_addrandom, "arc4random_addrandom"); | |
procedure arc4random_buf (a1 : void_ptr; a2 : stddef.size_t); | |
pragma Import (C, arc4random_buf, "arc4random_buf"); | |
procedure arc4random_stir; | |
pragma Import (C, arc4random_stir, "arc4random_stir"); | |
function arc4random_uniform (a1 : i386.types.u_int32_t) | |
return i386.types.u_int32_t; | |
pragma Import (C, arc4random_uniform, "arc4random_uniform"); | |
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_9fd997c5) return signed_int; | |
pragma Import (C, heapsort, "heapsort"); | |
function mergesort (a1 : void_ptr; a2 : stddef.size_t; a3 : stddef.size_t; | |
a4 : access_9fd997c5) return signed_int; | |
pragma Import (C, mergesort, "mergesort"); | |
procedure psort (a1 : void_ptr; a2 : stddef.size_t; a3 : stddef.size_t; | |
a4 : access_9fd997c5); | |
pragma Import (C, psort, "psort"); | |
type access_9fcc07ab is access function (a1 : void_ptr; | |
a2 : void_const_ptr; a3 : void_const_ptr) return signed_int; | |
pragma Convention (C, access_9fcc07ab); | |
procedure psort_r (a1 : void_ptr; a2 : stddef.size_t; a3 : stddef.size_t; | |
a4 : void_ptr; a5 : access_9fcc07ab); | |
pragma Import (C, psort_r, "psort_r"); | |
procedure qsort_r (a1 : void_ptr; a2 : stddef.size_t; a3 : stddef.size_t; | |
a4 : void_ptr; a5 : access_9fcc07ab); | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 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"); | |
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 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 strtok_r (a1 : access char; a2 : access constant char; | |
a3 : access char_ptr) return char_ptr; | |
pragma Import (C, strtok_r, "strtok_r"); | |
function strerror_r (a1 : signed_int; a2 : access char; | |
a3 : stddef.size_t) return signed_int; | |
pragma Import (C, strerror_r, "strerror_r"); | |
function strdup (a1 : access constant char) return char_ptr; | |
pragma Import (C, strdup, "strdup"); | |
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 stpcpy (a1 : access char; a2 : access constant char) | |
return char_ptr; | |
pragma Import (C, stpcpy, "stpcpy"); | |
function stpncpy (a1 : access char; a2 : access constant char; | |
a3 : stddef.size_t) return char_ptr; | |
pragma Import (C, stpncpy, "stpncpy"); | |
function strndup (a1 : access constant char; a2 : stddef.size_t) | |
return char_ptr; | |
pragma Import (C, strndup, "strndup"); | |
function strnlen (a1 : access constant char; a2 : stddef.size_t) | |
return stddef.size_t; | |
pragma Import (C, strnlen, "strnlen"); | |
function strsignal (sig : signed_int) return char_ptr; | |
pragma Import (C, strsignal, "strsignal"); | |
function memmem (a1 : void_const_ptr; a2 : stddef.size_t; | |
a3 : void_const_ptr; a4 : stddef.size_t) return void_ptr; | |
pragma Import (C, memmem, "memmem"); | |
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 strcasestr (a1 : access constant char; a2 : access constant char) | |
return char_ptr; | |
pragma Import (C, strcasestr, "strcasestr"); | |
function strnstr (a1 : access constant char; a2 : access constant char; | |
a3 : stddef.size_t) return char_ptr; | |
pragma Import (C, strnstr, "strnstr"); | |
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 strsep (a1 : access char_ptr; a2 : access constant char) | |
return char_ptr; | |
pragma Import (C, strsep, "strsep"); | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
with C.stddef; | |
package C.strings is | |
pragma Preelaborate; | |
function bcmp (a1 : void_const_ptr; a2 : void_const_ptr; | |
a3 : stddef.size_t) return signed_int; | |
pragma Import (C, bcmp, "bcmp"); | |
procedure bcopy (a1 : void_const_ptr; a2 : void_ptr; a3 : stddef.size_t); | |
pragma Import (C, bcopy, "bcopy"); | |
procedure bzero (a1 : void_ptr; a2 : stddef.size_t); | |
pragma Import (C, bzero, "bzero"); | |
function index (a1 : access constant char; a2 : signed_int) | |
return char_ptr; | |
pragma Import (C, index, "index"); | |
function rindex (a1 : access constant char; a2 : signed_int) | |
return char_ptr; | |
pragma Import (C, rindex, "rindex"); | |
function ffs (a1 : signed_int) return signed_int; | |
pragma Import (C, ffs, "ffs"); | |
function strcasecmp (a1 : access constant char; a2 : access constant char) | |
return signed_int; | |
pragma Import (C, strcasecmp, "strcasecmp"); | |
function strncasecmp (a1 : access constant char; | |
a2 : access constant char; a3 : stddef.size_t) return signed_int; | |
pragma Import (C, strncasecmp, "strncasecmp"); | |
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"); | |
-- _STRINGS_H_ (empty) | |
end C.strings; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 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 types.u_long; | |
timelimit : aliased 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_fssearchblock_ptr is access all struct_fssearchblock; | |
for struct_fssearchblock_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_fssearchblock_ptr); | |
pragma Convention (C, struct_fssearchblock_ptr); | |
type struct_searchstate; | |
type struct_searchstate is record | |
reserved : aliased types.u_char_array (0 .. 555); | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_searchstate); | |
type struct_searchstate_ptr is access all struct_searchstate; | |
for struct_searchstate_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_searchstate_ptr); | |
pragma Convention (C, struct_searchstate_ptr); | |
ATTR_BIT_MAP_COUNT : constant := 5; | |
ATTR_CMN_ACCESSMASK : constant := 131072; | |
ATTR_CMN_ACCTIME : constant := 4096; | |
ATTR_CMN_ADDEDTIME : constant := 268435456; | |
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_FULLPATH : constant := 134217728; | |
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_RETURNED_ATTRS : constant := -2147483648; | |
ATTR_CMN_SCRIPT : constant := 256; | |
ATTR_CMN_SETMASK : constant := 29884160; | |
ATTR_CMN_USERACCESS : constant := 2097152; | |
ATTR_CMN_UUID : constant := 8388608; | |
ATTR_CMN_VALIDMASK : constant := -1612185601; | |
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 := 14335; | |
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_UUID : constant := 262144; | |
ATTR_VOL_VALIDMASK : constant := -1073217537; | |
DIR_MNTSTATUS_MNTPOINT : constant := 1; | |
DIR_MNTSTATUS_TRIGGER : constant := 2; | |
FSOPT_NOFOLLOW : constant := 1; | |
FSOPT_NOINMEMUPDATE : constant := 2; | |
FSOPT_PACK_INVAL_ATTRS : constant := 8; | |
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_64BIT_OBJECT_IDS : constant := 131072; | |
VOL_CAP_FMT_CASE_PRESERVING : constant := 512; | |
VOL_CAP_FMT_CASE_SENSITIVE : constant := 256; | |
VOL_CAP_FMT_DECMPFS_COMPRESSION : constant := 65536; | |
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_NO_VOLUME_SIZES : constant := 32768; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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_64_BIT_INODE : constant := 1; | |
DARWIN_FEATURE_ONLY_UNIX_CONFORMANCE : constant := 1; | |
DARWIN_FEATURE_UNIX_CONFORMANCE : constant := 3; | |
-- __BEGIN_DECLS (empty) | |
-- __CAST_AWAY_QUALIFIER (unparsible) | |
-- __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 := 1; | |
-- __DARWIN_ALIAS (function macro) | |
-- __DARWIN_ALIAS_C (function macro) | |
-- __DARWIN_ALIAS_I (function macro) | |
-- __DARWIN_ALIAS_STARTING (has # or ##) | |
DARWIN_C_ANSI : constant := 4096; | |
DARWIN_C_FULL : constant := 900000; | |
DARWIN_C_LEVEL : constant := 900000; | |
-- __DARWIN_EXTSN (function macro) | |
-- __DARWIN_EXTSN_C (function macro) | |
-- __DARWIN_INODE64 (function macro) | |
DARWIN_NON_CANCELABLE : constant := 0; | |
-- __DARWIN_NO_LONG_LONG (unparsible) | |
DARWIN_ONLY_64_BIT_INO_T : constant := 0; | |
DARWIN_ONLY_UNIX_CONFORMANCE : constant := 1; | |
DARWIN_ONLY_VERS_1050 : constant := 0; | |
DARWIN_SUF_1050 : constant char_array (0 .. 5) := "$1050" & char'Val (0); | |
DARWIN_SUF_64_BIT_INO_T : constant char_array (0 .. 8) := "$INODE64" | |
& char'Val (0); | |
DARWIN_SUF_EXTSN : constant char_array (0 .. 13) := "$DARWIN_EXTSN" | |
& char'Val (0); | |
-- __DARWIN_SUF_NON_CANCELABLE (empty) | |
-- __DARWIN_SUF_UNIX03 (empty) | |
DARWIN_UNIX03 : constant := 1; | |
DARWIN_VERS_1050 : constant := 1; | |
-- __END_DECLS (empty) | |
-- __FBSDID (empty) | |
-- __IDSTRING (unparsible) | |
-- __P (function macro) | |
-- __POSIX_C_DEPRECATED (has # or ##) | |
-- __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) | |
-- __unavailable (attribute) | |
-- __unused (attribute) | |
-- __used (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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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.dirent is | |
pragma Preelaborate; | |
type struct_dirent; | |
type struct_dirent is record | |
d_ino : aliased i386.qtypes.uint64_t; | |
d_seekoff : aliased i386.qtypes.uint64_t; | |
d_reclen : aliased i386.qtypes.uint16_t; | |
d_namlen : aliased i386.qtypes.uint16_t; | |
d_type : aliased i386.qtypes.uint8_t; | |
d_name : aliased char_array (0 .. 1023); | |
end record; | |
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); | |
type struct_dirent_const_ptr is access constant struct_dirent; | |
for struct_dirent_const_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_dirent_const_ptr); | |
pragma Convention (C, struct_dirent_const_ptr); | |
type struct_dirent_const_ptr_ptr is access all struct_dirent_const_ptr; | |
for struct_dirent_const_ptr_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_dirent_const_ptr_ptr); | |
pragma Convention (C, struct_dirent_const_ptr_ptr); | |
-- 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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 := 106; | |
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; | |
ENOTRECOVERABLE : constant := 104; | |
ENOTSOCK : constant := 38; | |
ENOTSUP : constant := 45; | |
ENOTTY : constant := 25; | |
ENXIO : constant := 6; | |
EOPNOTSUPP : constant := 102; | |
EOVERFLOW : constant := 84; | |
EOWNERDEAD : constant := 105; | |
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; | |
EQFULL : constant := 106; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 stdint.int16_t; | |
flags : aliased stdint.uint16_t; | |
fflags : aliased stdint.uint32_t; | |
data : aliased stdint.intptr_t; | |
udata : aliased void_ptr; | |
end record; | |
for struct_kevent'Alignment use 8; | |
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_kevent64_s; | |
type struct_kevent64_s is record | |
ident : aliased stdint.uint64_t; | |
filter : aliased stdint.int16_t; | |
flags : aliased stdint.uint16_t; | |
fflags : aliased stdint.uint32_t; | |
data : aliased stdint.int64_t; | |
udata : aliased stdint.uint64_t; | |
ext : aliased stdint.uint64_t_array (0 .. 1); | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_kevent64_s); | |
type struct_kevent64_s_const_ptr is access constant struct_kevent64_s; | |
for struct_kevent64_s_const_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_kevent64_s_const_ptr); | |
pragma Convention (C, struct_kevent64_s_const_ptr); | |
type struct_kevent64_s_ptr is access all struct_kevent64_s; | |
for struct_kevent64_s_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_kevent64_s_ptr); | |
pragma Convention (C, struct_kevent64_s_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 qstructs.struct_timespec) return signed_int; | |
pragma Import (C, kevent, "kevent"); | |
function kevent64 (kq : signed_int; | |
changelist : access constant struct_kevent64_s; nchanges : signed_int; | |
eventlist : access struct_kevent64_s; nevents : signed_int; | |
flags : unsigned_int; | |
timeout : access constant qstructs.struct_timespec) return signed_int; | |
pragma Import (C, kevent64, "kevent64"); | |
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 := 13; | |
EVFILT_THREADMARKER : constant := 13; | |
EVFILT_TIMER : constant := -7; | |
EVFILT_USER : constant := -10; | |
EVFILT_VM : constant := -12; | |
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_DISPATCH : constant := 128; | |
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_SET64 (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_EXITSTATUS : constant := 67108864; | |
NOTE_EXIT_REPARENTED : constant := 524288; | |
NOTE_EXTEND : constant := 4; | |
NOTE_FFAND : constant := 1073741824; | |
NOTE_FFCOPY : constant := -1073741824; | |
NOTE_FFCTRLMASK : constant := -1073741824; | |
NOTE_FFLAGSMASK : constant := 16777215; | |
NOTE_FFNOP : constant := 0; | |
NOTE_FFOR : constant := -2147483648; | |
NOTE_FORK : constant := 1073741824; | |
NOTE_LINK : constant := 16; | |
NOTE_LOWAT : constant := 1; | |
NOTE_NONE : constant := 128; | |
NOTE_NSECONDS : constant := 4; | |
NOTE_PCTRLMASK : constant := -1048576; | |
NOTE_PDATAMASK : constant := 1048575; | |
NOTE_REAP : constant := 268435456; | |
NOTE_RENAME : constant := 32; | |
NOTE_RESOURCEEND : constant := 33554432; | |
NOTE_REVOKE : constant := 64; | |
NOTE_SECONDS : constant := 1; | |
NOTE_SIGNAL : constant := 134217728; | |
NOTE_TRACK : constant := 1; | |
NOTE_TRACKERR : constant := 2; | |
NOTE_TRIGGER : constant := 16777216; | |
NOTE_USECONDS : constant := 2; | |
NOTE_VM_ERROR : constant := 268435456; | |
NOTE_VM_PRESSURE : constant := -2147483648; | |
NOTE_VM_PRESSURE_SUDDEN_TERMINATE : constant := 536870912; | |
NOTE_VM_PRESSURE_TERMINATE : constant := 1073741824; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 types.off_t; | |
l_len : aliased types.off_t; | |
l_pid : aliased 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 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 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 types.off_t; | |
fst_length : aliased types.off_t; | |
fst_bytesalloc : aliased 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 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 types.off_t; | |
l2p_devoffset : aliased 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_1e8ea41d is (FILESEC_OWNER, FILESEC_GROUP, FILESEC_UUID, | |
FILESEC_MODE, FILESEC_ACL, FILESEC_GRPUUID, FILESEC_ACL_RAW, | |
FILESEC_ACL_ALLOCSIZE); | |
for enum_1e8ea41d 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_1e8ea41d); | |
subtype filesec_property_t is enum_1e8ea41d; | |
function open (a1 : access constant char; a2 : signed_int) | |
return signed_int; | |
function open (a1 : access constant char; a2 : signed_int; | |
a3 : types.mode_t) return signed_int; | |
pragma Import (C, open, "open"); | |
function creat (a1 : access constant char; a2 : types.mode_t) | |
return signed_int; | |
pragma Import (C, creat, "creat"); | |
function fcntl (a1 : signed_int; a2 : signed_int) return signed_int; | |
function fcntl (a1 : signed_int; a2 : signed_int; a3 : access char) | |
return signed_int; | |
function fcntl (a1 : signed_int; a2 : signed_int; a3 : signed_int) | |
return signed_int; | |
pragma Import (C, fcntl, "fcntl"); | |
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 open_dprotected_np (a1 : access constant char; a2 : signed_int; | |
a3 : signed_int; a4 : signed_int) return signed_int; | |
pragma Import (C, open_dprotected_np, "open_dprotected_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_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"); | |
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_unset_property (a1 : access struct_filesec; | |
a2 : filesec_property_t) return signed_int; | |
pragma Import (C, filesec_unset_property, "filesec_unset_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; | |
FFDSYNC : constant := 4194304; | |
FFSYNC : constant := 128; | |
FILESEC_GUID : constant enum_1e8ea41d := FILESEC_UUID; | |
FNDELAY : constant := 4; | |
FNONBLOCK : constant := 4; | |
FREAD : constant := 1; | |
FWRITE : constant := 2; | |
F_ADDFILESIGS : constant := 61; | |
F_ADDSIGS : constant := 59; | |
F_ALLOCATEALL : constant := 4; | |
F_ALLOCATECONTIG : constant := 2; | |
F_CHKCLEAN : constant := 41; | |
F_DUPFD : constant := 0; | |
F_DUPFD_CLOEXEC : constant := 67; | |
F_FLUSH_DATA : constant := 40; | |
F_FREEZE_FS : constant := 53; | |
F_FULLFSYNC : constant := 51; | |
F_GETFD : constant := 1; | |
F_GETFL : constant := 3; | |
F_GETLK : constant := 7; | |
F_GETLKPID : constant := 66; | |
F_GETNOSIGPIPE : constant := 74; | |
F_GETOWN : constant := 5; | |
F_GETPATH : constant := 50; | |
F_GETPATH_MTMINFO : constant := 71; | |
F_GETPROTECTIONCLASS : constant := 63; | |
F_GETPROTECTIONLEVEL : constant := 77; | |
F_GLOBAL_NOCACHE : constant := 55; | |
F_LOG2PHYS : constant := 49; | |
F_LOG2PHYS_EXT : constant := 65; | |
F_MARKDEPENDENCY : constant := 60; | |
F_NOCACHE : constant := 48; | |
F_NODIRECT : constant := 62; | |
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_SETBACKINGSTORE : constant := 70; | |
F_SETFD : constant := 2; | |
F_SETFL : constant := 4; | |
F_SETLK : constant := 8; | |
F_SETLKW : constant := 9; | |
F_SETNOSIGPIPE : constant := 73; | |
F_SETOWN : constant := 6; | |
F_SETPROTECTIONCLASS : constant := 64; | |
F_SETSIZE : constant := 43; | |
F_SINGLE_WRITER : constant := 76; | |
F_THAW_FS : constant := 54; | |
F_TRANSCODEKEY : constant := 75; | |
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_CLOEXEC : constant := 16777216; | |
O_CREAT : constant := 512; | |
O_DIRECTORY : constant := 1048576; | |
O_DP_GETRAWENCRYPTED : constant := 1; | |
O_DSYNC : constant := 4194304; | |
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_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) | |
qFILESEC_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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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.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 fcntl.enum_1e8ea41d | |
renames fcntl.FILESEC_OWNER; | |
function FILESEC_GROUP return fcntl.enum_1e8ea41d | |
renames fcntl.FILESEC_GROUP; | |
function FILESEC_UUID return fcntl.enum_1e8ea41d | |
renames fcntl.FILESEC_UUID; | |
function FILESEC_MODE return fcntl.enum_1e8ea41d | |
renames fcntl.FILESEC_MODE; | |
function FILESEC_ACL return fcntl.enum_1e8ea41d renames fcntl.FILESEC_ACL; | |
function FILESEC_GRPUUID return fcntl.enum_1e8ea41d | |
renames fcntl.FILESEC_GRPUUID; | |
function FILESEC_ACL_RAW return fcntl.enum_1e8ea41d | |
renames fcntl.FILESEC_ACL_RAW; | |
function FILESEC_ACL_ALLOCSIZE return fcntl.enum_1e8ea41d | |
renames 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 : types.mode_t) return signed_int renames sys.fcntl.open; | |
function creat (a1 : access constant char; a2 : 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 open_dprotected_np (a1 : access constant char; a2 : signed_int; | |
a3 : signed_int; a4 : signed_int) return signed_int | |
renames sys.fcntl.open_dprotected_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_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; | |
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_unset_property (a1 : access sys.fcntl.struct_filesec; | |
a2 : sys.fcntl.filesec_property_t) return signed_int | |
renames sys.fcntl.filesec_unset_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; | |
FFDSYNC : constant := sys.fcntl.FFDSYNC; | |
FFSYNC : constant := sys.fcntl.FFSYNC; | |
FILESEC_GUID : sys.fcntl.enum_1e8ea41d 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_ADDFILESIGS : constant := sys.fcntl.F_ADDFILESIGS; | |
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_DUPFD_CLOEXEC : constant := sys.fcntl.F_DUPFD_CLOEXEC; | |
F_FLUSH_DATA : constant := sys.fcntl.F_FLUSH_DATA; | |
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_GETLKPID : constant := sys.fcntl.F_GETLKPID; | |
F_GETNOSIGPIPE : constant := sys.fcntl.F_GETNOSIGPIPE; | |
F_GETOWN : constant := sys.fcntl.F_GETOWN; | |
F_GETPATH : constant := sys.fcntl.F_GETPATH; | |
F_GETPATH_MTMINFO : constant := sys.fcntl.F_GETPATH_MTMINFO; | |
F_GETPROTECTIONCLASS : constant := sys.fcntl.F_GETPROTECTIONCLASS; | |
F_GETPROTECTIONLEVEL : constant := sys.fcntl.F_GETPROTECTIONLEVEL; | |
F_GLOBAL_NOCACHE : constant := sys.fcntl.F_GLOBAL_NOCACHE; | |
F_LOG2PHYS : constant := sys.fcntl.F_LOG2PHYS; | |
F_LOG2PHYS_EXT : constant := sys.fcntl.F_LOG2PHYS_EXT; | |
F_MARKDEPENDENCY : constant := sys.fcntl.F_MARKDEPENDENCY; | |
F_NOCACHE : constant := sys.fcntl.F_NOCACHE; | |
F_NODIRECT : constant := sys.fcntl.F_NODIRECT; | |
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_SETBACKINGSTORE : constant := sys.fcntl.F_SETBACKINGSTORE; | |
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_SETNOSIGPIPE : constant := sys.fcntl.F_SETNOSIGPIPE; | |
F_SETOWN : constant := sys.fcntl.F_SETOWN; | |
F_SETPROTECTIONCLASS : constant := sys.fcntl.F_SETPROTECTIONCLASS; | |
F_SETSIZE : constant := sys.fcntl.F_SETSIZE; | |
F_SINGLE_WRITER : constant := sys.fcntl.F_SINGLE_WRITER; | |
F_THAW_FS : constant := sys.fcntl.F_THAW_FS; | |
F_TRANSCODEKEY : constant := sys.fcntl.F_TRANSCODEKEY; | |
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_CLOEXEC : constant := sys.fcntl.O_CLOEXEC; | |
O_CREAT : constant := sys.fcntl.O_CREAT; | |
O_DIRECTORY : constant := sys.fcntl.O_DIRECTORY; | |
O_DP_GETRAWENCRYPTED : constant := sys.fcntl.O_DP_GETRAWENCRYPTED; | |
O_DSYNC : constant := sys.fcntl.O_DSYNC; | |
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_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) | |
qFILESEC_UNSET_PROPERTY : void_ptr | |
renames sys.fcntl.qFILESEC_UNSET_PROPERTY; | |
-- SYS_FCNTL_H renames sys.fcntl.SYS_FCNTL_H (empty) | |
-- _SYS_FILE_H_ (empty) | |
end C.sys.file; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 ttycom.struct_winsize; | |
PPPDISC : constant := ttycom.PPPDISC; | |
SLIPDISC : constant := ttycom.SLIPDISC; | |
TABLDISC : constant := ttycom.TABLDISC; | |
TIOCCBRK : constant := ttycom.TIOCCBRK; | |
TIOCCDTR : constant := ttycom.TIOCCDTR; | |
TIOCCONS : constant := ttycom.TIOCCONS; | |
TIOCDCDTIMESTAMP : constant := ttycom.TIOCDCDTIMESTAMP; | |
TIOCDRAIN : constant := ttycom.TIOCDRAIN; | |
TIOCDSIMICROCODE : constant := ttycom.TIOCDSIMICROCODE; | |
TIOCEXCL : constant := ttycom.TIOCEXCL; | |
TIOCEXT : constant := ttycom.TIOCEXT; | |
TIOCFLUSH : constant := ttycom.TIOCFLUSH; | |
TIOCGDRAINWAIT : constant := ttycom.TIOCGDRAINWAIT; | |
TIOCGETA : constant := ttycom.TIOCGETA; | |
TIOCGETD : constant := ttycom.TIOCGETD; | |
TIOCGPGRP : constant := ttycom.TIOCGPGRP; | |
TIOCGWINSZ : constant := ttycom.TIOCGWINSZ; | |
TIOCIXOFF : constant := ttycom.TIOCIXOFF; | |
TIOCIXON : constant := ttycom.TIOCIXON; | |
TIOCMBIC : constant := ttycom.TIOCMBIC; | |
TIOCMBIS : constant := ttycom.TIOCMBIS; | |
TIOCMGDTRWAIT : constant := ttycom.TIOCMGDTRWAIT; | |
TIOCMGET : constant := ttycom.TIOCMGET; | |
TIOCMODG : constant := ttycom.TIOCMODG; | |
TIOCMODS : constant := ttycom.TIOCMODS; | |
TIOCMSDTRWAIT : constant := ttycom.TIOCMSDTRWAIT; | |
TIOCMSET : constant := ttycom.TIOCMSET; | |
TIOCM_CAR : constant := ttycom.TIOCM_CAR; | |
TIOCM_CD : constant := ttycom.TIOCM_CD; | |
TIOCM_CTS : constant := ttycom.TIOCM_CTS; | |
TIOCM_DSR : constant := ttycom.TIOCM_DSR; | |
TIOCM_DTR : constant := ttycom.TIOCM_DTR; | |
TIOCM_LE : constant := ttycom.TIOCM_LE; | |
TIOCM_RI : constant := ttycom.TIOCM_RI; | |
TIOCM_RNG : constant := ttycom.TIOCM_RNG; | |
TIOCM_RTS : constant := ttycom.TIOCM_RTS; | |
TIOCM_SR : constant := ttycom.TIOCM_SR; | |
TIOCM_ST : constant := ttycom.TIOCM_ST; | |
TIOCNOTTY : constant := ttycom.TIOCNOTTY; | |
TIOCNXCL : constant := ttycom.TIOCNXCL; | |
TIOCOUTQ : constant := ttycom.TIOCOUTQ; | |
TIOCPKT : constant := ttycom.TIOCPKT; | |
TIOCPKT_DATA : constant := ttycom.TIOCPKT_DATA; | |
TIOCPKT_DOSTOP : constant := ttycom.TIOCPKT_DOSTOP; | |
TIOCPKT_FLUSHREAD : constant := ttycom.TIOCPKT_FLUSHREAD; | |
TIOCPKT_FLUSHWRITE : constant := ttycom.TIOCPKT_FLUSHWRITE; | |
TIOCPKT_IOCTL : constant := ttycom.TIOCPKT_IOCTL; | |
TIOCPKT_NOSTOP : constant := ttycom.TIOCPKT_NOSTOP; | |
TIOCPKT_START : constant := ttycom.TIOCPKT_START; | |
TIOCPKT_STOP : constant := ttycom.TIOCPKT_STOP; | |
TIOCPTYGNAME : constant := ttycom.TIOCPTYGNAME; | |
TIOCPTYGRANT : constant := ttycom.TIOCPTYGRANT; | |
TIOCPTYUNLK : constant := ttycom.TIOCPTYUNLK; | |
TIOCREMOTE : constant := ttycom.TIOCREMOTE; | |
TIOCSBRK : constant := ttycom.TIOCSBRK; | |
TIOCSCONS : constant := ttycom.TIOCSCONS; | |
TIOCSCTTY : constant := ttycom.TIOCSCTTY; | |
TIOCSDRAINWAIT : constant := ttycom.TIOCSDRAINWAIT; | |
TIOCSDTR : constant := ttycom.TIOCSDTR; | |
TIOCSETA : constant := ttycom.TIOCSETA; | |
TIOCSETAF : constant := ttycom.TIOCSETAF; | |
TIOCSETAW : constant := ttycom.TIOCSETAW; | |
TIOCSETD : constant := ttycom.TIOCSETD; | |
TIOCSIG : constant := ttycom.TIOCSIG; | |
TIOCSPGRP : constant := ttycom.TIOCSPGRP; | |
TIOCSTART : constant := ttycom.TIOCSTART; | |
TIOCSTAT : constant := ttycom.TIOCSTAT; | |
TIOCSTI : constant := ttycom.TIOCSTI; | |
TIOCSTOP : constant := ttycom.TIOCSTOP; | |
TIOCSWINSZ : constant := ttycom.TIOCSWINSZ; | |
TIOCTIMESTAMP : constant := ttycom.TIOCTIMESTAMP; | |
TIOCUCNTL : constant := ttycom.TIOCUCNTL; | |
TTYDISC : constant := ttycom.TTYDISC; | |
-- UIOCCMD renames ttycom.UIOCCMD (function macro) | |
-- SYS_TTYCOM_H renames ttycom.SYS_TTYCOM_H (empty) | |
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 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 : types.off_t) return void_ptr; | |
pragma Import (C, mmap, "mmap"); | |
function mprotect (a1 : void_ptr; a2 : stddef.size_t; a3 : signed_int) | |
return signed_int; | |
pragma Import (C, mprotect, "mprotect"); | |
function msync (a1 : void_ptr; a2 : stddef.size_t; a3 : signed_int) | |
return signed_int; | |
pragma Import (C, msync, "msync"); | |
function munlock (a1 : void_const_ptr; a2 : stddef.size_t) | |
return signed_int; | |
pragma Import (C, munlock, "munlock"); | |
function munmap (a1 : void_ptr; a2 : stddef.size_t) return signed_int; | |
pragma Import (C, munmap, "munmap"); | |
function 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_CAN_REUSE : constant := 9; | |
MADV_DONTNEED : constant := 4; | |
MADV_FREE : constant := 5; | |
MADV_FREE_REUSABLE : constant := 7; | |
MADV_FREE_REUSE : constant := 8; | |
MADV_NORMAL : constant := 0; | |
MADV_RANDOM : constant := 1; | |
MADV_SEQUENTIAL : constant := 2; | |
MADV_WILLNEED : constant := 3; | |
MADV_ZERO_WIRED_PAGES : constant := 6; | |
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_JIT : constant := 2048; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 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_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 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_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 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 proc.struct_vnode_ptr; | |
type struct_vfsconf; | |
type struct_vfsconf is record | |
vfc_reserved1 : aliased stdint.uint32_t; | |
vfc_name : aliased char_array (0 .. 14); | |
vfc_typenum : aliased signed_int; | |
vfc_refcount : aliased signed_int; | |
vfc_flags : aliased signed_int; | |
vfc_reserved2 : aliased stdint.uint32_t; | |
vfc_reserved3 : aliased stdint.uint32_t; | |
end record; | |
pragma Convention (C_Pass_By_Copy, 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_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$INODE64"); | |
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$INODE64"); | |
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$INODE64"); | |
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$INODE64"); | |
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 := 1024; | |
MNT_ASYNC : constant := 64; | |
MNT_AUTOMOUNTED : constant := 4194304; | |
MNT_CMDFLAGS : constant := 983040; | |
MNT_CPROTECT : constant := 128; | |
MNT_DEFWRITE : constant := 33554432; | |
MNT_DONTBROWSE : constant := 1048576; | |
MNT_DOVOLFS : constant := 32768; | |
MNT_DWAIT : constant := 4; | |
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_NOBLOCK : constant := 131072; | |
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 := 401667583; | |
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_DISC : constant := 65544; | |
VFS_CTL_NEWADDR : constant := 65540; | |
VFS_CTL_NOLOCKS : constant := 65542; | |
VFS_CTL_QUERY : constant := 65539; | |
VFS_CTL_SADDR : constant := 65543; | |
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_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_SYNCEVENT : constant := 1024; | |
VQ_UNMOUNT : constant := 16; | |
VQ_UPDATE : constant := 256; | |
VQ_VERYLOWDISK : constant := 512; | |
-- _SYS_MOUNT_H_ (empty) | |
-- __DARWIN_STRUCT_STATFS64 (unparsible) | |
private | |
type struct_mount is null record; | |
end C.sys.mount; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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; | |
PSPIN : constant := 2048; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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"); | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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_54409deb is record | |
p_forw : aliased struct_proc_ptr; | |
p_back : aliased struct_proc_ptr; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_54409deb); | |
type union_17ac0f6d (Unchecked_Tag : unsigned_int := 0) is record | |
case Unchecked_Tag is | |
when 0 => | |
p_st1 : struct_54409deb; | |
when others => | |
p_starttime : qstructs.struct_timeval; | |
end case; | |
end record; | |
pragma Unchecked_Union (union_17ac0f6d); | |
pragma Convention (C_Pass_By_Copy, union_17ac0f6d); | |
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_17ac0f6d; | |
p_vmspace : aliased vm.struct_vmspace_ptr; | |
p_sigacts : aliased struct_sigacts_ptr; | |
p_flag : aliased signed_int; | |
p_stat : aliased char; | |
p_pid : aliased types.pid_t; | |
p_oppid : aliased types.pid_t; | |
p_dupfd : aliased signed_int; | |
user_stack : aliased types.caddr_t; | |
exit_thread : aliased void_ptr; | |
p_debugger : aliased signed_int; | |
sigwait : aliased mach.i386.boolean.boolean_t; | |
p_estcpu : aliased types.u_int; | |
p_cpticks : aliased signed_int; | |
p_pctcpu : aliased types.fixpt_t; | |
p_wchan : aliased void_ptr; | |
p_wmesg : aliased char_ptr; | |
p_swtime : aliased types.u_int; | |
p_slptime : aliased types.u_int; | |
p_realtimer : aliased time.struct_itimerval; | |
p_rtime : aliased qstructs.struct_timeval; | |
p_uticks : aliased types.u_quad_t; | |
p_sticks : aliased types.u_quad_t; | |
p_iticks : aliased 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 ucontext.sigset_t; | |
p_sigignore : aliased ucontext.sigset_t; | |
p_sigcatch : aliased ucontext.sigset_t; | |
p_priority : aliased types.u_char; | |
p_usrpri : aliased 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 types.u_short; | |
p_acflag : aliased types.u_short; | |
p_ru : aliased resource.struct_rusage_ptr; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_extern_proc); | |
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_DELAYIDLESLEEP : constant := 262144; | |
P_DEPENDENCY_CAPABLE : constant := 1048576; | |
P_DIRTY : constant := 4; | |
P_DIRTY_ALLOW_IDLE_EXIT : constant := 2; | |
P_DIRTY_BUSY : constant := 32; | |
P_DIRTY_CAN_IDLE_EXIT : constant := 3; | |
P_DIRTY_IS_DIRTY : constant := 12; | |
P_DIRTY_SHUTDOWN : constant := 8; | |
P_DIRTY_TERMINATED : constant := 16; | |
P_DIRTY_TRACK : constant := 1; | |
P_DISABLE_ASLR : constant := 4096; | |
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_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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.qposix_availability is | |
pragma Preelaborate; | |
-- ___POSIX_C_DEPRECATED_STARTING_198808L (empty) | |
-- ___POSIX_C_DEPRECATED_STARTING_199009L (empty) | |
-- ___POSIX_C_DEPRECATED_STARTING_199209L (empty) | |
-- ___POSIX_C_DEPRECATED_STARTING_199309L (empty) | |
-- ___POSIX_C_DEPRECATED_STARTING_199506L (empty) | |
-- ___POSIX_C_DEPRECATED_STARTING_200112L (empty) | |
-- ___POSIX_C_DEPRECATED_STARTING_200809L (empty) | |
end C.sys.qposix_availability; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 qstructs.fd_set; | |
a3 : access qstructs.fd_set; a4 : access qstructs.fd_set; | |
a5 : access qstructs.struct_timeval) return signed_int; | |
pragma Import (C, C_select, "select$1050"); | |
-- _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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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 constant 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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_const_ptr is access constant struct_fd_set; | |
for struct_fd_set_const_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_fd_set_const_ptr); | |
pragma Convention (C, struct_fd_set_const_ptr); | |
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 constant 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 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_mcontext64_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 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.qsymbol_aliasing is | |
pragma Preelaborate; | |
-- __DARWIN_ALIAS_STARTING_IPHONE___IPHONE_2_0 (empty) | |
-- __DARWIN_ALIAS_STARTING_IPHONE___IPHONE_2_1 (empty) | |
-- __DARWIN_ALIAS_STARTING_IPHONE___IPHONE_2_2 (empty) | |
-- __DARWIN_ALIAS_STARTING_IPHONE___IPHONE_3_0 (empty) | |
-- __DARWIN_ALIAS_STARTING_IPHONE___IPHONE_3_1 (empty) | |
-- __DARWIN_ALIAS_STARTING_IPHONE___IPHONE_3_2 (empty) | |
-- __DARWIN_ALIAS_STARTING_IPHONE___IPHONE_4_0 (empty) | |
-- __DARWIN_ALIAS_STARTING_IPHONE___IPHONE_4_1 (empty) | |
-- __DARWIN_ALIAS_STARTING_IPHONE___IPHONE_4_2 (empty) | |
-- __DARWIN_ALIAS_STARTING_IPHONE___IPHONE_4_3 (empty) | |
-- __DARWIN_ALIAS_STARTING_IPHONE___IPHONE_5_0 (empty) | |
-- __DARWIN_ALIAS_STARTING_IPHONE___IPHONE_5_1 (empty) | |
-- __DARWIN_ALIAS_STARTING_MAC___MAC_10_0 (function macro) | |
-- __DARWIN_ALIAS_STARTING_MAC___MAC_10_1 (function macro) | |
-- __DARWIN_ALIAS_STARTING_MAC___MAC_10_2 (function macro) | |
-- __DARWIN_ALIAS_STARTING_MAC___MAC_10_3 (function macro) | |
-- __DARWIN_ALIAS_STARTING_MAC___MAC_10_4 (function macro) | |
-- __DARWIN_ALIAS_STARTING_MAC___MAC_10_5 (function macro) | |
-- __DARWIN_ALIAS_STARTING_MAC___MAC_10_6 (function macro) | |
-- __DARWIN_ALIAS_STARTING_MAC___MAC_10_7 (function macro) | |
-- __DARWIN_ALIAS_STARTING_MAC___MAC_10_8 (function macro) | |
end C.sys.qsymbol_aliasing; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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_6d471cd7 is access procedure (a1 : void_ptr); | |
pragma Convention (C, access_6d471cd7); | |
type struct_darwin_pthread_handler_rec is record | |
routine : aliased access_6d471cd7; | |
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 .. 55); | |
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 .. 39); | |
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 .. 7); | |
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 .. 55); | |
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 .. 7); | |
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 .. 191); | |
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 .. 15); | |
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 .. 1167); | |
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 darwin_ino64_t; | |
subtype darwin_mach_port_name_t is i386.qtypes.darwin_natural_t; | |
subtype darwin_mach_port_t is darwin_mach_port_name_t; | |
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); | |
subtype darwin_uuid_string_t is char_array (0 .. 36); | |
-- _SYS__TYPES_H_ (empty) | |
DARWIN_NULL : constant void_ptr := void_ptr (System'To_Address (0)); | |
qqPTHREAD_ATTR_SIZEqq : constant := 56; | |
qqPTHREAD_CONDATTR_SIZEqq : constant := 8; | |
qqPTHREAD_COND_SIZEqq : constant := 40; | |
qqPTHREAD_MUTEXATTR_SIZEqq : constant := 8; | |
qqPTHREAD_MUTEX_SIZEqq : constant := 56; | |
qqPTHREAD_ONCE_SIZEqq : constant := 8; | |
qqPTHREAD_RWLOCKATTR_SIZEqq : constant := 16; | |
qqPTHREAD_RWLOCK_SIZEqq : constant := 192; | |
qqPTHREAD_SIZEqq : constant := 1168; | |
end C.sys.qtypes; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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) | |
-- LIST_SWAP (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_AFTER (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_AFTER (unparsible) | |
-- STAILQ_REMOVE_HEAD (unparsible) | |
-- STAILQ_REMOVE_HEAD_UNTIL (unparsible) | |
-- STAILQ_SWAP (unparsible) | |
-- TAILQ_CONCAT (unparsible) | |
-- TAILQ_EMPTY (unparsible) | |
-- TAILQ_ENTRY (unparsible) | |
-- TAILQ_FIRST (unparsible) | |
-- TAILQ_FOREACH (unparsible) | |
-- TAILQ_FOREACH_REVERSE (unparsible) | |
-- TAILQ_FOREACH_REVERSE_SAFE (unparsible) | |
-- TAILQ_FOREACH_SAFE (unparsible) | |
-- TAILQ_HEAD (unparsible) | |
-- TAILQ_HEAD_INITIALIZER (unparsible) | |
-- TAILQ_INIT (unparsible) | |
-- TAILQ_INSERT_AFTER (unparsible) | |
-- TAILQ_INSERT_BEFORE (unparsible) | |
-- TAILQ_INSERT_HEAD (unparsible) | |
-- TAILQ_INSERT_TAIL (unparsible) | |
-- TAILQ_LAST (unparsible) | |
-- TAILQ_NEXT (unparsible) | |
-- TAILQ_PREV (unparsible) | |
-- TAILQ_REMOVE (unparsible) | |
-- TAILQ_SWAP (unparsible) | |
-- TRACEBUF (empty) | |
-- TRASHIT (empty) | |
-- _SYS_QUEUE_H_ (empty) | |
end C.sys.queue; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 qstructs.struct_timeval; | |
ru_stime : aliased 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 : 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"); | |
function getrusage (a1 : signed_int; a2 : access struct_rusage) | |
return signed_int; | |
pragma Import (C, getrusage, "getrusage"); | |
function setpriority (a1 : signed_int; a2 : 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"); | |
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; | |
IOPOL_UTILITY : constant := 4; | |
PRIO_DARWIN_BG : constant := 4096; | |
PRIO_DARWIN_NONUI : constant := 4097; | |
PRIO_DARWIN_PROCESS : constant := 4; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 qstructs.fd_set; | |
a3 : access qstructs.fd_set; a4 : access qstructs.fd_set; | |
a5 : access constant qstructs.struct_timespec; | |
a6 : access constant ucontext.sigset_t) return signed_int; | |
pragma Import (C, pselect, "pselect$1050"); | |
-- _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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- 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_e270aebc is access procedure (a1 : union_sigval); | |
pragma Convention (C, access_e270aebc); | |
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_e270aebc; | |
sigev_notify_attributes : aliased 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 types.pid_t; | |
si_uid : aliased 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_af5b653e is access procedure (a1 : signed_int); | |
pragma Convention (C, access_af5b653e); | |
function Cast is new Ada.Unchecked_Conversion (signed_long, | |
access_af5b653e); | |
type access_7e548e41 is access procedure (a1 : signed_int; | |
a2 : access struct_siginfo; a3 : void_ptr); | |
pragma Convention (C, access_7e548e41); | |
type union_sigaction_u (Unchecked_Tag : unsigned_int := 0) is record | |
case Unchecked_Tag is | |
when 0 => | |
sa_handler : access_af5b653e; | |
when others => | |
sa_sigaction : access_7e548e41; | |
end case; | |
end record; | |
pragma Unchecked_Union (union_sigaction_u); | |
pragma Convention (C_Pass_By_Copy, union_sigaction_u); | |
type struct_qqsigaction; | |
type access_ca173a8b is access procedure (a1 : void_ptr; a2 : signed_int; | |
a3 : signed_int; a4 : access siginfo_t; a5 : void_ptr); | |
pragma Convention (C, access_ca173a8b); | |
type struct_qqsigaction is record | |
sigaction_u : aliased union_sigaction_u; | |
sa_tramp : aliased access_ca173a8b; | |
sa_mask : aliased 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 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_af5b653e; | |
type struct_sigvec; | |
type struct_sigvec is record | |
sv_handler : aliased access_af5b653e; | |
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_af5b653e) | |
return access_af5b653e; | |
pragma Import (C, signal, "signal"); | |
function BADSIG (Value : signed_long := signed_long'(-1)) | |
return access_af5b653e 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; | |
function SIG_DFL (Value : signed_long := signed_long'(0)) | |
return access_af5b653e renames Cast; | |
function SIG_ERR (Value : signed_long := signed_long'(-1)) | |
return access_af5b653e renames Cast; | |
function SIG_HOLD (Value : signed_long := signed_long'(5)) | |
return access_af5b653e renames Cast; | |
function SIG_IGN (Value : signed_long := signed_long'(1)) | |
return access_af5b653e 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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; | |
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_so_np_extensions; | |
type struct_so_np_extensions is record | |
npx_flags : aliased i386.types.u_int32_t; | |
npx_mask : aliased i386.types.u_int32_t; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_so_np_extensions); | |
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_sockaddr_storage_ptr is access all struct_sockaddr_storage; | |
for struct_sockaddr_storage_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_sockaddr_storage_ptr); | |
pragma Convention (C, struct_sockaddr_storage_ptr); | |
type struct_msghdr; | |
type struct_msghdr is record | |
msg_name : aliased void_ptr; | |
msg_namelen : aliased socklen_t; | |
msg_iov : aliased 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 uio.struct_iovec_ptr; | |
hdr_cnt : aliased signed_int; | |
trailers : aliased 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"); | |
function bind (a1 : signed_int; a2 : access constant struct_sockaddr; | |
a3 : socklen_t) return signed_int; | |
pragma Import (C, bind, "bind"); | |
function connect (a1 : signed_int; a2 : access constant struct_sockaddr; | |
a3 : socklen_t) return signed_int; | |
pragma Import (C, connect, "connect"); | |
function getpeername (a1 : signed_int; a2 : access struct_sockaddr; | |
a3 : access socklen_t) return signed_int; | |
pragma Import (C, getpeername, "getpeername"); | |
function getsockname (a1 : signed_int; a2 : access struct_sockaddr; | |
a3 : access socklen_t) return signed_int; | |
pragma Import (C, getsockname, "getsockname"); | |
function getsockopt (a1 : signed_int; a2 : signed_int; a3 : signed_int; | |
a4 : void_ptr; a5 : access socklen_t) return signed_int; | |
pragma Import (C, getsockopt, "getsockopt"); | |
function listen (a1 : signed_int; a2 : signed_int) return signed_int; | |
pragma Import (C, listen, "listen"); | |
function recv (a1 : signed_int; a2 : void_ptr; a3 : stddef.size_t; | |
a4 : signed_int) return types.ssize_t; | |
pragma Import (C, recv, "recv"); | |
function recvfrom (a1 : signed_int; a2 : void_ptr; a3 : stddef.size_t; | |
a4 : signed_int; a5 : access struct_sockaddr; a6 : access socklen_t) | |
return types.ssize_t; | |
pragma Import (C, recvfrom, "recvfrom"); | |
function recvmsg (a1 : signed_int; a2 : access struct_msghdr; | |
a3 : signed_int) return types.ssize_t; | |
pragma Import (C, recvmsg, "recvmsg"); | |
function send (a1 : signed_int; a2 : void_const_ptr; a3 : stddef.size_t; | |
a4 : signed_int) return types.ssize_t; | |
pragma Import (C, send, "send"); | |
function sendmsg (a1 : signed_int; a2 : access constant struct_msghdr; | |
a3 : signed_int) return types.ssize_t; | |
pragma Import (C, sendmsg, "sendmsg"); | |
function sendto (a1 : signed_int; a2 : void_const_ptr; a3 : stddef.size_t; | |
a4 : signed_int; a5 : access constant struct_sockaddr; a6 : socklen_t) | |
return types.ssize_t; | |
pragma Import (C, sendto, "sendto"); | |
function 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"); | |
function sendfile (a1 : signed_int; a2 : signed_int; a3 : types.off_t; | |
a4 : access 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_IEEE80211 : constant := 37; | |
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 := 39; | |
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; | |
AF_UTUN : constant := 38; | |
-- 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 := 39; | |
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 := 10; | |
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 := 39; | |
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_UTUN : constant := 38; | |
PF_VLAN : constant := 1986814318; | |
PF_XTP : constant := 19; | |
SCM_CREDS : constant := 3; | |
SCM_RIGHTS : constant := 1; | |
SCM_TIMESTAMP : constant := 2; | |
SCM_TIMESTAMP_MONOTONIC : constant := 4; | |
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; | |
SONPX_SETOPTSHUT : constant := 1; | |
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_NP_EXTENSIONS : constant := 4227; | |
SO_NREAD : constant := 4128; | |
SO_NWRITE : constant := 4132; | |
SO_OOBINLINE : constant := 256; | |
SO_PEERLABEL : constant := 4113; | |
SO_RANDOMPORT : constant := 4226; | |
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_TIMESTAMP_MONOTONIC : constant := 2048; | |
SO_TYPE : constant := 4104; | |
SO_UPCALLCLOSEWAIT : constant := 4135; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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_CLOEXEC_DEFAULT : constant := 16384; | |
POSIX_SPAWN_PCONTROL_KILL : constant := 3; | |
POSIX_SPAWN_PCONTROL_NONE : constant := 0; | |
POSIX_SPAWN_PCONTROL_SUSPEND : constant := 2; | |
POSIX_SPAWN_PCONTROL_THROTTLE : constant := 1; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 fcntl.enum_1e8ea41d | |
renames fcntl.FILESEC_OWNER; | |
function FILESEC_GROUP return fcntl.enum_1e8ea41d | |
renames fcntl.FILESEC_GROUP; | |
function FILESEC_UUID return fcntl.enum_1e8ea41d | |
renames fcntl.FILESEC_UUID; | |
function FILESEC_MODE return fcntl.enum_1e8ea41d | |
renames fcntl.FILESEC_MODE; | |
function FILESEC_ACL return fcntl.enum_1e8ea41d renames fcntl.FILESEC_ACL; | |
function FILESEC_GRPUUID return fcntl.enum_1e8ea41d | |
renames fcntl.FILESEC_GRPUUID; | |
function FILESEC_ACL_RAW return fcntl.enum_1e8ea41d | |
renames fcntl.FILESEC_ACL_RAW; | |
function FILESEC_ACL_ALLOCSIZE return fcntl.enum_1e8ea41d | |
renames 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 : types.mode_t) return signed_int renames sys.fcntl.open; | |
function creat (a1 : access constant char; a2 : 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 open_dprotected_np (a1 : access constant char; a2 : signed_int; | |
a3 : signed_int; a4 : signed_int) return signed_int | |
renames sys.fcntl.open_dprotected_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_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; | |
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_unset_property (a1 : access sys.fcntl.struct_filesec; | |
a2 : sys.fcntl.filesec_property_t) return signed_int | |
renames sys.fcntl.filesec_unset_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; | |
FFDSYNC : constant := sys.fcntl.FFDSYNC; | |
FFSYNC : constant := sys.fcntl.FFSYNC; | |
FILESEC_GUID : sys.fcntl.enum_1e8ea41d 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_ADDFILESIGS : constant := sys.fcntl.F_ADDFILESIGS; | |
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_DUPFD_CLOEXEC : constant := sys.fcntl.F_DUPFD_CLOEXEC; | |
F_FLUSH_DATA : constant := sys.fcntl.F_FLUSH_DATA; | |
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_GETLKPID : constant := sys.fcntl.F_GETLKPID; | |
F_GETNOSIGPIPE : constant := sys.fcntl.F_GETNOSIGPIPE; | |
F_GETOWN : constant := sys.fcntl.F_GETOWN; | |
F_GETPATH : constant := sys.fcntl.F_GETPATH; | |
F_GETPATH_MTMINFO : constant := sys.fcntl.F_GETPATH_MTMINFO; | |
F_GETPROTECTIONCLASS : constant := sys.fcntl.F_GETPROTECTIONCLASS; | |
F_GETPROTECTIONLEVEL : constant := sys.fcntl.F_GETPROTECTIONLEVEL; | |
F_GLOBAL_NOCACHE : constant := sys.fcntl.F_GLOBAL_NOCACHE; | |
F_LOG2PHYS : constant := sys.fcntl.F_LOG2PHYS; | |
F_LOG2PHYS_EXT : constant := sys.fcntl.F_LOG2PHYS_EXT; | |
F_MARKDEPENDENCY : constant := sys.fcntl.F_MARKDEPENDENCY; | |
F_NOCACHE : constant := sys.fcntl.F_NOCACHE; | |
F_NODIRECT : constant := sys.fcntl.F_NODIRECT; | |
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_SETBACKINGSTORE : constant := sys.fcntl.F_SETBACKINGSTORE; | |
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_SETNOSIGPIPE : constant := sys.fcntl.F_SETNOSIGPIPE; | |
F_SETOWN : constant := sys.fcntl.F_SETOWN; | |
F_SETPROTECTIONCLASS : constant := sys.fcntl.F_SETPROTECTIONCLASS; | |
F_SETSIZE : constant := sys.fcntl.F_SETSIZE; | |
F_SINGLE_WRITER : constant := sys.fcntl.F_SINGLE_WRITER; | |
F_THAW_FS : constant := sys.fcntl.F_THAW_FS; | |
F_TRANSCODEKEY : constant := sys.fcntl.F_TRANSCODEKEY; | |
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_CLOEXEC : constant := sys.fcntl.O_CLOEXEC; | |
O_CREAT : constant := sys.fcntl.O_CREAT; | |
O_DIRECTORY : constant := sys.fcntl.O_DIRECTORY; | |
O_DP_GETRAWENCRYPTED : constant := sys.fcntl.O_DP_GETRAWENCRYPTED; | |
O_DSYNC : constant := sys.fcntl.O_DSYNC; | |
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_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) | |
qFILESEC_UNSET_PROPERTY : void_ptr | |
renames sys.fcntl.qFILESEC_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 types.ino_t; | |
st_mode : aliased types.mode_t; | |
st_nlink : aliased 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 qstructs.struct_timespec; | |
st_mtim : aliased qstructs.struct_timespec; | |
st_ctim : aliased 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 types.dev_t; | |
st_mode : aliased types.mode_t; | |
st_nlink : aliased types.nlink_t; | |
st_ino : aliased qtypes.darwin_ino64_t; | |
st_uid : aliased types.uid_t; | |
st_gid : aliased types.gid_t; | |
st_rdev : aliased types.dev_t; | |
st_atim : aliased qstructs.struct_timespec; | |
st_mtim : aliased qstructs.struct_timespec; | |
st_ctim : aliased qstructs.struct_timespec; | |
st_birthtimespec : aliased qstructs.struct_timespec; | |
st_size : aliased types.off_t; | |
st_blocks : aliased types.blkcnt_t; | |
st_blksize : aliased 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 types.dev_t; | |
st_mode : aliased types.mode_t; | |
st_nlink : aliased types.nlink_t; | |
st_ino : aliased qtypes.darwin_ino64_t; | |
st_uid : aliased types.uid_t; | |
st_gid : aliased types.gid_t; | |
st_rdev : aliased types.dev_t; | |
st_atim : aliased qstructs.struct_timespec; | |
st_mtim : aliased qstructs.struct_timespec; | |
st_ctim : aliased qstructs.struct_timespec; | |
st_birthtimespec : aliased qstructs.struct_timespec; | |
st_size : aliased types.off_t; | |
st_blocks : aliased types.blkcnt_t; | |
st_blksize : aliased 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 : types.mode_t) | |
return signed_int; | |
pragma Import (C, chmod, "chmod"); | |
function fchmod (a1 : signed_int; a2 : types.mode_t) return signed_int; | |
pragma Import (C, fchmod, "fchmod"); | |
function fstat (a1 : signed_int; a2 : access struct_stat) | |
return signed_int; | |
pragma Import (C, fstat, "fstat$INODE64"); | |
function lstat (a1 : access constant char; a2 : access struct_stat) | |
return signed_int; | |
pragma Import (C, lstat, "lstat$INODE64"); | |
function mkdir (a1 : access constant char; a2 : types.mode_t) | |
return signed_int; | |
pragma Import (C, mkdir, "mkdir"); | |
function mkfifo (a1 : access constant char; a2 : types.mode_t) | |
return signed_int; | |
pragma Import (C, mkfifo, "mkfifo"); | |
function stat (a1 : access constant char; a2 : access struct_stat) | |
return signed_int; | |
pragma Import (C, stat, "stat$INODE64"); | |
function umask (a1 : types.mode_t) return 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$INODE64"); | |
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 : 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$INODE64"); | |
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$INODE64"); | |
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_TYPEISMQ (function macro) | |
-- S_TYPEISSEM (function macro) | |
-- S_TYPEISSHM (function macro) | |
-- S_TYPEISTMO (function macro) | |
UF_APPEND : constant := 4; | |
UF_COMPRESSED : constant := 32; | |
UF_HIDDEN : constant := 32768; | |
UF_IMMUTABLE : constant := 2; | |
UF_NODUMP : constant := 1; | |
UF_OPAQUE : constant := 8; | |
UF_SETTABLE : constant := 65535; | |
UF_TRACKED : constant := 64; | |
-- _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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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 := 440; | |
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_old_semwait_signal : constant := 370; | |
SYS_old_semwait_signal_nocancel : constant := 371; | |
SYS_pthread_canceled : constant := 333; | |
SYS_pthread_chdir : constant := 348; | |
SYS_pthread_fchdir : constant := 349; | |
SYS_pthread_kill : constant := 328; | |
SYS_pthread_markcancel : constant := 332; | |
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_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_audit_session_join : constant := 429; | |
SYS_audit_session_port : constant := 432; | |
SYS_audit_session_self : constant := 428; | |
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_csops_audittoken : constant := 170; | |
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_fdatasync : constant := 187; | |
SYS_ffsctl : constant := 245; | |
SYS_fgetattrlist : constant := 228; | |
SYS_fgetxattr : constant := 235; | |
SYS_fhopen : constant := 248; | |
SYS_fileport_makefd : constant := 431; | |
SYS_fileport_makeport : constant := 430; | |
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_fsetattrlist : constant := 229; | |
SYS_fsetxattr : constant := 237; | |
SYS_fsgetpath : constant := 427; | |
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_fsync : constant := 95; | |
SYS_fsync_nocancel : constant := 408; | |
SYS_ftruncate : constant := 201; | |
SYS_futimes : constant := 139; | |
SYS_getattrlist : constant := 220; | |
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_kas_info : constant := 439; | |
SYS_kdebug_trace : constant := 180; | |
SYS_kevent : constant := 363; | |
SYS_kevent64 : constant := 369; | |
SYS_kill : constant := 37; | |
SYS_kqueue : constant := 362; | |
SYS_lchown : constant := 364; | |
SYS_ledger : constant := 373; | |
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_madvise : constant := 75; | |
SYS_mincore : constant := 78; | |
SYS_minherit : constant := 250; | |
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_open : constant := 5; | |
SYS_open_dprotected_np : constant := 216; | |
SYS_open_extended : constant := 277; | |
SYS_open_nocancel : constant := 398; | |
SYS_pathconf : constant := 191; | |
SYS_pid_hibernate : constant := 435; | |
SYS_pid_resume : constant := 434; | |
SYS_pid_shutdown_sockets : constant := 436; | |
SYS_pid_suspend : constant := 433; | |
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_process_policy : constant := 323; | |
SYS_psynch_cvbroad : constant := 303; | |
SYS_psynch_cvclrprepost : constant := 312; | |
SYS_psynch_cvsignal : constant := 304; | |
SYS_psynch_cvwait : constant := 305; | |
SYS_psynch_mutexdrop : constant := 302; | |
SYS_psynch_mutexwait : constant := 301; | |
SYS_psynch_rw_downgrade : constant := 299; | |
SYS_psynch_rw_longrdlock : constant := 297; | |
SYS_psynch_rw_rdlock : constant := 306; | |
SYS_psynch_rw_unlock : constant := 308; | |
SYS_psynch_rw_unlock2 : constant := 309; | |
SYS_psynch_rw_upgrade : constant := 300; | |
SYS_psynch_rw_wrlock : constant := 307; | |
SYS_psynch_rw_yieldwrlock : constant := 298; | |
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_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_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_and_slide_np : constant := 438; | |
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_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_swapon : constant := 85; | |
SYS_symlink : constant := 57; | |
SYS_sync : constant := 36; | |
SYS_syscall : constant := 0; | |
SYS_thread_selfid : constant := 372; | |
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_vm_pressure_monitor : constant := 296; | |
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_kernreturn : constant := 368; | |
SYS_workq_open : constant := 367; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 ucred.struct_ucred_ptr; | |
p_ruid : aliased types.uid_t; | |
p_svuid : aliased types.uid_t; | |
p_rgid : aliased types.gid_t; | |
p_svgid : aliased 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 types.uid_t; | |
cr_ngroups : aliased signed_short; | |
cr_groups : aliased 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 proc.struct_proc_ptr; | |
e_sess : aliased proc.struct_session_ptr; | |
e_pcred : aliased struct_pcred; | |
e_ucred : aliased struct_ucred; | |
e_vm : aliased vm.struct_vmspace; | |
e_ppid : aliased types.pid_t; | |
e_pgid : aliased types.pid_t; | |
e_jobc : aliased signed_short; | |
e_tdev : aliased types.dev_t; | |
e_tpgid : aliased types.pid_t; | |
e_tsess : aliased proc.struct_session_ptr; | |
e_wmesg : aliased char_array (0 .. 7); | |
e_xsize : aliased 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 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 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 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 : 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_OID2 : constant := 4194304; | |
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_KDDISABLE_BG_TRACE : constant := 20; | |
KERN_KDEBUG : constant := 24; | |
KERN_KDEFLAGS : constant := 1; | |
KERN_KDENABLE : constant := 3; | |
KERN_KDENABLE_BG_TRACE : constant := 19; | |
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_KDSET_TYPEFILTER : constant := 22; | |
KERN_KDTHRMAP : constant := 12; | |
KERN_KDWRITEMAP : constant := 18; | |
KERN_KDWRITETR : constant := 17; | |
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 := 72; | |
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_PANICINFO_NOROOT_TEST : constant := 5; | |
KERN_PANICINFO_TEST : constant := 4; | |
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_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_THREADNAME : constant := 71; | |
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 := 59; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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"); | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 qstructs.struct_fd_set; | |
subtype fd_set is qstructs.fd_set; | |
function qqdarwin_fd_isset (n : signed_int; | |
p : access constant qstructs.struct_fd_set) return signed_int | |
renames qstructs.qqdarwin_fd_isset; | |
subtype struct_darwin_sigaltstack is qstructs.struct_darwin_sigaltstack; | |
subtype struct_darwin_ucontext is qstructs.struct_darwin_ucontext; | |
subtype stack_t is qstructs.stack_t; | |
subtype ucontext_t is qstructs.ucontext_t; | |
subtype struct_timespec is qstructs.struct_timespec; | |
subtype struct_timeval is qstructs.struct_timeval; | |
-- qFD_SET renames qstructs.qFD_SET (empty) | |
-- qSTACK_T renames qstructs.qSTACK_T (empty) | |
subtype STRUCT_SIGALTSTACK is qstructs.struct_darwin_sigaltstack; | |
subtype qSTRUCT_TIMESPEC is qstructs.struct_timespec; | |
subtype qSTRUCT_TIMEVAL is qstructs.struct_timeval; | |
subtype STRUCT_UCONTEXT is qstructs.struct_darwin_ucontext; | |
-- qUCONTEXT_T renames qstructs.qUCONTEXT_T (empty) | |
-- DARWIN_FD_CLR renames qstructs.DARWIN_FD_CLR (uninterpretable) | |
-- DARWIN_FD_COPY renames qstructs.DARWIN_FD_COPY (unparsible) | |
-- qqDARWIN_FD_ISSET renames qstructs.qqDARWIN_FD_ISSET (function macro) | |
-- DARWIN_FD_SET renames qstructs.DARWIN_FD_SET (uninterpretable) | |
DARWIN_FD_SETSIZE : constant := qstructs.DARWIN_FD_SETSIZE; | |
-- DARWIN_FD_ZERO renames qstructs.DARWIN_FD_ZERO (function macro) | |
DARWIN_NBBY : constant := qstructs.DARWIN_NBBY; | |
DARWIN_NFDBITS : constant := qstructs.DARWIN_NFDBITS; | |
-- DARWIN_howmany renames qstructs.DARWIN_howmany (function macro) | |
type struct_itimerval; | |
type struct_itimerval is record | |
it_interval : aliased qstructs.struct_timeval; | |
it_value : aliased 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 qstructs.struct_timeval; | |
a2 : access qstructs.struct_timeval) return signed_int; | |
pragma Import (C, adjtime, "adjtime"); | |
function futimes (a1 : signed_int; | |
a2 : access constant qstructs.struct_timeval) return signed_int; | |
pragma Import (C, futimes, "futimes"); | |
function lutimes (a1 : access constant char; | |
a2 : access constant qstructs.struct_timeval) return signed_int; | |
pragma Import (C, lutimes, "lutimes"); | |
function settimeofday (a1 : access constant 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 qstructs.struct_timeval; a2 : void_ptr) | |
return signed_int; | |
function gettimeofday (a1 : access 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 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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 := 1074820184; | |
TIOCDRAIN : constant := 536900702; | |
TIOCDSIMICROCODE : constant := 536900693; | |
TIOCEXCL : constant := 536900621; | |
TIOCEXT : constant := 2147775584; | |
TIOCFLUSH : constant := 2147775504; | |
TIOCGDRAINWAIT : constant := 1074033750; | |
TIOCGETA : constant := 1078490131; | |
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 := 2152231956; | |
TIOCSETAF : constant := 2152231958; | |
TIOCSETAW : constant := 2152231957; | |
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 := 1074820185; | |
TIOCUCNTL : constant := 2147775590; | |
TTYDISC : constant := 0; | |
-- UIOCCMD (function macro) | |
-- _SYS_TTYCOM_H_ (empty) | |
end C.sys.ttycom; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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_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 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 qtypes.darwin_blkcnt_t; | |
subtype blksize_t is qtypes.darwin_blksize_t; | |
subtype gid_t is qtypes.darwin_gid_t; | |
subtype gid_t_array is qtypes.darwin_gid_t_array; | |
subtype gid_t_ptr is qtypes.darwin_gid_t_ptr; | |
subtype gid_t_const_ptr is 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 qtypes.darwin_ino_t; | |
subtype ino64_t is qtypes.darwin_ino64_t; | |
subtype key_t is i386.qtypes.int32_t; | |
subtype mode_t is qtypes.darwin_mode_t; | |
subtype nlink_t is i386.qtypes.uint16_t; | |
subtype id_t is qtypes.darwin_id_t; | |
subtype pid_t is qtypes.darwin_pid_t; | |
subtype pid_t_ptr is qtypes.darwin_pid_t_ptr; | |
subtype off_t is qtypes.darwin_off_t; | |
subtype off_t_ptr is qtypes.darwin_off_t_ptr; | |
subtype segsz_t is stdint.int32_t; | |
subtype swblk_t is stdint.int32_t; | |
subtype uid_t is qtypes.darwin_uid_t; | |
subtype uid_t_ptr is qtypes.darwin_uid_t_ptr; | |
subtype uid_t_const_ptr is 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 qtypes.darwin_useconds_t; | |
subtype suseconds_t is qtypes.darwin_suseconds_t; | |
-- #include <sys/_structs.h> | |
subtype fd_mask is i386.qtypes.int32_t; | |
subtype pthread_attr_t is qtypes.darwin_pthread_attr_t; | |
subtype pthread_attr_t_ptr is qtypes.darwin_pthread_attr_t_ptr; | |
subtype pthread_attr_t_const_ptr is | |
qtypes.darwin_pthread_attr_t_const_ptr; | |
subtype pthread_cond_t is qtypes.darwin_pthread_cond_t; | |
subtype pthread_cond_t_ptr is qtypes.darwin_pthread_cond_t_ptr; | |
subtype pthread_condattr_t is qtypes.darwin_pthread_condattr_t; | |
subtype pthread_condattr_t_const_ptr is | |
qtypes.darwin_pthread_condattr_t_const_ptr; | |
subtype pthread_condattr_t_ptr is qtypes.darwin_pthread_condattr_t_ptr; | |
subtype pthread_mutex_t is qtypes.darwin_pthread_mutex_t; | |
subtype pthread_mutex_t_ptr is qtypes.darwin_pthread_mutex_t_ptr; | |
subtype pthread_mutex_t_const_ptr is | |
qtypes.darwin_pthread_mutex_t_const_ptr; | |
subtype pthread_mutexattr_t is qtypes.darwin_pthread_mutexattr_t; | |
subtype pthread_mutexattr_t_const_ptr is | |
qtypes.darwin_pthread_mutexattr_t_const_ptr; | |
subtype pthread_mutexattr_t_ptr is qtypes.darwin_pthread_mutexattr_t_ptr; | |
subtype pthread_once_t is qtypes.darwin_pthread_once_t; | |
subtype pthread_once_t_ptr is qtypes.darwin_pthread_once_t_ptr; | |
subtype pthread_rwlock_t is qtypes.darwin_pthread_rwlock_t; | |
subtype pthread_rwlock_t_ptr is qtypes.darwin_pthread_rwlock_t_ptr; | |
subtype pthread_rwlockattr_t is qtypes.darwin_pthread_rwlockattr_t; | |
subtype pthread_rwlockattr_t_const_ptr is | |
qtypes.darwin_pthread_rwlockattr_t_const_ptr; | |
subtype pthread_rwlockattr_t_ptr is | |
qtypes.darwin_pthread_rwlockattr_t_ptr; | |
subtype pthread_t is qtypes.darwin_pthread_t; | |
subtype pthread_t_ptr is qtypes.darwin_pthread_t_ptr; | |
subtype pthread_key_t is qtypes.darwin_pthread_key_t; | |
subtype pthread_key_t_ptr is qtypes.darwin_pthread_key_t_ptr; | |
subtype fsblkcnt_t is qtypes.darwin_fsblkcnt_t; | |
subtype fsfilcnt_t is 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 qstructs.struct_fd_set; | |
subtype fd_set is qstructs.fd_set; | |
function qqdarwin_fd_isset (n : signed_int; | |
p : access constant qstructs.struct_fd_set) return signed_int | |
renames qstructs.qqdarwin_fd_isset; | |
subtype struct_darwin_sigaltstack is qstructs.struct_darwin_sigaltstack; | |
subtype struct_darwin_ucontext is qstructs.struct_darwin_ucontext; | |
subtype stack_t is qstructs.stack_t; | |
subtype ucontext_t is qstructs.ucontext_t; | |
subtype struct_timespec is qstructs.struct_timespec; | |
subtype struct_timeval is qstructs.struct_timeval; | |
-- qFD_SET renames qstructs.qFD_SET (empty) | |
-- qSTACK_T renames qstructs.qSTACK_T (empty) | |
subtype STRUCT_SIGALTSTACK is qstructs.struct_darwin_sigaltstack; | |
subtype qSTRUCT_TIMESPEC is qstructs.struct_timespec; | |
subtype qSTRUCT_TIMEVAL is qstructs.struct_timeval; | |
subtype STRUCT_UCONTEXT is qstructs.struct_darwin_ucontext; | |
-- qUCONTEXT_T renames qstructs.qUCONTEXT_T (empty) | |
-- DARWIN_FD_CLR renames qstructs.DARWIN_FD_CLR (uninterpretable) | |
-- DARWIN_FD_COPY renames qstructs.DARWIN_FD_COPY (unparsible) | |
-- qqDARWIN_FD_ISSET renames qstructs.qqDARWIN_FD_ISSET (function macro) | |
-- DARWIN_FD_SET renames qstructs.DARWIN_FD_SET (uninterpretable) | |
DARWIN_FD_SETSIZE : constant := qstructs.DARWIN_FD_SETSIZE; | |
-- DARWIN_FD_ZERO renames qstructs.DARWIN_FD_ZERO (function macro) | |
DARWIN_NBBY : constant := qstructs.DARWIN_NBBY; | |
DARWIN_NFDBITS : constant := qstructs.DARWIN_NFDBITS; | |
-- DARWIN_howmany renames qstructs.DARWIN_howmany (function macro) | |
subtype sigset_t is qtypes.darwin_sigset_t; | |
subtype sigset_t_const_ptr is qtypes.darwin_sigset_t_const_ptr; | |
subtype sigset_t_ptr is 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- 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_long, | |
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_fe40fd85 is record | |
tqe_next : aliased struct_ucred_ptr; | |
tqe_prev : aliased struct_ucred_ptr_ptr; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_fe40fd85); | |
type struct_posix_cred; | |
type struct_posix_cred is record | |
cr_uid : aliased types.uid_t; | |
cr_ruid : aliased types.uid_t; | |
cr_svuid : aliased types.uid_t; | |
cr_ngroups : aliased signed_short; | |
cr_groups : aliased types.gid_t_array (0 .. 15); | |
cr_rgid : aliased types.gid_t; | |
cr_svgid : aliased types.gid_t; | |
cr_gmuid : aliased types.uid_t; | |
cr_flags : aliased signed_int; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_posix_cred); | |
type struct_posix_cred_ptr is access all struct_posix_cred; | |
for struct_posix_cred_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_posix_cred_ptr); | |
pragma Convention (C, struct_posix_cred_ptr); | |
type struct_ucred is record | |
cr_link : aliased struct_fe40fd85; | |
cr_ref : aliased types.u_long; | |
cr_posix : aliased struct_posix_cred; | |
cr_label : aliased struct_label_ptr; | |
cr_audit : aliased bsm.audit.struct_au_session; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_ucred); | |
subtype kauth_cred_t is struct_ucred_ptr; | |
subtype posix_cred_t is struct_posix_cred_ptr; | |
type struct_xucred; | |
type struct_xucred is record | |
cr_version : aliased types.u_int; | |
cr_uid : aliased types.uid_t; | |
cr_ngroups : aliased signed_short; | |
cr_groups : aliased types.gid_t_array (0 .. 15); | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_xucred); | |
CRF_MAC_ENFORCE : constant := 2; | |
CRF_NOMEMBERD : constant := 1; | |
function FSCRED (Value : signed_long := signed_long'(-1)) | |
return kauth_cred_t renames Cast; | |
-- IS_VALID_CRED (function macro) | |
function NOCRED (Value : signed_long := signed_long'(0)) | |
return kauth_cred_t renames Cast; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 types.ssize_t; | |
pragma Import (C, readv, "readv"); | |
function writev (a1 : signed_int; a2 : access constant struct_iovec; | |
a3 : signed_int) return types.ssize_t; | |
pragma Import (C, writev, "writev"); | |
-- _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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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; | |
PC_XATTR_SIZE_BITS : constant := 26; | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 types.caddr_t; | |
dummy3 : aliased stdint.int32_t_array (0 .. 4); | |
dummy4 : aliased 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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_c5fb6481 is (P_ALL, P_PID, P_PGID); | |
for enum_c5fb6481 use (P_ALL => 0, P_PID => 1, P_PGID => 2); | |
pragma Convention (C, enum_c5fb6481); | |
subtype idtype_t is enum_c5fb6481; | |
type union_wait; | |
type struct_8c9be1b8 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_8c9be1b8 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_8c9be1b8); | |
type struct_f2cf5bfa 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_f2cf5bfa 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_f2cf5bfa); | |
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_8c9be1b8; | |
when others => | |
w_S : struct_f2cf5bfa; | |
end case; | |
end record; | |
pragma Unchecked_Union (union_wait); | |
pragma Convention (C_Pass_By_Copy, union_wait); | |
function wait (a1 : access signed_int) return types.pid_t; | |
pragma Import (C, wait, "wait"); | |
function waitpid (a1 : types.pid_t; a2 : access signed_int; | |
a3 : signed_int) return types.pid_t; | |
pragma Import (C, waitpid, "waitpid"); | |
function waitid (a1 : idtype_t; a2 : types.id_t; | |
a3 : access signal.siginfo_t; a4 : signed_int) return signed_int; | |
pragma Import (C, waitid, "waitid"); | |
function wait3 (a1 : access signed_int; a2 : signed_int; | |
a3 : access resource.struct_rusage) return types.pid_t; | |
pragma Import (C, wait3, "wait3"); | |
function wait4 (a1 : types.pid_t; a2 : access signed_int; a3 : signed_int; | |
a4 : access resource.struct_rusage) return types.pid_t; | |
pragma Import (C, wait4, "wait4"); | |
WAIT_ANY : constant := -1; | |
WAIT_MYPGRP : constant := 0; | |
WCONTINUED : constant := 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
package C.sys is | |
pragma Preelaborate; | |
end C.sys; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 constant 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 (0 .. 0); | |
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"); | |
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"); | |
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"); | |
function strftime (a1 : access char; a2 : stddef.size_t; | |
a3 : access constant char; a4 : access constant struct_tm) | |
return stddef.size_t; | |
pragma Import (C, strftime, "strftime"); | |
function strptime (a1 : access constant char; a2 : access constant char; | |
a3 : access struct_tm) return char_ptr; | |
pragma Import (C, strptime, "strptime"); | |
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"); | |
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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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.attr; | |
with C.sys.qstructs; | |
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; | |
PC_XATTR_SIZE_BITS : constant := sys.unistd.PC_XATTR_SIZE_BITS; | |
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; | |
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"); | |
function dup (a1 : signed_int) return signed_int; | |
pragma Import (C, dup, "dup"); | |
function dup2 (a1 : signed_int; a2 : signed_int) return signed_int; | |
pragma Import (C, dup2, "dup2"); | |
function execl (a1 : access constant char; a2 : access constant char) | |
return signed_int; | |
pragma Import (C, execl, "execl"); | |
function execle (a1 : access constant char; a2 : access constant char) | |
return signed_int; | |
pragma Import (C, execle, "execle"); | |
function execlp (a1 : access constant char; a2 : access constant char) | |
return signed_int; | |
pragma Import (C, execlp, "execlp"); | |
function execv (a1 : access constant char; a2 : access char_ptr) | |
return signed_int; | |
pragma Import (C, execv, "execv"); | |
function execve (a1 : access constant char; a2 : access char_ptr; | |
a3 : access char_ptr) return signed_int; | |
pragma Import (C, execve, "execve"); | |
function execvp (a1 : access constant char; a2 : access char_ptr) | |
return signed_int; | |
pragma Import (C, execvp, "execvp"); | |
function fork return sys.types.pid_t; | |
pragma Import (C, fork, "fork"); | |
function fpathconf (a1 : signed_int; a2 : signed_int) return signed_long; | |
pragma Import (C, fpathconf, "fpathconf"); | |
function getcwd (a1 : access char; a2 : stddef.size_t) return char_ptr; | |
pragma Import (C, getcwd, "getcwd"); | |
function getegid return sys.types.gid_t; | |
pragma Import (C, getegid, "getegid"); | |
function geteuid return sys.types.uid_t; | |
pragma Import (C, geteuid, "geteuid"); | |
function getgid return sys.types.gid_t; | |
pragma Import (C, getgid, "getgid"); | |
function getgroups (a1 : signed_int; a2 : access sys.types.gid_t) | |
return signed_int; | |
pragma Import (C, getgroups, "getgroups"); | |
function getlogin return char_ptr; | |
pragma Import (C, getlogin, "getlogin"); | |
function getpgrp return sys.types.pid_t; | |
pragma Import (C, getpgrp, "getpgrp"); | |
function getpid return sys.types.pid_t; | |
pragma Import (C, getpid, "getpid"); | |
function getppid return sys.types.pid_t; | |
pragma Import (C, getppid, "getppid"); | |
function getuid return sys.types.uid_t; | |
pragma Import (C, getuid, "getuid"); | |
function isatty (a1 : signed_int) return signed_int; | |
pragma Import (C, isatty, "isatty"); | |
function link (a1 : access constant char; a2 : access constant char) | |
return signed_int; | |
pragma Import (C, link, "link"); | |
function lseek (a1 : signed_int; a2 : sys.types.off_t; a3 : signed_int) | |
return sys.types.off_t; | |
pragma Import (C, lseek, "lseek"); | |
function pathconf (a1 : access constant char; a2 : signed_int) | |
return signed_long; | |
pragma Import (C, pathconf, "pathconf"); | |
function pause return signed_int; | |
pragma Import (C, pause, "pause"); | |
function pipe (a1 : access signed_int) return signed_int; | |
pragma Import (C, pipe, "pipe"); | |
function read (a1 : signed_int; a2 : void_ptr; a3 : stddef.size_t) | |
return sys.types.ssize_t; | |
pragma Import (C, read, "read"); | |
function rmdir (a1 : access constant char) return signed_int; | |
pragma Import (C, rmdir, "rmdir"); | |
function setgid (a1 : sys.types.gid_t) return signed_int; | |
pragma Import (C, setgid, "setgid"); | |
function setpgid (a1 : sys.types.pid_t; a2 : sys.types.pid_t) | |
return signed_int; | |
pragma Import (C, setpgid, "setpgid"); | |
function setsid return sys.types.pid_t; | |
pragma Import (C, setsid, "setsid"); | |
function setuid (a1 : sys.types.uid_t) return signed_int; | |
pragma Import (C, setuid, "setuid"); | |
function sleep (a1 : unsigned_int) return unsigned_int; | |
pragma Import (C, sleep, "sleep"); | |
function sysconf (a1 : signed_int) return signed_long; | |
pragma Import (C, sysconf, "sysconf"); | |
function tcgetpgrp (a1 : signed_int) return sys.types.pid_t; | |
pragma Import (C, tcgetpgrp, "tcgetpgrp"); | |
function tcsetpgrp (a1 : signed_int; a2 : sys.types.pid_t) | |
return signed_int; | |
pragma Import (C, tcsetpgrp, "tcsetpgrp"); | |
function ttyname (a1 : signed_int) return char_ptr; | |
pragma Import (C, ttyname, "ttyname"); | |
function ttyname_r (a1 : signed_int; a2 : access char; a3 : stddef.size_t) | |
return signed_int; | |
pragma Import (C, ttyname_r, "ttyname_r"); | |
function unlink (a1 : access constant char) return signed_int; | |
pragma Import (C, unlink, "unlink"); | |
function write (a1 : signed_int; a2 : void_const_ptr; a3 : stddef.size_t) | |
return sys.types.ssize_t; | |
pragma Import (C, write, "write"); | |
function confstr (a1 : signed_int; a2 : access char; a3 : stddef.size_t) | |
return stddef.size_t; | |
pragma Import (C, confstr, "confstr"); | |
function getopt (a1 : signed_int; a2 : access char_ptr; | |
a3 : access constant char) return signed_int; | |
pragma Import (C, getopt, "getopt"); | |
optarg : aliased char_ptr; | |
pragma Import (C, optarg, "optarg"); | |
optind : aliased signed_int; | |
pragma Import (C, optind, "optind"); | |
opterr : aliased signed_int; | |
pragma Import (C, opterr, "opterr"); | |
optopt : aliased signed_int; | |
pragma Import (C, optopt, "optopt"); | |
function 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"); | |
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"); | |
procedure encrypt (a1 : access char; a2 : signed_int); | |
pragma Import (C, encrypt, "encrypt"); | |
function fchdir (a1 : signed_int) return signed_int; | |
pragma Import (C, fchdir, "fchdir"); | |
function gethostid return signed_long; | |
pragma Import (C, gethostid, "gethostid"); | |
function getpgid (a1 : sys.types.pid_t) return sys.types.pid_t; | |
pragma Import (C, getpgid, "getpgid"); | |
function getsid (a1 : sys.types.pid_t) return sys.types.pid_t; | |
pragma Import (C, getsid, "getsid"); | |
function getdtablesize return signed_int; | |
pragma Import (C, getdtablesize, "getdtablesize"); | |
function getpagesize return signed_int; | |
pragma Import (C, getpagesize, "getpagesize"); | |
function getpass (a1 : access constant char) return char_ptr; | |
pragma Import (C, getpass, "getpass"); | |
function getwd (a1 : access char) return char_ptr; | |
pragma Import (C, getwd, "getwd"); | |
function lchown (a1 : access constant char; a2 : sys.types.uid_t; | |
a3 : sys.types.gid_t) return signed_int; | |
pragma Import (C, lchown, "lchown"); | |
function lockf (a1 : signed_int; a2 : signed_int; a3 : sys.types.off_t) | |
return signed_int; | |
pragma Import (C, lockf, "lockf"); | |
function nice (a1 : signed_int) return signed_int; | |
pragma Import (C, nice, "nice"); | |
function pread (a1 : signed_int; a2 : void_ptr; a3 : stddef.size_t; | |
a4 : sys.types.off_t) return sys.types.ssize_t; | |
pragma Import (C, pread, "pread"); | |
function pwrite (a1 : signed_int; a2 : void_const_ptr; a3 : stddef.size_t; | |
a4 : sys.types.off_t) return sys.types.ssize_t; | |
pragma Import (C, pwrite, "pwrite"); | |
function sbrk (a1 : signed_int) return void_ptr; | |
pragma Import (C, sbrk, "sbrk"); | |
function setpgrp return sys.types.pid_t; | |
pragma Import (C, setpgrp, "setpgrp"); | |
function setregid (a1 : sys.types.gid_t; a2 : sys.types.gid_t) | |
return signed_int; | |
pragma Import (C, setregid, "setregid"); | |
function setreuid (a1 : sys.types.uid_t; a2 : sys.types.uid_t) | |
return signed_int; | |
pragma Import (C, setreuid, "setreuid"); | |
procedure sync; | |
pragma Import (C, sync, "sync"); | |
function truncate (a1 : access constant char; a2 : sys.types.off_t) | |
return signed_int; | |
pragma Import (C, truncate, "truncate"); | |
function ualarm (a1 : sys.types.useconds_t; a2 : sys.types.useconds_t) | |
return sys.types.useconds_t; | |
pragma Import (C, ualarm, "ualarm"); | |
function usleep (a1 : sys.types.useconds_t) return signed_int; | |
pragma Import (C, usleep, "usleep"); | |
function vfork return sys.types.pid_t; | |
pragma Import (C, vfork, "vfork"); | |
function fsync (a1 : signed_int) return signed_int; | |
pragma Import (C, fsync, "fsync"); | |
function ftruncate (a1 : signed_int; a2 : sys.types.off_t) | |
return signed_int; | |
pragma Import (C, ftruncate, "ftruncate"); | |
function getlogin_r (a1 : access char; a2 : stddef.size_t) | |
return signed_int; | |
pragma Import (C, getlogin_r, "getlogin_r"); | |
function fchown (a1 : signed_int; a2 : sys.types.uid_t; | |
a3 : sys.types.gid_t) return signed_int; | |
pragma Import (C, fchown, "fchown"); | |
function gethostname (a1 : access char; a2 : stddef.size_t) | |
return signed_int; | |
pragma Import (C, gethostname, "gethostname"); | |
function readlink (a1 : access constant char; a2 : access char; | |
a3 : stddef.size_t) return sys.types.ssize_t; | |
pragma Import (C, readlink, "readlink"); | |
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 symlink (a1 : access constant char; a2 : access constant char) | |
return signed_int; | |
pragma Import (C, symlink, "symlink"); | |
subtype uuid_t is sys.qtypes.darwin_uuid_t; | |
procedure C_qExit_U (a1 : signed_int); | |
pragma No_Return (C_qExit_U); | |
pragma Import (C, C_qExit_U, "_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"); | |
procedure endusershell; | |
pragma Import (C, endusershell, "endusershell"); | |
function execvP_U (a1 : access constant char; a2 : access constant char; | |
a3 : access char_ptr) return signed_int; | |
pragma Import (C, execvP_U, "execvP"); | |
function fflagstostr (a1 : unsigned_long) return char_ptr; | |
pragma Import (C, fflagstostr, "fflagstostr"); | |
function getdomainname (a1 : access char; a2 : signed_int) | |
return signed_int; | |
pragma Import (C, getdomainname, "getdomainname"); | |
function getgrouplist (a1 : access constant char; a2 : signed_int; | |
a3 : access signed_int; a4 : access signed_int) return signed_int; | |
pragma Import (C, getgrouplist, "getgrouplist"); | |
function gethostuuid (a1 : access unsigned_char; | |
a2 : access constant sys.qstructs.struct_timespec) return signed_int; | |
pragma Import (C, gethostuuid, "gethostuuid"); | |
function getmode (a1 : void_const_ptr; a2 : sys.types.mode_t) | |
return sys.types.mode_t; | |
pragma Import (C, getmode, "getmode"); | |
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 mkpath_np (path : access constant char; omode : sys.types.mode_t) | |
return signed_int; | |
pragma Import (C, mkpath_np, "mkpath_np"); | |
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 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"); | |
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 fgetattrlist (a1 : signed_int; a2 : void_ptr; a3 : void_ptr; | |
a4 : stddef.size_t; a5 : unsigned_int) return signed_int; | |
pragma Import (C, fgetattrlist, "fgetattrlist"); | |
function fsetattrlist (a1 : signed_int; a2 : void_ptr; a3 : void_ptr; | |
a4 : stddef.size_t; a5 : unsigned_int) return signed_int; | |
pragma Import (C, fsetattrlist, "fsetattrlist"); | |
function getattrlist (a1 : access constant char; a2 : void_ptr; | |
a3 : void_ptr; a4 : stddef.size_t; a5 : unsigned_int) | |
return signed_int; | |
pragma Import (C, getattrlist, "getattrlist"); | |
function setattrlist (a1 : access constant char; a2 : void_ptr; | |
a3 : void_ptr; a4 : stddef.size_t; a5 : unsigned_int) | |
return signed_int; | |
pragma Import (C, setattrlist, "setattrlist"); | |
function exchangedata (a1 : access constant char; | |
a2 : access constant char; a3 : unsigned_int) 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_int; a6 : access unsigned_int; | |
a7 : access unsigned_int; a8 : unsigned_int) return signed_int; | |
pragma Import (C, getdirentriesattr, "getdirentriesattr"); | |
function searchfs (a1 : access constant char; | |
a2 : access sys.attr.struct_fssearchblock; a3 : access unsigned_long; | |
a4 : unsigned_int; a5 : unsigned_int; | |
a6 : access sys.attr.struct_searchstate) return signed_int; | |
pragma Import (C, searchfs, "searchfs"); | |
function fsctl (a1 : access constant char; a2 : unsigned_long; | |
a3 : void_ptr; a4 : unsigned_int) return signed_int; | |
pragma Import (C, fsctl, "fsctl"); | |
function ffsctl (a1 : signed_int; a2 : unsigned_long; a3 : void_ptr; | |
a4 : unsigned_int) return signed_int; | |
pragma Import (C, ffsctl, "ffsctl"); | |
function fsync_volume_np (a1 : signed_int; a2 : signed_int) | |
return signed_int; | |
pragma Import (C, fsync_volume_np, "fsync_volume_np"); | |
function sync_volume_np (a1 : access constant char; a2 : signed_int) | |
return signed_int; | |
pragma Import (C, sync_volume_np, "sync_volume_np"); | |
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; | |
SYNC_VOLUME_FULLSYNC : constant := 1; | |
SYNC_VOLUME_WAIT : constant := 2; | |
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; | |
POSIX_V6_ILP32_OFF32 : constant := -1; | |
POSIX_V6_ILP32_OFFBIG : constant := 1; | |
POSIX_V6_LP64_OFF64 : constant := 1; | |
POSIX_V6_LPBIG_OFFBIG : constant := 1; | |
POSIX_V7_ILP32_OFF32 : constant := -1; | |
POSIX_V7_ILP32_OFFBIG : constant := 1; | |
POSIX_V7_LP64_OFF64 : constant := 1; | |
POSIX_V7_LPBIG_OFFBIG : 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; | |
CTERMID_DEFINED : constant := 1; | |
ILP32_OFF32 : constant := -1; | |
ILP32_OFFBIG : constant := 1; | |
LP64_OFF64 : constant := 1; | |
LPBIG_OFFBIG : constant := 1; | |
end C.unistd; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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_long; | |
subtype Unwind_Ptr is unsigned_long; | |
subtype Unwind_Internal_Ptr is unsigned_long; | |
subtype Unwind_Exception_Class is unsigned_long; | |
type enum_7c887da7 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_7c887da7 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_7c887da7); | |
subtype Unwind_Reason_Code is enum_7c887da7; | |
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_06abda3b is access procedure (a1 : Unwind_Reason_Code; | |
a2 : access struct_Unwind_Exception); | |
pragma Convention (C, access_06abda3b); | |
subtype Unwind_Exception_Cleanup_Fn is access_06abda3b; | |
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_36dfc762 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_36dfc762); | |
subtype Unwind_Stop_Fn is access_36dfc762; | |
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_1b914165 is access function ( | |
a1 : access struct_Unwind_Context; a2 : void_ptr) | |
return Unwind_Reason_Code; | |
pragma Convention (C, access_1b914165); | |
subtype Unwind_Trace_Fn is access_1b914165; | |
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_fe09522d 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_fe09522d); | |
subtype Unwind_Personality_Fn is access_fe09522d; | |
type struct_SjLj_Function_Context (<>) is limited private; | |
type struct_SjLj_Function_Context_ptr is | |
access all struct_SjLj_Function_Context; | |
for struct_SjLj_Function_Context_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_SjLj_Function_Context_ptr); | |
pragma Convention (C, struct_SjLj_Function_Context_ptr); | |
procedure Unwind_SjLj_Register (a1 : access struct_SjLj_Function_Context); | |
pragma Import (C, Unwind_SjLj_Register, "_Unwind_SjLj_Register"); | |
procedure Unwind_SjLj_Unregister ( | |
a1 : access struct_SjLj_Function_Context); | |
pragma Import (C, Unwind_SjLj_Unregister, "_Unwind_SjLj_Unregister"); | |
function Unwind_SjLj_RaiseException (a1 : access struct_Unwind_Exception) | |
return Unwind_Reason_Code; | |
pragma Import (C, Unwind_SjLj_RaiseException, | |
"_Unwind_SjLj_RaiseException"); | |
function Unwind_SjLj_ForcedUnwind (a1 : access struct_Unwind_Exception; | |
a2 : Unwind_Stop_Fn; a3 : void_ptr) return Unwind_Reason_Code; | |
pragma Import (C, Unwind_SjLj_ForcedUnwind, "_Unwind_SjLj_ForcedUnwind"); | |
procedure Unwind_SjLj_Resume (a1 : access struct_Unwind_Exception); | |
pragma Import (C, Unwind_SjLj_Resume, "_Unwind_SjLj_Resume"); | |
function Unwind_SjLj_Resume_or_Rethrow ( | |
a1 : access struct_Unwind_Exception) return Unwind_Reason_Code; | |
pragma Import (C, Unwind_SjLj_Resume_or_Rethrow, | |
"_Unwind_SjLj_Resume_or_Rethrow"); | |
function Unwind_GetDataRelBase (a1 : access struct_Unwind_Context) | |
return Unwind_Ptr; | |
pragma Import (C, Unwind_GetDataRelBase, "_Unwind_GetDataRelBase"); | |
function Unwind_GetTextRelBase (a1 : access struct_Unwind_Context) | |
return Unwind_Ptr; | |
pragma Import (C, Unwind_GetTextRelBase, "_Unwind_GetTextRelBase"); | |
function Unwind_FindEnclosingFunction (pc : void_ptr) return void_ptr; | |
pragma Import (C, Unwind_FindEnclosingFunction, | |
"_Unwind_FindEnclosingFunction"); | |
subtype sleb128_t is signed_long; | |
subtype uleb128_t is unsigned_long; | |
-- LIBGCC2_UNWIND_ATTRIBUTE (empty) | |
UA_CLEANUP_PHASE : constant := 2; | |
UA_END_OF_STACK : constant := 16; | |
UA_FORCE_UNWIND : constant := 8; | |
UA_HANDLER_FRAME : constant := 4; | |
UA_SEARCH_PHASE : constant := 1; | |
-- _UNWIND_H (empty) | |
private | |
type struct_Unwind_Context is null record; | |
type struct_SjLj_Function_Context is null record; | |
end C.unwind; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
with C.sys.qtypes; | |
package C.uuid.uuid is | |
pragma Preelaborate; | |
subtype uuid_string_t is sys.qtypes.darwin_uuid_string_t; | |
procedure uuid_clear (uu : access unsigned_char); | |
pragma Import (C, uuid_clear, "uuid_clear"); | |
function uuid_compare (uu1 : access unsigned_char; | |
uu2 : access unsigned_char) return signed_int; | |
pragma Import (C, uuid_compare, "uuid_compare"); | |
procedure uuid_copy (dst : access unsigned_char; | |
src : access unsigned_char); | |
pragma Import (C, uuid_copy, "uuid_copy"); | |
procedure uuid_generate (A_out : access unsigned_char); | |
pragma Import (C, uuid_generate, "uuid_generate"); | |
procedure uuid_generate_random (A_out : access unsigned_char); | |
pragma Import (C, uuid_generate_random, "uuid_generate_random"); | |
procedure uuid_generate_time (A_out : access unsigned_char); | |
pragma Import (C, uuid_generate_time, "uuid_generate_time"); | |
function uuid_is_null (uu : access unsigned_char) return signed_int; | |
pragma Import (C, uuid_is_null, "uuid_is_null"); | |
function uuid_parse (A_in : access char; uu : access unsigned_char) | |
return signed_int; | |
pragma Import (C, uuid_parse, "uuid_parse"); | |
procedure uuid_unparse (uu : access unsigned_char; A_out : access char); | |
pragma Import (C, uuid_unparse, "uuid_unparse"); | |
procedure uuid_unparse_lower (uu : access unsigned_char; | |
A_out : access char); | |
pragma Import (C, uuid_unparse_lower, "uuid_unparse_lower"); | |
procedure uuid_unparse_upper (uu : access unsigned_char; | |
A_out : access char); | |
pragma Import (C, uuid_unparse_upper, "uuid_unparse_upper"); | |
-- UUID_DEFINE (unparsible) | |
-- _UUID_STRING_T (empty) | |
-- _UUID_UUID_H (empty) | |
end C.uuid.uuid; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this 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.uuid is | |
pragma Preelaborate; | |
end C.uuid; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All 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 <secure/_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"); | |
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 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 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 mbsnrtowcs (a1 : access stddef.wchar_t; | |
a2 : access char_const_ptr; a3 : stddef.size_t; a4 : stddef.size_t; | |
a5 : access mbstate_t) return stddef.size_t; | |
pragma Import (C, mbsnrtowcs, "mbsnrtowcs"); | |
function wcpcpy (a1 : access stddef.wchar_t; | |
a2 : access constant stddef.wchar_t) return stddef.wchar_t_ptr; | |
pragma Import (C, wcpcpy, "wcpcpy"); | |
function wcpncpy (a1 : access stddef.wchar_t; | |
a2 : access constant stddef.wchar_t; a3 : stddef.size_t) | |
return stddef.wchar_t_ptr; | |
pragma Import (C, wcpncpy, "wcpncpy"); | |
function wcsdup (a1 : access constant stddef.wchar_t) | |
return stddef.wchar_t_ptr; | |
pragma Import (C, wcsdup, "wcsdup"); | |
function wcscasecmp (a1 : access constant stddef.wchar_t; | |
a2 : access constant stddef.wchar_t) return signed_int; | |
pragma Import (C, wcscasecmp, "wcscasecmp"); | |
function wcsncasecmp (a1 : access constant stddef.wchar_t; | |
a2 : access constant stddef.wchar_t; n : stddef.size_t) | |
return signed_int; | |
pragma Import (C, wcsncasecmp, "wcsncasecmp"); | |
function wcsnlen (a1 : access constant stddef.wchar_t; a2 : stddef.size_t) | |
return stddef.size_t; | |
pragma Import (C, wcsnlen, "wcsnlen"); | |
function wcsnrtombs (a1 : access char; | |
a2 : access stddef.wchar_t_const_ptr; a3 : stddef.size_t; | |
a4 : stddef.size_t; a5 : access mbstate_t) return stddef.size_t; | |
pragma Import (C, wcsnrtombs, "wcsnrtombs"); | |
function fgetwln (a1 : access stdio.FILE; a2 : access stddef.size_t) | |
return stddef.wchar_t_ptr; | |
pragma Import (C, fgetwln, "fgetwln"); | |
function wcslcat (a1 : access stddef.wchar_t; | |
a2 : access constant stddef.wchar_t; a3 : stddef.size_t) | |
return stddef.size_t; | |
pragma Import (C, wcslcat, "wcslcat"); | |
function wcslcpy (a1 : access stddef.wchar_t; | |
a2 : access constant stddef.wchar_t; a3 : stddef.size_t) | |
return stddef.size_t; | |
pragma Import (C, wcslcpy, "wcslcpy"); | |
-- _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.30-18d0286 (devel). | |
-- The original C header's license should be applied to this file. | |
-- All conditional-directives are expanded for the exclusive use of your | |
-- environment, it is not recommended to commit this file to any repository. | |
------------------------------------------------------------------------------- | |
with System; | |
package C is | |
pragma Preelaborate; | |
-- type void (<>) is limited private; | |
type bool is new Boolean; | |
pragma Convention (C, bool); | |
type signed_char is new Short_Short_Integer; | |
pragma Convention (C, signed_char); | |
type unsigned_char is mod 2 ** signed_char'Size; | |
pragma Convention (C, unsigned_char); | |
type signed_short is new Short_Integer; | |
pragma Convention (C, signed_short); | |
type unsigned_short is mod 2 ** signed_short'Size; | |
pragma Convention (C, unsigned_short); | |
type signed_int is new Integer; | |
pragma Convention (C, signed_int); | |
type unsigned_int is mod 2 ** signed_int'Size; | |
pragma Convention (C, unsigned_int); | |
type signed_long is new Long_Integer; | |
pragma Convention (C, signed_long); | |
type unsigned_long is mod 2 ** signed_long'Size; | |
pragma Convention (C, unsigned_long); | |
type signed_long_long is new Long_Long_Integer; | |
pragma Convention (C, signed_long_long); | |
type unsigned_long_long is mod 2 ** signed_long_long'Size; | |
pragma Convention (C, unsigned_long_long); | |
type float is new Standard.Float; | |
pragma Convention (C, float); | |
type double is new Long_Float; | |
pragma Convention (C, double); | |
type long_double is new Long_Long_Float; | |
pragma Convention (C, long_double); | |
-- type Float32 is ... | |
-- type Float64 is ... | |
-- type Float128 is ... | |
-- type Float32x is ... | |
-- type Float64x is ... | |
-- type Decimal32 is ... | |
-- type Decimal64 is ... | |
-- type Decimal128 is ... | |
type float_imaginary is new float; | |
pragma Convention (C, float_imaginary); | |
type double_imaginary is new double; | |
pragma Convention (C, double_imaginary); | |
type long_double_imaginary is new long_double; | |
pragma Convention (C, long_double_imaginary); | |
-- type Float32_imaginary is ... | |
-- type Float32x_imaginary is ... | |
-- type Float64_imaginary is ... | |
-- type Float64x_imaginary is ... | |
-- type Float128_imaginary is ... | |
type float_complex is record | |
Re, Im : float'Base; | |
end record; | |
pragma Complex_Representation (float_complex); | |
pragma Convention (C, float_complex); | |
type double_complex is record | |
Re, Im : double'Base; | |
end record; | |
pragma Complex_Representation (double_complex); | |
pragma Convention (C, double_complex); | |
type long_double_complex is record | |
Re, Im : long_double'Base; | |
end record; | |
pragma Complex_Representation (long_double_complex); | |
pragma Convention (C, long_double_complex); | |
-- type Float32_complex is ... | |
-- type Float32x_complex is ... | |
-- type Float64_complex is ... | |
-- type Float64x_complex is ... | |
-- type Float128_complex is ... | |
type char is new Character; | |
type int128_t is record | |
Lo, Hi : unsigned_long_long; | |
end record; | |
pragma Convention (C_Pass_By_Copy, int128_t); | |
type uint128_t is record | |
Lo, Hi : unsigned_long_long; | |
end record; | |
pragma Convention (C_Pass_By_Copy, uint128_t); | |
subtype builtin_va_list is System.Address; | |
type ptrdiff_t is new signed_long; | |
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); | |
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 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 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 unsigned_long_ptr_ptr is access all unsigned_long_ptr; | |
for unsigned_long_ptr_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (unsigned_long_ptr_ptr); | |
pragma Convention (C, unsigned_long_ptr_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_array is array (size_t range <>) of | |
aliased unsigned_long_long; | |
pragma Convention (C, unsigned_long_long_array); | |
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_array37 is char_array (0 .. 36); | |
function "=" (Left, Right : System.Address) return Boolean | |
renames System."="; | |
type size_t_ptr is access all size_t; | |
for size_t_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (size_t_ptr); | |
pragma Convention (C, size_t_ptr); | |
type wchar_t_ptr is access all wchar_t; | |
for wchar_t_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (wchar_t_ptr); | |
pragma Convention (C, wchar_t_ptr); | |
type wchar_t_ptr_ptr is access all wchar_t_ptr; | |
for wchar_t_ptr_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (wchar_t_ptr_ptr); | |
pragma Convention (C, wchar_t_ptr_ptr); | |
type wchar_t_const_ptr is access constant wchar_t; | |
for wchar_t_const_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (wchar_t_const_ptr); | |
pragma Convention (C, wchar_t_const_ptr); | |
type wchar_t_const_ptr_ptr is access all wchar_t_const_ptr; | |
for wchar_t_const_ptr_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (wchar_t_const_ptr_ptr); | |
pragma Convention (C, wchar_t_const_ptr_ptr); | |
type wchar_t_array is array (size_t range <>) of aliased wchar_t; | |
pragma Convention (C, wchar_t_array); | |
function Shift_Left (Left : signed_char; Right : Natural) | |
return signed_char; | |
function Shift_Right_Arithmetic (Left : signed_char; Right : Natural) | |
return signed_char; | |
function Shift_Left (Left : unsigned_char; Right : Natural) | |
return unsigned_char; | |
function Shift_Right (Left : unsigned_char; Right : Natural) | |
return unsigned_char; | |
function Shift_Left (Left : signed_short; Right : Natural) | |
return signed_short; | |
function Shift_Right_Arithmetic (Left : signed_short; Right : Natural) | |
return signed_short; | |
function Shift_Left (Left : unsigned_short; Right : Natural) | |
return unsigned_short; | |
function Shift_Right (Left : unsigned_short; Right : Natural) | |
return unsigned_short; | |
function Shift_Left (Left : signed_int; Right : Natural) | |
return signed_int; | |
function Shift_Right_Arithmetic (Left : signed_int; Right : Natural) | |
return signed_int; | |
function Shift_Left (Left : unsigned_int; Right : Natural) | |
return unsigned_int; | |
function Shift_Right (Left : unsigned_int; Right : Natural) | |
return unsigned_int; | |
function Shift_Left (Left : signed_long; Right : Natural) | |
return signed_long; | |
function Shift_Right_Arithmetic (Left : signed_long; Right : Natural) | |
return signed_long; | |
function Shift_Left (Left : unsigned_long; Right : Natural) | |
return unsigned_long; | |
function Shift_Right (Left : unsigned_long; Right : Natural) | |
return unsigned_long; | |
function Shift_Left (Left : signed_long_long; Right : Natural) | |
return signed_long_long; | |
function Shift_Right_Arithmetic (Left : signed_long_long; Right : Natural) | |
return signed_long_long; | |
function Shift_Left (Left : unsigned_long_long; Right : Natural) | |
return unsigned_long_long; | |
function Shift_Right (Left : unsigned_long_long; Right : Natural) | |
return unsigned_long_long; | |
pragma Import (Intrinsic, Shift_Left); | |
pragma Import (Intrinsic, Shift_Right); | |
pragma Import (Intrinsic, Shift_Right_Arithmetic); | |
LP64 : constant := 1; | |
qqAPPLE_CCqq : constant := 1; | |
qqAPPLEqq : 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; | |
qqBIGGEST_ALIGNMENTqq : constant := 16; | |
qqBYTE_ORDERqq : constant := 1234; | |
subtype qqCHAR16_TYPEqq is unsigned_short; | |
subtype qqCHAR32_TYPEqq is unsigned_int; | |
qqCHAR_BITqq : constant := 8; | |
qqCONSTANT_CFSTRINGSqq : constant := 1; | |
qqDBL_DECIMAL_DIGqq : constant := 17; | |
qqDBL_DENORM_MINqq : constant := 16#0.40000000000000000#e-268; | |
qqDBL_DIGqq : constant := 15; | |
qqDBL_EPSILONqq : constant := 16#0.10000000000000000#e-12; | |
qqDBL_HAS_DENORMqq : constant := 1; | |
qqDBL_HAS_INFINITYqq : constant := 1; | |
qqDBL_HAS_QUIET_NANqq : constant := 1; | |
qqDBL_MANT_DIGqq : constant := 53; | |
qqDBL_MAX_10_EXPqq : constant := 308; | |
qqDBL_MAX_EXPqq : constant := 1024; | |
qqDBL_MAXqq : constant := 16#0.fffffffffffff8000#e+256; | |
qqDBL_MIN_10_EXPqq : constant := -307; | |
qqDBL_MIN_EXPqq : constant := -1021; | |
qqDBL_MINqq : constant := 16#0.40000000000000000#e-255; | |
-- qqDEC128_EPSILONqq (decimal) | |
qqDEC128_MANT_DIGqq : constant := 34; | |
qqDEC128_MAX_EXPqq : constant := 6145; | |
-- qqDEC128_MAXqq (decimal) | |
qqDEC128_MIN_EXPqq : constant := -6142; | |
-- qqDEC128_MINqq (decimal) | |
-- qqDEC128_SUBNORMAL_MINqq (decimal) | |
-- qqDEC32_EPSILONqq (decimal) | |
qqDEC32_MANT_DIGqq : constant := 7; | |
qqDEC32_MAX_EXPqq : constant := 97; | |
-- qqDEC32_MAXqq (decimal) | |
qqDEC32_MIN_EXPqq : constant := -94; | |
-- qqDEC32_MINqq (decimal) | |
-- qqDEC32_SUBNORMAL_MINqq (decimal) | |
-- qqDEC64_EPSILONqq (decimal) | |
qqDEC64_MANT_DIGqq : constant := 16; | |
qqDEC64_MAX_EXPqq : constant := 385; | |
-- qqDEC64_MAXqq (decimal) | |
qqDEC64_MIN_EXPqq : constant := -382; | |
-- qqDEC64_MINqq (decimal) | |
-- qqDEC64_SUBNORMAL_MINqq (decimal) | |
qqDECIMAL_DIGqq : constant := 21; | |
qqDEC_EVAL_METHODqq : constant := 2; | |
qqDYNAMICqq : constant := 1; | |
qqENVIRONMENT_MAC_OS_X_VERSION_MIN_REQUIREDqq : constant := 1080; | |
qqFINITE_MATH_ONLYqq : constant := 0; | |
qqFLOAT_WORD_ORDERqq : constant := 1234; | |
qqFLT128_DECIMAL_DIGqq : constant := 36; | |
-- qqFLT128_DENORM_MINqq (_Float128) | |
qqFLT128_DIGqq : constant := 33; | |
-- qqFLT128_EPSILONqq (_Float128) | |
qqFLT128_HAS_DENORMqq : constant := 1; | |
qqFLT128_HAS_INFINITYqq : constant := 1; | |
qqFLT128_HAS_QUIET_NANqq : constant := 1; | |
qqFLT128_MANT_DIGqq : constant := 113; | |
qqFLT128_MAX_10_EXPqq : constant := 4932; | |
qqFLT128_MAX_EXPqq : constant := 16384; | |
-- qqFLT128_MAXqq (_Float128) | |
qqFLT128_MIN_10_EXPqq : constant := -4931; | |
qqFLT128_MIN_EXPqq : constant := -16381; | |
-- qqFLT128_MINqq (_Float128) | |
qqFLT32X_DECIMAL_DIGqq : constant := 17; | |
qqFLT32X_DENORM_MINqq : constant := 16#0.40000000000000000#e-268; | |
qqFLT32X_DIGqq : constant := 15; | |
qqFLT32X_EPSILONqq : constant := 16#0.10000000000000000#e-12; | |
qqFLT32X_HAS_DENORMqq : constant := 1; | |
qqFLT32X_HAS_INFINITYqq : constant := 1; | |
qqFLT32X_HAS_QUIET_NANqq : constant := 1; | |
qqFLT32X_MANT_DIGqq : constant := 53; | |
qqFLT32X_MAX_10_EXPqq : constant := 308; | |
qqFLT32X_MAX_EXPqq : constant := 1024; | |
qqFLT32X_MAXqq : constant := 16#0.fffffffffffff8000#e+256; | |
qqFLT32X_MIN_10_EXPqq : constant := -307; | |
qqFLT32X_MIN_EXPqq : constant := -1021; | |
qqFLT32X_MINqq : constant := 16#0.40000000000000000#e-255; | |
qqFLT32_DECIMAL_DIGqq : constant := 9; | |
qqFLT32_DENORM_MINqq : constant := 16#0.80000000000000000#e-37; | |
qqFLT32_DIGqq : constant := 6; | |
qqFLT32_EPSILONqq : constant := 16#0.20000000000000000#e-5; | |
qqFLT32_HAS_DENORMqq : constant := 1; | |
qqFLT32_HAS_INFINITYqq : constant := 1; | |
qqFLT32_HAS_QUIET_NANqq : constant := 1; | |
qqFLT32_MANT_DIGqq : constant := 24; | |
qqFLT32_MAX_10_EXPqq : constant := 38; | |
qqFLT32_MAX_EXPqq : constant := 128; | |
qqFLT32_MAXqq : constant := 16#0.ffffff00000000000#e+32; | |
qqFLT32_MIN_10_EXPqq : constant := -37; | |
qqFLT32_MIN_EXPqq : constant := -125; | |
qqFLT32_MINqq : constant := 16#0.40000000000000000#e-31; | |
qqFLT64X_DECIMAL_DIGqq : constant := 21; | |
qqFLT64X_DENORM_MINqq : constant := 16#0.80000000000000000#e-4111; | |
qqFLT64X_DIGqq : constant := 18; | |
qqFLT64X_EPSILONqq : constant := 16#0.20000000000000000#e-15; | |
qqFLT64X_HAS_DENORMqq : constant := 1; | |
qqFLT64X_HAS_INFINITYqq : constant := 1; | |
qqFLT64X_HAS_QUIET_NANqq : constant := 1; | |
qqFLT64X_MANT_DIGqq : constant := 64; | |
qqFLT64X_MAX_10_EXPqq : constant := 4932; | |
qqFLT64X_MAX_EXPqq : constant := 16384; | |
qqFLT64X_MAXqq : constant := 16#0.ffffffffffffffff0#e+4096; | |
qqFLT64X_MIN_10_EXPqq : constant := -4931; | |
qqFLT64X_MIN_EXPqq : constant := -16381; | |
qqFLT64X_MINqq : constant := 16#0.40000000000000000#e-4095; | |
qqFLT64_DECIMAL_DIGqq : constant := 17; | |
qqFLT64_DENORM_MINqq : constant := 16#0.40000000000000000#e-268; | |
qqFLT64_DIGqq : constant := 15; | |
qqFLT64_EPSILONqq : constant := 16#0.10000000000000000#e-12; | |
qqFLT64_HAS_DENORMqq : constant := 1; | |
qqFLT64_HAS_INFINITYqq : constant := 1; | |
qqFLT64_HAS_QUIET_NANqq : constant := 1; | |
qqFLT64_MANT_DIGqq : constant := 53; | |
qqFLT64_MAX_10_EXPqq : constant := 308; | |
qqFLT64_MAX_EXPqq : constant := 1024; | |
qqFLT64_MAXqq : constant := 16#0.fffffffffffff8000#e+256; | |
qqFLT64_MIN_10_EXPqq : constant := -307; | |
qqFLT64_MIN_EXPqq : constant := -1021; | |
qqFLT64_MINqq : constant := 16#0.40000000000000000#e-255; | |
qqFLT_DECIMAL_DIGqq : constant := 9; | |
qqFLT_DENORM_MINqq : constant := 16#0.80000000000000000#e-37; | |
qqFLT_DIGqq : constant := 6; | |
qqFLT_EPSILONqq : constant := 16#0.20000000000000000#e-5; | |
qqFLT_EVAL_METHOD_TS_18661_3qq : constant := 0; | |
qqFLT_EVAL_METHODqq : constant := 0; | |
qqFLT_HAS_DENORMqq : constant := 1; | |
qqFLT_HAS_INFINITYqq : constant := 1; | |
qqFLT_HAS_QUIET_NANqq : constant := 1; | |
qqFLT_MANT_DIGqq : constant := 24; | |
qqFLT_MAX_10_EXPqq : constant := 38; | |
qqFLT_MAX_EXPqq : constant := 128; | |
qqFLT_MAXqq : constant := 16#0.ffffff00000000000#e+32; | |
qqFLT_MIN_10_EXPqq : constant := -37; | |
qqFLT_MIN_EXPqq : constant := -125; | |
qqFLT_MINqq : constant := 16#0.40000000000000000#e-31; | |
qqFLT_RADIXqq : constant := 2; | |
qqFXSRqq : constant := 1; | |
qqGCC_ASM_FLAG_OUTPUTSqq : constant := 1; | |
GCC_ATOMIC_BOOL_LOCK_FREE : constant := 2; | |
GCC_ATOMIC_CHAR16_T_LOCK_FREE : constant := 2; | |
GCC_ATOMIC_CHAR32_T_LOCK_FREE : constant := 2; | |
GCC_ATOMIC_CHAR_LOCK_FREE : constant := 2; | |
GCC_ATOMIC_INT_LOCK_FREE : constant := 2; | |
GCC_ATOMIC_LLONG_LOCK_FREE : constant := 2; | |
GCC_ATOMIC_LONG_LOCK_FREE : constant := 2; | |
GCC_ATOMIC_POINTER_LOCK_FREE : constant := 2; | |
GCC_ATOMIC_SHORT_LOCK_FREE : constant := 2; | |
GCC_ATOMIC_TEST_AND_SET_TRUEVAL : constant := 1; | |
GCC_ATOMIC_WCHAR_T_LOCK_FREE : constant := 2; | |
GCC_HAVE_SYNC_COMPARE_AND_SWAP_1 : constant := 1; | |
GCC_HAVE_SYNC_COMPARE_AND_SWAP_2 : constant := 1; | |
GCC_HAVE_SYNC_COMPARE_AND_SWAP_4 : constant := 1; | |
GCC_HAVE_SYNC_COMPARE_AND_SWAP_8 : constant := 1; | |
GCC_IEC_559 : constant := 2; | |
GCC_IEC_559_COMPLEX : constant := 2; | |
qqGNUC_MINORqq : constant := 5; | |
qqGNUC_PATCHLEVELqq : constant := 0; | |
qqGNUC_STDC_INLINEqq : constant := 1; | |
qqGNUCqq : constant := 7; | |
GXX_ABI_VERSION : constant := 1011; | |
-- __INT16_C (function macro) | |
qqINT16_MAXqq : constant := 32767; | |
subtype qqINT16_TYPEqq is signed_short; | |
-- __INT32_C (function macro) | |
qqINT32_MAXqq : constant := 2147483647; | |
subtype qqINT32_TYPEqq is signed_int; | |
-- __INT64_C (has # or ##) | |
qqINT64_MAXqq : constant := 9223372036854775807; | |
subtype qqINT64_TYPEqq is signed_long_long; | |
-- __INT8_C (function macro) | |
qqINT8_MAXqq : constant := 127; | |
subtype qqINT8_TYPEqq is signed_char; | |
-- __INTMAX_C (has # or ##) | |
qqINTMAX_MAXqq : constant := 9223372036854775807; | |
subtype qqINTMAX_TYPEqq is signed_long; | |
qqINTMAX_WIDTHqq : constant := 64; | |
qqINTPTR_MAXqq : constant := 9223372036854775807; | |
subtype qqINTPTR_TYPEqq is signed_long; | |
qqINTPTR_WIDTHqq : constant := 64; | |
qqINT_FAST16_MAXqq : constant := 32767; | |
subtype qqINT_FAST16_TYPEqq is signed_short; | |
qqINT_FAST16_WIDTHqq : constant := 16; | |
qqINT_FAST32_MAXqq : constant := 2147483647; | |
subtype qqINT_FAST32_TYPEqq is signed_int; | |
qqINT_FAST32_WIDTHqq : constant := 32; | |
qqINT_FAST64_MAXqq : constant := 9223372036854775807; | |
subtype qqINT_FAST64_TYPEqq is signed_long_long; | |
qqINT_FAST64_WIDTHqq : constant := 64; | |
qqINT_FAST8_MAXqq : constant := 127; | |
subtype qqINT_FAST8_TYPEqq is signed_char; | |
qqINT_FAST8_WIDTHqq : constant := 8; | |
qqINT_LEAST16_MAXqq : constant := 32767; | |
subtype qqINT_LEAST16_TYPEqq is signed_short; | |
qqINT_LEAST16_WIDTHqq : constant := 16; | |
qqINT_LEAST32_MAXqq : constant := 2147483647; | |
subtype qqINT_LEAST32_TYPEqq is signed_int; | |
qqINT_LEAST32_WIDTHqq : constant := 32; | |
qqINT_LEAST64_MAXqq : constant := 9223372036854775807; | |
subtype qqINT_LEAST64_TYPEqq is signed_long_long; | |
qqINT_LEAST64_WIDTHqq : constant := 64; | |
qqINT_LEAST8_MAXqq : constant := 127; | |
subtype qqINT_LEAST8_TYPEqq is signed_char; | |
qqINT_LEAST8_WIDTHqq : constant := 8; | |
qqINT_MAXqq : constant := 2147483647; | |
qqINT_WIDTHqq : constant := 32; | |
qqLDBL_DECIMAL_DIGqq : constant := 21; | |
qqLDBL_DENORM_MINqq : constant := 16#0.80000000000000000#e-4111; | |
qqLDBL_DIGqq : constant := 18; | |
qqLDBL_EPSILONqq : constant := 16#0.20000000000000000#e-15; | |
qqLDBL_HAS_DENORMqq : constant := 1; | |
qqLDBL_HAS_INFINITYqq : constant := 1; | |
qqLDBL_HAS_QUIET_NANqq : constant := 1; | |
qqLDBL_MANT_DIGqq : constant := 64; | |
qqLDBL_MAX_10_EXPqq : constant := 4932; | |
qqLDBL_MAX_EXPqq : constant := 16384; | |
qqLDBL_MAXqq : constant := 16#0.ffffffffffffffff0#e+4096; | |
qqLDBL_MIN_10_EXPqq : constant := -4931; | |
qqLDBL_MIN_EXPqq : constant := -16381; | |
qqLDBL_MINqq : constant := 16#0.40000000000000000#e-4095; | |
qqLITTLE_ENDIANqq : constant := 1; | |
qqLONG_LONG_MAXqq : constant := 9223372036854775807; | |
qqLONG_LONG_WIDTHqq : constant := 64; | |
qqLONG_MAXqq : constant := 9223372036854775807; | |
qqLONG_WIDTHqq : constant := 64; | |
qqLP64qq : constant := 1; | |
qqMACHqq : constant := 1; | |
qqMMXqq : constant := 1; | |
qqNO_INLINEqq : constant := 1; | |
qqORDER_BIG_ENDIANqq : constant := 4321; | |
qqORDER_LITTLE_ENDIANqq : constant := 1234; | |
qqORDER_PDP_ENDIANqq : constant := 3412; | |
defined_qqPICqq_U : constant := 2; | |
PRAGMA_REDEFINE_EXTNAME : constant := 1; | |
qqPTRDIFF_MAXqq : constant := 9223372036854775807; | |
subtype qqPTRDIFF_TYPEqq is signed_long; | |
qqPTRDIFF_WIDTHqq : constant := 64; | |
-- __REGISTER_PREFIX__ (empty) | |
qqSCHAR_MAXqq : constant := 127; | |
qqSCHAR_WIDTHqq : constant := 8; | |
SEG_FS : constant := 1; | |
SEG_GS : constant := 1; | |
qqSHRT_MAXqq : constant := 32767; | |
qqSHRT_WIDTHqq : constant := 16; | |
qqSIG_ATOMIC_MAXqq : constant := 2147483647; | |
qqSIG_ATOMIC_MINqq : constant := -2147483648; | |
subtype qqSIG_ATOMIC_TYPEqq is signed_int; | |
qqSIG_ATOMIC_WIDTHqq : constant := 32; | |
qqSIZEOF_DOUBLEqq : constant := 8; | |
qqSIZEOF_FLOAT128qq : constant := 16; | |
qqSIZEOF_FLOAT80qq : constant := 16; | |
qqSIZEOF_FLOATqq : constant := 4; | |
qqSIZEOF_INT128qq : constant := 16; | |
qqSIZEOF_INTqq : constant := 4; | |
qqSIZEOF_LONG_DOUBLEqq : constant := 16; | |
qqSIZEOF_LONG_LONGqq : constant := 8; | |
qqSIZEOF_LONGqq : constant := 8; | |
qqSIZEOF_POINTERqq : constant := 8; | |
qqSIZEOF_PTRDIFF_Tqq : constant := 8; | |
qqSIZEOF_SHORTqq : constant := 2; | |
qqSIZEOF_SIZE_Tqq : constant := 8; | |
qqSIZEOF_WCHAR_Tqq : constant := 4; | |
qqSIZEOF_WINT_Tqq : constant := 4; | |
qqSIZE_MAXqq : constant := 18446744073709551615; | |
subtype qqSIZE_TYPEqq is unsigned_long; | |
qqSIZE_WIDTHqq : constant := 64; | |
qqSSE2_MATHqq : constant := 1; | |
qqSSE2qq : constant := 1; | |
qqSSE3qq : constant := 1; | |
qqSSE_MATHqq : constant := 1; | |
qqSSEqq : constant := 1; | |
qqSTDC_HOSTEDqq : constant := 1; | |
qqSTDC_UTF_16qq : constant := 1; | |
qqSTDC_UTF_32qq : constant := 1; | |
-- __UINT16_C (function macro) | |
qqUINT16_MAXqq : constant := 65535; | |
subtype qqUINT16_TYPEqq is unsigned_short; | |
-- __UINT32_C (has # or ##) | |
qqUINT32_MAXqq : constant := 4294967295; | |
subtype qqUINT32_TYPEqq is unsigned_int; | |
-- __UINT64_C (has # or ##) | |
qqUINT64_MAXqq : constant := 18446744073709551615; | |
subtype qqUINT64_TYPEqq is unsigned_long_long; | |
-- __UINT8_C (function macro) | |
qqUINT8_MAXqq : constant := 255; | |
subtype qqUINT8_TYPEqq is unsigned_char; | |
-- __UINTMAX_C (has # or ##) | |
qqUINTMAX_MAXqq : constant := 18446744073709551615; | |
subtype qqUINTMAX_TYPEqq is unsigned_long; | |
qqUINTPTR_MAXqq : constant := 18446744073709551615; | |
subtype qqUINTPTR_TYPEqq is unsigned_long; | |
qqUINT_FAST16_MAXqq : constant := 65535; | |
subtype qqUINT_FAST16_TYPEqq is unsigned_short; | |
qqUINT_FAST32_MAXqq : constant := 4294967295; | |
subtype qqUINT_FAST32_TYPEqq is unsigned_int; | |
qqUINT_FAST64_MAXqq : constant := 18446744073709551615; | |
subtype qqUINT_FAST64_TYPEqq is unsigned_long_long; | |
qqUINT_FAST8_MAXqq : constant := 255; | |
subtype qqUINT_FAST8_TYPEqq is unsigned_char; | |
qqUINT_LEAST16_MAXqq : constant := 65535; | |
subtype qqUINT_LEAST16_TYPEqq is unsigned_short; | |
qqUINT_LEAST32_MAXqq : constant := 4294967295; | |
subtype qqUINT_LEAST32_TYPEqq is unsigned_int; | |
qqUINT_LEAST64_MAXqq : constant := 18446744073709551615; | |
subtype qqUINT_LEAST64_TYPEqq is unsigned_long_long; | |
qqUINT_LEAST8_MAXqq : constant := 255; | |
subtype qqUINT_LEAST8_TYPEqq is unsigned_char; | |
-- __USER_LABEL_PREFIX__ (unparsible) | |
qqVERSIONqq : constant char_array (0 .. 5) := "7.5.0" & char'Val (0); | |
qqWCHAR_MAXqq : constant := 2147483647; | |
qqWCHAR_MINqq : constant := -2147483648; | |
subtype qqWCHAR_TYPEqq is signed_int; | |
qqWCHAR_WIDTHqq : constant := 32; | |
qqWINT_MAXqq : constant := 2147483647; | |
qqWINT_MINqq : constant := -2147483648; | |
subtype qqWINT_TYPEqq is signed_int; | |
qqWINT_WIDTHqq : constant := 32; | |
amd64 : constant := 1; | |
qqamd64qq : constant := 1; | |
qqcode_model_smallqq : constant := 1; | |
-- __has_include (has __has_include__ or __has_include_next__) | |
-- __has_include_next (has __has_include__ or __has_include_next__) | |
k8 : constant := 1; | |
qqk8qq : constant := 1; | |
qqpicqq : constant := 2; | |
-- __strong (empty) | |
-- __weak (empty) | |
x86_64 : constant := 1; | |
qqx86_64qq : constant := 1; | |
function builtin_alloca (a1 : size_t) return char_ptr; | |
pragma Import (Intrinsic, builtin_alloca, "__builtin_alloca"); | |
function builtin_bswap16 (a1 : unsigned_short) return unsigned_short; | |
pragma Import (Intrinsic, builtin_bswap16, "__builtin_bswap16"); | |
function builtin_bswap32 (a1 : unsigned_int) return unsigned_int; | |
pragma Import (Intrinsic, builtin_bswap32, "__builtin_bswap32"); | |
function builtin_bswap64 (a1 : unsigned_long_long) | |
return unsigned_long_long; | |
pragma Import (Intrinsic, builtin_bswap64, "__builtin_bswap64"); | |
procedure builtin_bzero (a1 : access char; a2 : size_t); | |
pragma Import (Intrinsic, builtin_bzero, "__builtin_bzero"); | |
function builtin_extract_return_addr (a1 : access char) return char_ptr; | |
pragma Import (Intrinsic, builtin_extract_return_addr, | |
"__builtin_extract_return_addr"); | |
function builtin_fabsf (a1 : float) return float; | |
pragma Import (Intrinsic, builtin_fabsf, "__builtin_fabsf"); | |
function builtin_fabs (a1 : double) return double; | |
pragma Import (Intrinsic, builtin_fabs, "__builtin_fabs"); | |
function builtin_fabsl (a1 : long_double) return long_double; | |
pragma Import (Intrinsic, builtin_fabsl, "__builtin_fabsl"); | |
function builtin_flt_rounds return signed_int; | |
pragma Import (Intrinsic, builtin_flt_rounds, "__builtin_flt_rounds"); | |
function builtin_frame_address (a1 : unsigned_int) return char_ptr; | |
pragma Import (Intrinsic, builtin_frame_address, | |
"__builtin_frame_address"); | |
function builtin_huge_valf return float; | |
pragma Import (Intrinsic, builtin_huge_valf, "__builtin_huge_valf"); | |
function builtin_huge_val return double; | |
pragma Import (Intrinsic, builtin_huge_val, "__builtin_huge_val"); | |
function builtin_huge_vall return long_double; | |
pragma Import (Intrinsic, builtin_huge_vall, "__builtin_huge_vall"); | |
function builtin_inff return float; | |
pragma Import (Intrinsic, builtin_inff, "__builtin_inff"); | |
function builtin_inf return double; | |
pragma Import (Intrinsic, builtin_inf, "__builtin_inf"); | |
function builtin_infl return long_double; | |
pragma Import (Intrinsic, builtin_infl, "__builtin_infl"); | |
function builtin_llabs (a1 : signed_long_long) return signed_long_long; | |
pragma Import (Intrinsic, builtin_llabs, "__builtin_llabs"); | |
function builtin_memcmp (a1 : access char; a2 : access char; a3 : size_t) | |
return signed_int; | |
pragma Import (Intrinsic, builtin_memcmp, "__builtin_memcmp"); | |
function builtin_memset (a1 : access char; a2 : signed_int; a3 : size_t) | |
return char_ptr; | |
pragma Import (Intrinsic, builtin_memset, "__builtin_memset"); | |
function builtin_memcpy_chk (a1 : access char; a2 : access constant char; | |
a3 : size_t; a4 : size_t) return char_ptr; | |
pragma Import (Intrinsic, builtin_memcpy_chk, "__builtin___memcpy_chk"); | |
function builtin_memmove_chk (a1 : access char; a2 : access constant char; | |
a3 : size_t; a4 : size_t) return char_ptr; | |
pragma Import (Intrinsic, builtin_memmove_chk, "__builtin___memmove_chk"); | |
function builtin_memset_chk (a1 : access char; a2 : signed_int; | |
a3 : size_t; a4 : size_t) return char_ptr; | |
pragma Import (Intrinsic, builtin_memset_chk, "__builtin___memset_chk"); | |
function builtin_nanf (a1 : access constant char) return float; | |
pragma Import (Intrinsic, builtin_nanf, "__builtin_nanf"); | |
function builtin_nan (a1 : access constant char) return double; | |
pragma Import (Intrinsic, builtin_nan, "__builtin_nan"); | |
function builtin_nanl (a1 : access constant char) return long_double; | |
pragma Import (Intrinsic, builtin_nanl, "__builtin_nanl"); | |
function builtin_return_address (a1 : unsigned_int) return char_ptr; | |
pragma Import (Intrinsic, builtin_return_address, | |
"__builtin_return_address"); | |
function builtin_stpcpy_chk (a1 : access char; a2 : access constant char; | |
a3 : size_t) return char_ptr; | |
pragma Import (Intrinsic, builtin_stpcpy_chk, "__builtin___stpcpy_chk"); | |
function builtin_stpncpy_chk (a1 : access char; a2 : access constant char; | |
a3 : size_t; a4 : size_t) return char_ptr; | |
pragma Import (Intrinsic, builtin_stpncpy_chk, "__builtin___stpncpy_chk"); | |
function builtin_strcat_chk (a1 : access char; a2 : access constant char; | |
a3 : size_t) return char_ptr; | |
pragma Import (Intrinsic, builtin_strcat_chk, "__builtin___strcat_chk"); | |
function builtin_strcpy_chk (a1 : access char; a2 : access constant char; | |
a3 : size_t) return char_ptr; | |
pragma Import (Intrinsic, builtin_strcpy_chk, "__builtin___strcpy_chk"); | |
function builtin_strncat_chk (a1 : access char; a2 : access constant char; | |
a3 : size_t; a4 : size_t) return char_ptr; | |
pragma Import (Intrinsic, builtin_strncat_chk, "__builtin___strncat_chk"); | |
function builtin_strncpy_chk (a1 : access char; a2 : access constant char; | |
a3 : size_t; a4 : size_t) return char_ptr; | |
pragma Import (Intrinsic, builtin_strncpy_chk, "__builtin___strncpy_chk"); | |
end C; |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment