#include "stdafx.h"
#include "Emu/Memory/Memory.h"
#include "Emu/System.h"
#include "Emu/SysCalls/SysCalls.h"

#include "Emu/FS/VFS.h"
#include "Emu/FS/vfsFile.h"
#include "Crypto/unself.h"
#include "sys_prx.h"

SysCallBase sys_prx("sys_prx");

s32 sys_prx_load_module(vm::ptr<const char> path, u64 flags, vm::ptr<sys_prx_load_module_option_t> pOpt)
{
	sys_prx.Todo("sys_prx_load_module(path=\"%s\", flags=0x%llx, pOpt=0x%x)", path.get_ptr(), flags, pOpt.addr());

	std::string _path = path.get_ptr();
	// Check if the file is SPRX
	std::string local_path;
	Emu.GetVFS().GetDevice(_path, local_path);
	if (IsSelf(local_path)) {
		if (!DecryptSelf(local_path+".prx", local_path)) {
			return CELL_PRX_ERROR_ILLEGAL_LIBRARY;
		}
		_path += ".prx";
	}

	vfsFile f(_path);
	if (!f.IsOpened()) {
		return CELL_PRX_ERROR_UNKNOWN_MODULE;
	}

	// Create the PRX object and return its id
	sys_prx_t* prx = new sys_prx_t();
	prx->size = (u32)f.GetSize();
	prx->address = (u32)Memory.Alloc(prx->size, 4);
	prx->path = path;
	
	// Load the PRX into memory
	f.Read(vm::get_ptr<void>(prx->address), prx->size);

	u32 id = sys_prx.GetNewId(prx, TYPE_PRX);
	return id;
}

s32 sys_prx_load_module_on_memcontainer()
{
	sys_prx.Todo("sys_prx_load_module_on_memcontainer()");
	return CELL_OK;
}

s32 sys_prx_load_module_by_fd()
{
	sys_prx.Todo("sys_prx_load_module_by_fd()");
	return CELL_OK;
}

s32 sys_prx_load_module_on_memcontainer_by_fd()
{
	sys_prx.Todo("sys_prx_load_module_on_memcontainer_by_fd()");
	return CELL_OK;
}

s32 sys_prx_start_module(s32 id, u32 args, u32 argp_addr, vm::ptr<be_t<u32>> modres, u64 flags, vm::ptr<sys_prx_start_module_option_t> pOpt)
{
	sys_prx.Todo("sys_prx_start_module(id=%d, args=%d, argp_addr=0x%x, modres_addr=0x%x, flags=0x%llx, pOpt=0x%x)",
		id, args, argp_addr, modres.addr(), flags, pOpt.addr());

	sys_prx_t* prx;
	if (!Emu.GetIdManager().GetIDData(id, prx))
		return CELL_ESRCH;

	if (prx->isStarted)
		return CELL_PRX_ERROR_ALREADY_STARTED;

	return CELL_OK;
}

s32 sys_prx_stop_module(s32 id, u32 args, u32 argp_addr, vm::ptr<be_t<u32>> modres, u64 flags, vm::ptr<sys_prx_stop_module_option_t> pOpt)
{
	sys_prx.Todo("sys_prx_stop_module(id=%d, args=%d, argp_addr=0x%x, modres_addr=0x%x, flags=0x%llx, pOpt=0x%x)",
		id, args, argp_addr, modres.addr(), flags, pOpt.addr());

	sys_prx_t* prx;
	if (!Emu.GetIdManager().GetIDData(id, prx))
		return CELL_ESRCH;

	if (!prx->isStarted)
		return CELL_PRX_ERROR_ALREADY_STOPPED;

	return CELL_OK;
}

s32 sys_prx_unload_module(s32 id, u64 flags, vm::ptr<sys_prx_unload_module_option_t> pOpt)
{
	sys_prx.Todo("sys_prx_unload_module(id=%d, flags=0x%llx, pOpt=0x%x)", id, flags, pOpt.addr());

	// Get the PRX, free the used memory and delete the object and its ID
	sys_prx_t* prx;
	if (!Emu.GetIdManager().GetIDData(id, prx))
		return CELL_ESRCH;
	Memory.Free(prx->address);
	Emu.GetIdManager().RemoveID(id);
	
	return CELL_OK;
}

s32 sys_prx_get_module_list()
{
	sys_prx.Todo("sys_prx_get_module_list()");
	return CELL_OK;
}

s32 sys_prx_get_my_module_id()
{
	sys_prx.Todo("sys_prx_get_my_module_id()");
	return CELL_OK;
}

s32 sys_prx_get_module_id_by_address()
{
	sys_prx.Todo("sys_prx_get_module_id_by_address()");
	return CELL_OK;
}

s32 sys_prx_get_module_id_by_name()
{
	sys_prx.Todo("sys_prx_get_module_id_by_name()");
	return CELL_OK;
}

s32 sys_prx_get_module_info()
{
	sys_prx.Todo("sys_prx_get_module_info()");
	return CELL_OK;
}

s32 sys_prx_register_library(u32 lib_addr)
{
	sys_prx.Todo("sys_prx_register_library(lib_addr=0x%x)", lib_addr);
	return CELL_OK;
}

s32 sys_prx_unregister_library()
{
	sys_prx.Todo("sys_prx_unregister_library()");
	return CELL_OK;
}

s32 sys_prx_get_ppu_guid()
{
	sys_prx.Todo("sys_prx_get_ppu_guid()");
	return CELL_OK;
}

s32 sys_prx_register_module()
{
	sys_prx.Todo("sys_prx_register_module()");
	return CELL_OK;
}

s32 sys_prx_query_module()
{
	sys_prx.Todo("sys_prx_query_module()");
	return CELL_OK;
}

s32 sys_prx_link_library()
{
	sys_prx.Todo("sys_prx_link_library()");
	return CELL_OK;
}

s32 sys_prx_unlink_library()
{
	sys_prx.Todo("sys_prx_unlink_library()");
	return CELL_OK;
}

s32 sys_prx_query_library()
{
	sys_prx.Todo("sys_prx_query_library()");
	return CELL_OK;
}

s32 sys_prx_start()
{
	sys_prx.Todo("sys_prx_start()");
	return CELL_OK;
}

s32 sys_prx_stop()
{
	sys_prx.Todo("sys_prx_stop()");
	return CELL_OK;
}