odin-lang.Odin/core/sys/haiku/find_directory.odin

//+build haiku
package sys_haiku

import "core:c"

directory_which :: enum c.int {
	// Per volume directories
	DESKTOP_DIRECTORY = 0,
	TRASH_DIRECTORY,

	// System directories
	SYSTEM_DIRECTORY        = 1000,
	SYSTEM_ADDONS_DIRECTORY = 1002,
	SYSTEM_BOOT_DIRECTORY,
	SYSTEM_FONTS_DIRECTORY,
	SYSTEM_LIB_DIRECTORY,
	SYSTEM_SERVERS_DIRECTORY,
	SYSTEM_APPS_DIRECTORY,
	SYSTEM_BIN_DIRECTORY,
	SYSTEM_DOCUMENTATION_DIRECTORY = 1010,
	SYSTEM_PREFERENCES_DIRECTORY,
	SYSTEM_TRANSLATORS_DIRECTORY,
	SYSTEM_MEDIA_NODES_DIRECTORY,
	SYSTEM_SOUNDS_DIRECTORY,
	SYSTEM_DATA_DIRECTORY,
	SYSTEM_DEVELOP_DIRECTORY,
	SYSTEM_PACKAGES_DIRECTORY,
	SYSTEM_HEADERS_DIRECTORY,
	SYSTEM_ETC_DIRECTORY      = 2008,
	SYSTEM_SETTINGS_DIRECTORY = 2010,
	SYSTEM_LOG_DIRECTORY      = 2012,
	SYSTEM_SPOOL_DIRECTORY,
	SYSTEM_TEMP_DIRECTORY,
	SYSTEM_VAR_DIRECTORY,
	SYSTEM_CACHE_DIRECTORY       = 2020,
	SYSTEM_NONPACKAGED_DIRECTORY = 2023,
	SYSTEM_NONPACKAGED_ADDONS_DIRECTORY,
	SYSTEM_NONPACKAGED_TRANSLATORS_DIRECTORY,
	SYSTEM_NONPACKAGED_MEDIA_NODES_DIRECTORY,
	SYSTEM_NONPACKAGED_BIN_DIRECTORY,
	SYSTEM_NONPACKAGED_DATA_DIRECTORY,
	SYSTEM_NONPACKAGED_FONTS_DIRECTORY,
	SYSTEM_NONPACKAGED_SOUNDS_DIRECTORY,
	SYSTEM_NONPACKAGED_DOCUMENTATION_DIRECTORY,
	SYSTEM_NONPACKAGED_LIB_DIRECTORY,
	SYSTEM_NONPACKAGED_HEADERS_DIRECTORY,
	SYSTEM_NONPACKAGED_DEVELOP_DIRECTORY,

	// User directories. These are interpreted in the context of the user making the find_directory call.
	USER_DIRECTORY = 3000,
	USER_CONFIG_DIRECTORY,
	USER_ADDONS_DIRECTORY,
	USER_BOOT_DIRECTORY,
	USER_FONTS_DIRECTORY,
	USER_LIB_DIRECTORY,
	USER_SETTINGS_DIRECTORY,
	USER_DESKBAR_DIRECTORY,
	USER_PRINTERS_DIRECTORY,
	USER_TRANSLATORS_DIRECTORY,
	USER_MEDIA_NODES_DIRECTORY,
	USER_SOUNDS_DIRECTORY,
	USER_DATA_DIRECTORY,
	USER_CACHE_DIRECTORY,
	USER_PACKAGES_DIRECTORY,
	USER_HEADERS_DIRECTORY,
	USER_NONPACKAGED_DIRECTORY,
	USER_NONPACKAGED_ADDONS_DIRECTORY,
	USER_NONPACKAGED_TRANSLATORS_DIRECTORY,
	USER_NONPACKAGED_MEDIA_NODES_DIRECTORY,
	USER_NONPACKAGED_BIN_DIRECTORY,
	USER_NONPACKAGED_DATA_DIRECTORY,
	USER_NONPACKAGED_FONTS_DIRECTORY,
	USER_NONPACKAGED_SOUNDS_DIRECTORY,
	USER_NONPACKAGED_DOCUMENTATION_DIRECTORY,
	USER_NONPACKAGED_LIB_DIRECTORY,
	USER_NONPACKAGED_HEADERS_DIRECTORY,
	USER_NONPACKAGED_DEVELOP_DIRECTORY,
	USER_DEVELOP_DIRECTORY,
	USER_DOCUMENTATION_DIRECTORY,
	USER_SERVERS_DIRECTORY,
	USER_APPS_DIRECTORY,
	USER_BIN_DIRECTORY,
	USER_PREFERENCES_DIRECTORY,
	USER_ETC_DIRECTORY,
	USER_LOG_DIRECTORY,
	USER_SPOOL_DIRECTORY,
	USER_VAR_DIRECTORY,

	// Global directories
	APPS_DIRECTORY = 4000,
	PREFERENCES_DIRECTORY,
	UTILITIES_DIRECTORY,
	PACKAGE_LINKS_DIRECTORY,

	// Obsolete: Legacy BeOS definition to be phased out
	BEOS_DIRECTORY = 1000,
	BEOS_SYSTEM_DIRECTORY,
	BEOS_ADDONS_DIRECTORY,
	BEOS_BOOT_DIRECTORY,
	BEOS_FONTS_DIRECTORY,
	BEOS_LIB_DIRECTORY,
	BEOS_SERVERS_DIRECTORY,
	BEOS_APPS_DIRECTORY,
	BEOS_BIN_DIRECTORY,
	BEOS_ETC_DIRECTORY,
	BEOS_DOCUMENTATION_DIRECTORY,
	BEOS_PREFERENCES_DIRECTORY,
	BEOS_TRANSLATORS_DIRECTORY,
	BEOS_MEDIA_NODES_DIRECTORY,
	BEOS_SOUNDS_DIRECTORY,
}

