initial

2026-10-24 02:12:38 +00:00 · 2024-05-11 23:24:13 +02:00
commit e66c5afde0
130 changed files with 17039 additions and 0 deletions
@@ -0,0 +1,79 @@
+package kernel
+
+import "core:c"
+import sce "../common"
+
+foreign import sysmem "system:SceSysmem_stub"
+
+@(link_prefix = "sceKernel")
+foreign sysmem {
+    GetCpuId :: proc() -> c.int ---
+
+    /**
+    * Allocates a new memory block
+    *
+    * @param[in] name - Name for the memory block
+    * @param[in] type - Type of the memory to allocate. Use `SCE_KERNEL_MEMBLOCK_TYPE_USER_*`.
+    * @param[in] size - Size of the memory to allocate
+    * @param[in] opt  - Memory block options?
+    *
+    * @return SceUID of the memory block on success, < 0 on error.
+    */
+    AllocMemBlock :: proc(name: cstring, type: SceKernelMemBlockType, size: sce.Size, opt: ^SceKernelAllocMemBlockOpt) -> sce.UID ---
+
+    /**
+    * Frees new memory block
+    *
+    * @param[in] uid - SceUID of the memory block to free
+    *
+    * @return 0 on success, < 0 on error.
+    */
+    FreeMemBlock :: proc(uid: sce.UID) -> c.int ---
+
+    /**
+    * Gets the base address of a memory block
+    *
+    * @param[in]  uid  - SceUID of the memory block to free
+    * @param[out] base - Base address of the memory block identified by SceUID
+    *
+    * @return 0 on success, < 0 on error.
+    */
+    GetMemBlockBase :: proc(uid: sce.UID, base: ^rawptr) -> c.int ---
+
+    FindMemBlockByAddr :: proc(addr: rawptr, size: sce.Size) -> sce.UID ---
+
+    GetMemBlockInfoByAddr :: proc(base: rawptr, info: ^SceKernelMemBlockInfo) -> c.int ---
+    GetMemBlockInfoByRange :: proc(base: rawptr, size: sce.Size, info: ^SceKernelMemBlockInfo) -> c.int ---
+
+    AllocMemBlockForVM :: proc(name: cstring, size: sce.Size) -> sce.UID ---
+    SyncVMDomain :: proc(uid: sce.UID, data: rawptr, size: sce.Size) -> c.int ---
+    OpenVMDomain :: proc() -> c.int ---
+    CloseVMDomain :: proc() -> c.int ---
+
+    OpenMemBlock :: proc(name: cstring, flags: c.int) -> c.int ---
+    CloseMemBlock :: proc(uid: sce.UID) -> c.int ---
+
+    /**
+    * Get the model number of the device
+    *
+    * @return A value from SCE_KERNEL_MODEL
+    */
+    GetModelForCDialog :: proc() -> c.int ---
+
+    /**
+    * Get the model number of the device
+    *
+    * @return A value from SCE_KERNEL_MODEL
+    */
+    GetModel :: proc() -> c.int ---
+
+    /**
+    * Get free memory size in bytes
+    *
+    * @param[out] info - Returned free memory size for different kind of memory block types
+    * @return 0 on success, < 0 on error.
+    */
+    GetFreeMemorySize :: proc(info: ^SceKernelFreeMemorySizeInfo) -> c.int ---
+
+    IsPSVitaTV :: proc() -> c.int ---
+}