find_path_flags :: enum c.int {
	CREATE_DIRECTORY        = 0x0001,
	CREATE_PARENT_DIRECTORY = 0x0002,
	EXISTING_ONLY           = 0x0004,
	
	// find_paths() only!
	SYSTEM_ONLY             = 0x0010,
	USER_ONLY               = 0x0020,
}

path_base_directory :: enum c.int {
	INSTALLATION_LOCATION_DIRECTORY,
	ADD_ONS_DIRECTORY,
	APPS_DIRECTORY,
	BIN_DIRECTORY,
	BOOT_DIRECTORY,
	CACHE_DIRECTORY,
	DATA_DIRECTORY,
	DEVELOP_DIRECTORY,
	DEVELOP_LIB_DIRECTORY,
	DOCUMENTATION_DIRECTORY,
	ETC_DIRECTORY,
	FONTS_DIRECTORY,
	HEADERS_DIRECTORY,
	LIB_DIRECTORY,
	LOG_DIRECTORY,
	MEDIA_NODES_DIRECTORY,
	PACKAGES_DIRECTORY,
	PREFERENCES_DIRECTORY,
	SERVERS_DIRECTORY,
	SETTINGS_DIRECTORY,
	SOUNDS_DIRECTORY,
	SPOOL_DIRECTORY,
	TRANSLATORS_DIRECTORY,
	VAR_DIRECTORY,

	// find_path() only!
	IMAGE_PATH = 1000,
	PACKAGE_PATH,
}

// value that can be used instead of a pointer to a symbol in the program image
APP_IMAGE_SYMBOL :: rawptr(addr_t(0))
// pointer to a symbol in the callers image (same as B_CURRENT_IMAGE_SYMBOL)
current_image_symbol :: proc() -> rawptr { return rawptr(current_image_symbol) }

foreign import libroot "system:c"
foreign libroot {
	find_directory         :: proc(which: directory_which, volume: dev_t, createIt: bool, pathString: [^]c.char, length: i32) -> status_t ---
	find_path              :: proc(codePointer: rawptr, baseDirectory: path_base_directory, subPath: cstring, pathBuffer: [^]c.char, bufferSize: c.size_t) -> status_t ---
	find_path_etc          :: proc(codePointer: rawptr, dependency: cstring, architecture: cstring, baseDirectory: path_base_directory, subPath: cstring, flags: find_path_flags, pathBuffer: [^]c.char, bufferSize: c.size_t) -> status_t ---
	find_path_for_path     :: proc(path: cstring, baseDirectory: path_base_directory, subPath: cstring, pathBuffer: [^]c.char, bufferSize: c.size_t) -> status_t ---
	find_path_for_path_etc :: proc(path: cstring, dependency: cstring, architecture: cstring, baseDirectory: path_base_directory, subPath: cstring, flags: find_path_flags, pathBuffer: [^]c.char, bufferSize: c.size_t) -> status_t ---
	find_paths             :: proc(baseDirectory: path_base_directory, subPath: cstring, _paths: ^[^][^]c.char, _pathCount: ^c.size_t) -> status_t ---
	find_paths_etc         :: proc(architecture: cstring, baseDirectory: path_base_directory, subPath: cstring, flags: find_path_flags, _paths: ^[^][^]c.char, _pathCount: ^c.size_t) -> status_t ---
}