Archive/jak-project
1
0
Fork 0
mirror of https://github.com/open-goal/jak-project.git synced 2024-10-20 11:26:18 -04:00
Code Issues Actions 3 Packages Projects Releases Wiki Activity
jak-project/game/kernel/kmemcard.cpp
water111 845802ca45
memory cards (in progress) (#868) 
* c++ memory card stuff

* saving kinda works

* load working

* more progress

* clean up
2021-10-01 23:12:34 -04:00

1277 lines
38 KiB
C++
Raw Blame History

/*!
* @file kmemcard.cpp
* Memory card interface. Very messy code.
*/
#include <cstdio>
#include <cstring>
#include "third-party/fmt/core.h"
#include "game/sce/sif_ee.h"
#include "game/sce/sif_ee_memcard.h"
#include "kmemcard.h"
#include "game/kernel/kdgo.h"
#include "game/common/ramdisk_rpc_types.h"
#include "game/kernel/fileio.h"
#include "common/util/assert.h"
constexpr static bool memcard_debug = false;
using McCallbackFunc = void (*)(s32);
McCallbackFunc callback;
static s32 next;
static s32 language;
static MemoryCardOperation op;
static MemoryCard mc[2];
static RPC_Ramdisk_LoadCmd ramdisk_cmd;
static ee::sceMcTblGetDir dirent;
constexpr u32 MEM_CARD_MAGIC = 0x12345678;
struct McHeader {
u32 save_count;
u32 checksum;
u32 magic;
u8 preview_data[64];
u8 data[944];
u32 unk1_repeated;
};
static_assert(sizeof(McHeader) == 0x400, "McHeader size");
static McHeader header;
// these are the return value for sceMcGetInfo.
static s32 p1, p2, p3, p4;
using namespace ee;
void cb_reprobe_format(s32);
void cb_format_complete(s32);
void cb_unformat(s32);
void cb_reprobe_createfile(s32);
void cb_wait_for_ramdisk(s32);
void cb_wait_for_ramdisk_load(s32);
void cb_createfile_erasing(s32);
void cb_createdir(s32);
void cb_createdfile(s32);
void cb_writtenfile(s32);
void cb_closedfile(s32);
void cb_reprobe_save(s32);
void cb_reprobe_load(s32);
void cb_probe(s32);
void cb_reprobe(s32);
void cb_getdir(s32);
void cb_check_open(s32);
void cb_check_read(s32);
void cb_check_close(s32);
void cb_openedsave(s32);
void cb_savedheader(s32);
void cb_saveddata(s32);
void cb_savedfooter(s32);
void cb_closedsave(s32);
void cb_openedload(s32);
void cb_readload(s32);
void cb_closedload(s32);
template <typename... Args>
void mc_print(const std::string& str, Args&&... args) {
if (memcard_debug) {
fmt::print("[MC] ");
if (!str.empty() && str.back() == '\n') {
fmt::print(str, std::forward<Args>(args)...);
} else {
fmt::print(str + '\n', std::forward<Args>(args)...);
}
}
}
const char* filename[12] = {
"/BASCUS-97124AYBABTU!", "/BASCUS-97124AYBABTU!/icon.sys",
"/BASCUS-97124AYBABTU!/icon.ico", "/BASCUS-97124AYBABTU!/BASCUS-97124AYBABTU!",
"/BASCUS-97124AYBABTU!/bank0.bin", "/BASCUS-97124AYBABTU!/bank1.bin",
"/BASCUS-97124AYBABTU!/bank2.bin", "/BASCUS-97124AYBABTU!/bank3.bin",
"/BASCUS-97124AYBABTU!/bank4.bin", "/BASCUS-97124AYBABTU!/bank5.bin",
"/BASCUS-97124AYBABTU!/bank6.bin", "/BASCUS-97124AYBABTU!/bank7.bin"};
void kmemcard_init_globals() {
next = 0;
language = 0;
op = {};
mc[0] = {};
mc[1] = {};
callback = nullptr;
p1 = 0;
p2 = 0;
p3 = 0;
p4 = 0;
memset(&dirent, 0, sizeof(sceMcTblGetDir));
memset(&header, 0, sizeof(McHeader));
}
/*!
* Get a new memory card handle.
* Will never return 0.
* A handle is a unique integer that can be passed up to the GOAL game code and represents a
* specific memory card. If the card is removed, the handle will become invalid.
*/
s32 new_mc_handle() {
s32 handle = next++;
// if you wrap around, it avoid the zero handle.
// it doesn't seem like you will need billions of memory card handles
if (handle == 0) {
handle = next++;
}
return handle;
}
/*!
* A questionable checksum used on memory card data.
*/
u32 mc_checksum(Ptr<u8> data, s32 size) {
if (size < 0) {
size += 3;
}
u32 result = 0;
u32* data_u32 = (u32*)data.c();
for (s32 i = 0; i < size / 4; i++) {
result = result << 1 ^ (s32)result >> 0x1f ^ data_u32[i] ^ MEM_CARD_MAGIC;
}
return result ^ 0xedd1e666;
}
/*!
* Get the slot for a handle. The card must be in the given state.
* Return -1 if it fails.
*/
s32 handle_to_slot(u32 handle, MemoryCardState state) {
if (mc[0].state == state && mc[0].handle == handle) {
return 0;
}
if (mc[1].state == state && mc[0].handle == handle) {
return 1;
} else {
return -1;
}
}
/*!
* Run the Memory Card state machine. This is called once per frame in GOAL.
* It:
* - does nothing if there is an in-progress memory card operation
* - if async memory card functions are done, runs their callbacks
* - if there is a requested operation, starts running sony functions.
* - if there is none of the above, and unknown cards, finds out about them.
* - every now and then, recheck cards.
*/
void MC_run() {
// if we have an in-progress operation, it will have set a callback.
if (callback) {
s32 sony_cmd, sony_status;
// check the status
s32 status = sceMcSync(1, &sony_cmd, &sony_status);
McCallbackFunc callback_for_sync = callback;
if (status == sceMcExecRun) {
// busy, return.
return;
}
if (status == sceMcExecFinish) {
// sony function is done. do the callback.
callback = nullptr;
(*callback_for_sync)(sony_status);
} else {
// sony function is done, but failed.
callback = nullptr;
(*callback_for_sync)(0);
}
if (callback) {
// if we got another callback, it means there's another op started by the prev callback.
// and this case, we want to wait for that operation to finish.
return;
}
}
// if we got here, there is no in-progress sony function. So start the next one, if we should
if (op.operation == MemoryCardOperationKind::FORMAT) {
mc_print("begin format operation");
// grab the slot. should be open, but not formatted
p1 = handle_to_slot(op.param, MemoryCardState::OPEN_BUT_UNFORMATTED);
if (p1 == -1) {
// no slot in the right state.
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::BAD_HANDLE;
} else {
// do a getInfo
s32 info_result = sceMcGetInfo(p1, 0, &p2, &p3, &p4);
if (info_result == sceMcResSucceed) {
callback = cb_reprobe_format;
}
// allow some number of errors.
op.retry_count--;
if (op.retry_count == 0) {
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::INTERNAL_ERROR;
}
}
} else if (op.operation == MemoryCardOperationKind::UNFORMAT) {
mc_print("begin unformat operation");
p1 = handle_to_slot(op.param, MemoryCardState::FORMATTED);
if (p1 == -1) {
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::BAD_HANDLE;
} else {
s32 rv = sceMcUnformat(p1, 0);
if (rv == sceMcResSucceed) {
callback = cb_unformat;
}
op.retry_count--;
if (op.retry_count == 0) {
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::INTERNAL_ERROR;
}
}
} else if (op.operation == MemoryCardOperationKind::CREATE_FILE) {
mc_print("begin create file operation");
p1 = handle_to_slot(op.param, MemoryCardState::FORMATTED);
if (p1 == -1) {
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::BAD_HANDLE;
} else {
s32 info_result = sceMcGetInfo(p1, 0, &p2, &p3, &p4);
if (info_result == sceMcResSucceed) {
callback = cb_reprobe_createfile;
}
// allow some number of errors.
op.retry_count--;
if (op.retry_count == 0) {
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::INTERNAL_ERROR;
}
}
} else if (op.operation == MemoryCardOperationKind::SAVE) {
mc_print("begin save operation");
p1 = handle_to_slot(op.param, MemoryCardState::FORMATTED);
if (p1 == -1) {
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::BAD_HANDLE;
} else {
s32 info_result = sceMcGetInfo(p1, 0, &p2, &p3, &p4);
if (info_result == sceMcResSucceed) {
callback = cb_reprobe_save;
}
// allow some number of errors.
op.retry_count--;
if (op.retry_count == 0) {
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::INTERNAL_ERROR;
}
}
} else if (op.operation == MemoryCardOperationKind::LOAD) {
mc_print("begin load operation");
p1 = handle_to_slot(op.param, MemoryCardState::FORMATTED);
if (p1 == -1) {
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::BAD_HANDLE;
} else {
if (!mc[p1].files[op.param2].present) {
// tried to load, but there's no save data in the file.
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::NO_MEMORY;
} else {
s32 info_result = sceMcGetInfo(p1, 0, &p2, &p3, &p4);
if (info_result == sceMcResSucceed) {
callback = cb_reprobe_load;
}
op.retry_count--;
if (op.retry_count == 0) {
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::INTERNAL_ERROR;
}
}
}
// below here is just doing maintenance to look for new/removed memory cards.
} else if (mc[0].state == MemoryCardState::UNKNOWN) {
mc_print("begin probe operation for slot 0");
// don't know anything about port 0, try and see
p1 = 0;
if (sceMcGetInfo(0, 0, &p2, &p3, &p4) == sceMcResSucceed) {
callback = cb_probe;
}
} else if (mc[1].state == MemoryCardState::UNKNOWN) {
mc_print("begin probe operation for slot 1");
// don't know anything about port 1, try and see
p1 = 1;
if (sceMcGetInfo(1, 0, &p2, &p3, &p4) == sceMcResSucceed) {
callback = cb_probe;
}
} else if (mc[0].state == MemoryCardState::KNOWN) {
if (mc[0].countdown_to_check == 1) {
// we're about to recheck the memory card. If we're only inknown, reset to unknown so we do a
// completely fresh probe instead of a reprobe.
mc[0].state = MemoryCardState::UNKNOWN;
}
} else if (mc[0].countdown_to_check == 1) {
// it's been a while, do a check and see if the memory card is still there.
p1 = 0;
mc[0].countdown_to_check--;
mc_print("begin reprobe operation for slot 0");
if (sceMcGetInfo(0, 0, &p2, &p3, &p4) == sceMcResSucceed) {
callback = cb_reprobe;
}
return;
} else {
// decrement port 0's countdown
mc[0].countdown_to_check--;
// do the same thing for port 1
if (mc[1].state == MemoryCardState::KNOWN) {
mc[1].countdown_to_check--;
if (mc[1].countdown_to_check == 0) {
// hack - will make us do a probe next time we get here.
mc[1].state = MemoryCardState::UNKNOWN;
}
} else {
mc[1].countdown_to_check--;
if (mc[1].countdown_to_check == 0) {
p1 = 1;
mc_print("begin probe operation for slot 0");
if (sceMcGetInfo(1, 0, &p2, &p3, &p4) == sceMcResSucceed) {
callback = cb_reprobe;
}
}
}
}
}
/////////////////////////
// Memory Card Functions
/////////////////////////
// These functions are called from GOAL to start memory card operations.
/*!
* Set the language or something.
*/
void MC_set_language(s32 l) {
printf("Language set to %d\n", l);
language = l;
}
/*!
* Set the current memory card operation to FORMAT the given card.
*/
u64 MC_format(s32 card_idx) {
u64 can_add = op.operation == MemoryCardOperationKind::NO_OP;
mc_print("requested format");
if (can_add) {
mc_print("setting op to format");
op.operation = MemoryCardOperationKind::FORMAT;
op.result = McStatusCode::BUSY;
op.retry_count = 100;
op.param = card_idx;
}
return can_add;
}
/*!
* Set the current memory card operation to UNFORMAT the given card.
*/
u64 MC_unformat(s32 card_idx) {
u64 can_add = op.operation == MemoryCardOperationKind::NO_OP;
mc_print("requested unformat");
if (can_add) {
mc_print("setting op to unformat");
op.operation = MemoryCardOperationKind::UNFORMAT;
op.result = McStatusCode::BUSY;
op.retry_count = 100;
op.param = card_idx;
}
return can_add;
}
/*!
* Set the current memory card operation to create the save file.
* The data I believe is just an empty buffer used as temporary storage.
*/
u64 MC_createfile(s32 param, Ptr<u8> data) {
u64 can_add = op.operation == MemoryCardOperationKind::NO_OP;
mc_print("requested createfile");
if (can_add) {
mc_print("setting op to create file");
op.operation = MemoryCardOperationKind::CREATE_FILE;
op.result = McStatusCode::BUSY;
op.retry_count = 100;
op.param = param;
op.data_ptr = data;
}
return can_add;
}
/*!
* Set the current operation to SAVE.
* The "summary data" is data that will be used when previewing save files (number of orbs etc)
*/
u64 MC_save(s32 card_idx, s32 file_idx, Ptr<u8> save_data, Ptr<u8> save_summary_data) {
mc_print("requested save");
u64 can_add = op.operation == MemoryCardOperationKind::NO_OP;
if (can_add) {
mc_print("setting op to save");
op.operation = MemoryCardOperationKind::SAVE;
op.result = McStatusCode::BUSY;
op.retry_count = 100;
op.param = card_idx;
op.param2 = file_idx;
op.data_ptr = save_data;
op.data_ptr2 = save_summary_data;
}
return can_add;
}
/*!
* Set the current operation to LOAD.
*/
u64 MC_load(s32 card_idx, s32 file_idx, Ptr<u8> data) {
mc_print("requested load");
u64 can_add = op.operation == MemoryCardOperationKind::NO_OP;
if (can_add) {
mc_print("setting op to load");
op.operation = MemoryCardOperationKind::LOAD;
op.result = McStatusCode::BUSY;
op.retry_count = 100;
op.param = card_idx;
op.param2 = file_idx;
op.data_ptr = data;
}
return can_add;
}
/*!
* Some sort of test function for memory card stuff.
* This is exported as a GOAL function, but nothing calls it.
*/
void MC_makefile(s32 port, s32 size) {
sceMcMkdir(port, 0, "/BASCUS-00000XXXXXXXX");
// wait for operation to complete
s32 cmd, result, fd;
sceMcSync(0, &cmd, &result);
if (result == sceMcResSucceed || result == sceMcResNoEntry) {
// it worked, or the folder already exists...
// open file
sceMcOpen(port, 0, "/BASCUS-00000XXXXXXXX/BASCUS-00000XXXXXXXX", SCE_CREAT | SCE_WRONLY);
sceMcSync(0, &cmd, &fd);
if (result < 0) {
printf("Can\'t open file on memcard [%d]\n", result);
} else {
// write some random crap into the memory card.
sceMcWrite(fd, Ptr<u8>(0x1000000).c(), size);
sceMcSync(0, &cmd, &result);
if (result != size) {
printf("Only written %d bytes\n", result);
}
sceMcClose(fd);
sceMcSync(0, &cmd, &result);
}
} else {
printf("Can\'t create garbage folder [%d]\n", result);
}
}
/*!
* Get the result of the currently executing (or most recently executed) command
*/
u32 MC_check_result() {
return (u32)op.result;
}
/*!
* Update the info for the given slot.
* You can call this at any time.
*/
void MC_get_status(s32 slot, Ptr<mc_slot_info> info) {
info->handle = 0;
info->known = 0;
info->formatted = 0;
info->initted = 0;
for (s32 i = 0; i < 4; i++) {
info->files[i].present = 0;
}
info->last_file = 0xffffffff;
info->mem_required = SAVE_SIZE;
info->mem_actual = 0;
switch (mc[slot].state) {
case MemoryCardState::KNOWN:
info->known = 1;
break;
case MemoryCardState::OPEN_BUT_UNFORMATTED:
info->known = 1;
info->handle = mc[slot].handle;
break;
case MemoryCardState::FORMATTED:
info->known = 1;
info->handle = mc[slot].handle;
info->formatted = 1;
if (mc[slot].inited == 0) {
info->mem_actual = mc[slot].mem_size;
} else {
info->initted = 1;
// copy over the preview data.
for (s32 file = 0; file < 4; file++) {
info->files[file].present = mc[slot].files[file].present;
for (s32 i = 0; i < 64; i++) { // actually a loop over u32's
info->files[file].data[i] = mc[slot].files[file].data[i];
}
}
info->last_file = mc[slot].last_file;
}
break;
case MemoryCardState::UNKNOWN:
break;
}
}
/*!
* Check for an error. Returns true if there is an error and sets op.result as needed
*/
u64 cb_check(s32 sony_error, McStatusCode goal_error) {
if (sony_error < 0) {
// sony thing failed.
if (sony_error < -9) {
// memory card gone. reset state
mc[p1].state = MemoryCardState::UNKNOWN;
// kill in progress op
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::BAD_HANDLE;
return 1;
} else {
// return the given GOAL error.
op.operation = MemoryCardOperationKind::NO_OP;
op.result = goal_error;
return 1;
}
}
return 0;
}
/*!
* Is this sync-result an error? If so, set status to unknown.
*/
bool cb_pcheck(s32 sync_result) {
if (sync_result < 0) {
mc[p1].state = MemoryCardState::UNKNOWN;
}
return sync_result < 0;
}
/*!
* Callback for sceMcGetInfo for the first time (assumes nothing about the card)
*/
void cb_probe(s32 sync_result) {
if (sync_result < -9) {
// changed card. We have the card, but we don't know anything about it.
mc[p1].state = MemoryCardState::KNOWN;
mc[p1].countdown_to_check = 100;
mc_print("probe: bad sync, trying again in a bit");
} else {
// there is a memory card.
if (p2 == sceMcTypePS2) {
// it is the right type.
// create a new handle
mc[p1].handle = new_mc_handle();
if (p4 == 0) {
mc_print("probe: got a card, but it's not formatted");
// it's not formatted. But open (we have a handle)
mc[p1].state = MemoryCardState::OPEN_BUT_UNFORMATTED;
mc[p1].countdown_to_check = 100;
} else {
mc_print("probe: got a formatted card, trying getdir");
// it's formatted. Get the size
mc[p1].mem_size = p3;
p2 = 0;
// and get our jak and daxter directory
if (sceMcGetDir(p1, 0, filename[0], 0, 1, &dirent) == sceMcResSucceed) {
callback = cb_getdir;
} else {
mc[p1].state = MemoryCardState::UNKNOWN;
}
}
} else {
mc_print("probe: bad card type, trying again in a bit");
mc[p1].state = MemoryCardState::KNOWN;
mc[p1].countdown_to_check = 100;
}
}
}
/*!
* Callback for sceMcGetDir. This runs again and again to check all files
*/
void cb_getdir(s32 sync_result) {
// called after sceMcGetDir
if (sync_result == 0) {
// didn't find the jak and daxter dir, or some stuff is missing.
// call this uninitialized.
mc[p1].inited = false;
mc[p1].state = MemoryCardState::FORMATTED;
mc[p1].countdown_to_check = 100;
mc[p1].last_file = -1;
} else if (sync_result == 1) {
// found whatever we were looking for
p2++;
if (p2 == 12) {
// all done checking for files.
mc[p1].inited = true;
mc[p1].countdown_to_check = 100;
mc[p1].last_file = -1;
for (int i = 0; i < 4; i++) {
mc[p1].files[i].present = 0;
}
// now open file 4, which is the first bank.
p2 = 4;
mc_print("opening first bank...");
if (sceMcOpen(p1, 0, filename[4], 1) == sceMcResSucceed) {
callback = cb_check_open;
} else {
mc[p1].state = MemoryCardState::UNKNOWN;
}
} else {
// still checking files, check the next one.
mc_print("checking {}", filename[p2]);
if (sceMcGetDir(p1, 0, filename[p2], 0, 1, &dirent) == sceMcResSucceed) {
callback = cb_getdir;
} else {
mc[p1].state = MemoryCardState::UNKNOWN;
}
}
} else {
mc[p1].state = MemoryCardState::UNKNOWN;
}
}
/*!
* Callback for sceMcOpen for opening bank files.
*/
void cb_check_open(s32 sync_result) {
if (!cb_pcheck(sync_result)) {
p3 = sync_result;
// read the header.
mc_print("read header");
if (sceMcRead(sync_result, &header, sizeof(McHeader)) == sceMcResSucceed) {
callback = cb_check_read;
} else {
mc[p1].state = MemoryCardState::UNKNOWN;
}
}
}
/*!
* Callback for sceMcRead for reading the header of a bank file.
*/
void cb_check_read(s32 sync_result) {
if (!cb_pcheck(sync_result)) {
if (header.save_count != 0 && // we've saved into this bank
header.magic == MEM_CARD_MAGIC // looks valid
) {
// each file has two banks. so if you corrupt a save, you hopefully have the other bank.
// get the file that goes with this bank
s32 file_idx = (p2 - 4) / 2;
if (mc[p1].files[file_idx].present == 0 || // haven't found any banks for this file
header.save_count > mc[p1].files[file_idx].most_recent_save_count // newer than prev.
) {
// this is so far our best guess at the right bank to use.
mc[p1].files[file_idx].present = 1;
mc[p1].files[file_idx].most_recent_save_count = header.save_count;
mc[p1].files[file_idx].last_saved_bank = p2 & 1;
// copy header data (for GOAL to read)
for (int i = 0; i < 64; i++) {
mc[p1].files[file_idx].data[i] = header.preview_data[i];
}
}
}
if (sceMcClose(p3) == sceMcResSucceed) {
// close the file
callback = cb_check_close;
} else {
mc[p1].state = MemoryCardState::UNKNOWN;
}
}
}
/*!
* Callback for closing a file after reading the header
*/
void cb_check_close(s32 sync_result) {
if (!cb_pcheck(sync_result)) {
// next bank.
p2++;
if (p2 == 12) {
// done with banks
mc[p1].state = MemoryCardState::FORMATTED;
// and we're done!
} else {
// on to the next bank...
if (sceMcOpen(p1, 0, filename[p2], 1) == sceMcResSucceed) {
callback = cb_check_open;
} else {
mc[p1].state = MemoryCardState::UNKNOWN;
}
}
}
}
/*!
* Callback for checking on a known memory card. If it is swapped, will reset.
*/
void cb_reprobe(s32 sync_result) {
if (sync_result == sceMcResSucceed) {
// nobody took out the memory card. try again in 100 frames
mc[p1].countdown_to_check = 100;
} else {
// somebody took it out. reset everything!
mc[p1].state = MemoryCardState::UNKNOWN;
}
}
/*!
* Callback for probe before formatting.
*/
void cb_reprobe_format(s32 sync_result) {
if (sync_result == sceMcResSucceed) {
// get info succeeded. we can format.
s32 format_result = sceMcFormat(p1, 0);
if (format_result == sceMcResSucceed) {
callback = cb_format_complete;
} else {
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::INTERNAL_ERROR;
}
} else {
// get info failed. Revert the state to unknown, this will restart everything.
mc[p1].state = MemoryCardState::UNKNOWN;
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::BAD_HANDLE;
}
}
/*!
* Callback for actual formatting operation
*/
void cb_format_complete(s32 sync_result) {
if (sync_result == sceMcResSucceed) {
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::OK;
mc[p1].state = MemoryCardState::FORMATTED;
mc[p1].countdown_to_check = 100;
mc[p1].inited = 0;
for (int i = 0; i < 4; i++) {
mc[p1].files[i].present = 0;
}
mc[p1].last_file = -1;
mc[p1].mem_size = 8000;
} else {
mc[p1].state = MemoryCardState::UNKNOWN;
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::FORMAT_FAILED;
}
}
/*!
* Callback for actual unformatting operation
*/
void cb_unformat(s32 sync_result) {
if (sync_result == sceMcResSucceed) {
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::OK;
mc[p1].state = MemoryCardState::UNKNOWN;
} else {
mc[p1].state = MemoryCardState::UNKNOWN;
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::FORMAT_FAILED;
}
}
/*!
* Callback for probe before creating save files.
*/
void cb_reprobe_createfile(s32 sync_result) {
if (sync_result == sceMcResSucceed) {
// if the ramdisk is ready, just jump directly to its callback
if (!RpcBusy(RAMDISK_RPC_CHANNEL)) {
cb_wait_for_ramdisk(0);
} else {
// I think this is a typo and should be cb_reprobe_createfile again.
callback = cb_wait_for_ramdisk;
}
} else {
mc[p1].state = MemoryCardState::UNKNOWN;
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::BAD_HANDLE;
}
}
/*!
* Actually start the ramdisk load of the icon file to temp buffer
*/
void cb_wait_for_ramdisk(s32) {
ramdisk_cmd.pad = 0;
// caller should have given us a temporary buffer.
ramdisk_cmd.file_id_or_ee_addr = op.data_ptr.offset;
ramdisk_cmd.offset_into_file = 0;
ramdisk_cmd.size = 0x1e800;
memcpy(ramdisk_cmd.name, "SAVEGAME.ICO", 13); // was 16.
RpcCall(RAMDISK_RPC_CHANNEL, RAMDISK_BYPASS_LOAD_FILE, 1, &ramdisk_cmd, 0x20, nullptr, 0);
callback = cb_wait_for_ramdisk_load;
}
/*!
* Callback for checking if the ramdisk load is done
*/
void cb_wait_for_ramdisk_load(s32) {
if (RpcBusy(RAMDISK_RPC_CHANNEL) == 0) {
// ramdisk is done. start deleting 12 files
p2 = 11; // filenames left to delete
mc_print("start delete {}", filename[11]);
if (sceMcDelete(p1, 0, filename[11]) == sceMcResSucceed) {
callback = cb_createfile_erasing;
} else {
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::INTERNAL_ERROR;
}
} else {
// still waiting...
callback = cb_wait_for_ramdisk_load;
}
}
/*!
* Callback to start erasing previous save files.
*/
void cb_createfile_erasing(s32 sync_result) {
if (sync_result == sceMcResSucceed || sync_result == sceMcResNoEntry ||
sync_result == sceMcResNotEmpty) {
mc[p1].inited = 0;
// delete didn't fail.
if (p2 < 1) {
// on the last one. move on on to creating the directory again.
mc_print("create dir {}", filename[0]);
if (sceMcMkdir(p1, 0, filename[0]) == sceMcResSucceed) {
callback = cb_createdir;
} else {
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::INTERNAL_ERROR;
}
} else {
p2--;
mc_print("delete next {}", filename[p2]);
if (sceMcDelete(p1, 0, filename[p2]) == sceMcResSucceed) {
callback = cb_createfile_erasing;
} else {
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::INTERNAL_ERROR;
}
}
} else {
if (sync_result == sceMcResDeniedPermit) {
mc_print("erasing: denied");
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::INTERNAL_ERROR;
} else {
mc_print("erasing: other bad");
mc[p1].state = MemoryCardState::UNKNOWN;
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::BAD_HANDLE;
}
}
}
/*!
* Callback after creating directory for jak save data
*/
void cb_createdir(s32 sync_result) {
if (!cb_check(sync_result, McStatusCode::WRITE_ERROR)) {
// this sets up some stuff for the icon file that we will ignore.
// memset(&iconsys,0,0x3c4);
// kstrcpy(&iconsys,&DAT_00137000);
// if (language == Language::Japanese) {
// kstrcpy(&DAT_00137560,titles[5]);
// } else {
// // non japanese need to convert to shift-JIS format.
// ASCII2SJIS(&DAT_00137560,titles[language]);
// }
// DAT_001374a6 = 0x20;
// DAT_001374ac = 0;
// memcpy(&DAT_001374b0,bgcolor.610,0x40);
// memcpy(&DAT_001374f0,lightdir.611,0x30);
// memcpy(&DAT_00137520,lightcol.612,0x30);
// memcpy(&DAT_00137550,ambient.613,0x10);
// kstrcpy(&DAT_001375a4,"icon.ico");
// kstrcpy(&DAT_001375e4,"icon.ico");
// kstrcpy(&DAT_00137624,"icon.ico");
p2 = 1;
// move on to creating files
mc_print("starting create file at {}", filename[p2]);
if (sceMcOpen(p1, 0, filename[1], 0x203) == 0) {
callback = cb_createdfile;
} else {
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::INTERNAL_ERROR;
}
}
}
/*!
* Callback after creating the file.
*/
void cb_createdfile(s32 sync_result) {
if (!cb_check(sync_result, McStatusCode::WRITE_ERROR)) {
mc_print("create file cb {}", filename[p2]);
if (p2 == 1) {
p3 = sync_result; // the fd of the icon file.
// actually would write the icon sys file.
if (sceMcWrite(sync_result, nullptr, 0) == sceMcResSucceed) {
callback = cb_writtenfile;
} else {
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::INTERNAL_ERROR;
}
} else if (p2 == 2) {
p3 = sync_result;
// would write the icon data (ramdisk loaded into the temp buffer)
if (sceMcWrite(sync_result, nullptr, 0) == sceMcResSucceed) {
callback = cb_writtenfile;
} else {
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::INTERNAL_ERROR;
}
} else if (p2 == 3) {
// writes the aybabtu meme file
p3 = sync_result;
kstrcpy(op.data_ptr.cast<char>().c(), "Nope, the save game data isn\'t in this file!\n");
if (sceMcWrite(p3, op.data_ptr.c(), strlen((const char*)op.data_ptr.c())) ==
sceMcResSucceed) {
callback = cb_writtenfile;
} else {
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::INTERNAL_ERROR;
}
} else {
// writes the actual bank files.
p3 = sync_result;
memset(op.data_ptr.c(), 0, 0x11800);
if (sceMcWrite(p3, op.data_ptr.c(), 0x11800) == sceMcResSucceed) {
callback = cb_writtenfile;
} else {
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::INTERNAL_ERROR;
}
}
}
}
/*!
* Callback after writing data to files.
*/
void cb_writtenfile(s32 sync_result) {
if (!cb_check(sync_result, McStatusCode::WRITE_ERROR)) {
if (sceMcClose(p3) == sceMcResSucceed) {
callback = cb_closedfile;
} else {
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::INTERNAL_ERROR;
}
}
}
/*!
* Callback after closing the file.
*/
void cb_closedfile(s32 sync_result) {
if (!cb_check(sync_result, McStatusCode::WRITE_ERROR)) {
p2++;
if (p2 < 0xc) {
// open the next one
if (sceMcOpen(p1, 0, filename[p2], 0x203) == sceMcResSucceed) {
callback = cb_createdfile;
} else {
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::INTERNAL_ERROR;
}
} else {
// done!
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::OK;
// save data is inited
mc[p1].inited = 1;
// but no files have anything in it.
for (int i = 0; i < 4; i++) {
mc[p1].files[i].present = 0;
}
mc[p1].last_file = -1;
}
}
}
/*!
* Callback after check before saving.
*/
void cb_reprobe_save(s32 sync_result) {
if (sync_result == sceMcResSucceed) {
if (!mc[p1].files[op.param2].present) {
mc_print("reprobe save: first time!");
// first time saving!
p2 = 0; // save count 0
p4 = 0; // first bank for file
} else {
p2 = mc[p1].files[op.param2].most_recent_save_count + 1; // increment save count
p4 = mc[p1].files[op.param2].last_saved_bank ^ 1; // use the other bank
}
// reserve 0 as "I never saved" and use 1 instead.
if (p2 == 0) {
p2 = 1;
}
// file*2 + p4 is the bank (2 banks per file, p4 is 0 or 1 to select the bank)
// 4 is the first bank file
mc_print("open {} for saving", filename[op.param2 * 2 + 4 + p4]);
if (sceMcOpen(p1, 0, filename[op.param2 * 2 + 4 + p4], 2) == sceMcResSucceed) {
callback = cb_openedsave;
} else {
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::INTERNAL_ERROR;
}
} else {
mc[p1].state = MemoryCardState::UNKNOWN;
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::BAD_HANDLE;
}
}
void cb_openedsave(s32 sync_result) {
if (!cb_check(sync_result, McStatusCode::WRITE_ERROR)) {
mc_print("save file opened, writing header...");
p3 = sync_result;
memset(&header, 0, sizeof(McHeader));
header.save_count = p2;
header.checksum = mc_checksum(op.data_ptr, BANK_SIZE);
header.magic = MEM_CARD_MAGIC;
header.unk1_repeated = p2;
for (int i = 0; i < 64; i++) {
header.preview_data[i] = op.data_ptr2.c()[i];
}
if (sceMcWrite(p3, &header, sizeof(McHeader)) == sceMcResSucceed) {
callback = cb_savedheader;
} else {
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::INTERNAL_ERROR;
}
}
}
void cb_savedheader(s32 sync_result) {
if (!cb_check(sync_result, McStatusCode::WRITE_ERROR)) {
mc_print("save file writing main data");
if (sceMcWrite(p3, op.data_ptr.c(), BANK_SIZE) == sceMcResSucceed) {
callback = cb_saveddata;
} else {
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::INTERNAL_ERROR;
}
}
}
void cb_saveddata(s32 sync_result) {
mc_print("save file writing footer");
if (!cb_check(sync_result, McStatusCode::WRITE_ERROR)) {
if (sceMcWrite(p3, &header, sizeof(McHeader)) == sceMcResSucceed) {
callback = cb_savedfooter;
} else {
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::INTERNAL_ERROR;
}
}
}
void cb_savedfooter(s32 sync_result) {
mc_print("closing after save");
if (!cb_check(sync_result, McStatusCode::WRITE_ERROR)) {
if (sceMcClose(p3) == sceMcResSucceed) {
callback = cb_closedsave;
} else {
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::INTERNAL_ERROR;
}
}
}
void cb_closedsave(s32 sync_result) {
if (!cb_check(sync_result, McStatusCode::WRITE_ERROR)) {
mc_print("All done with saving!!");
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::OK;
mc[p1].files[op.param2].present = 1;
mc[p1].files[op.param2].most_recent_save_count = p2;
mc[p1].files[op.param2].last_saved_bank = p4;
for (int i = 0; i < 64; i++) {
mc[p1].files[op.param2].data[i] = op.data_ptr2.c()[i];
}
mc[p1].last_file = op.param2;
flush_memory_card_to_file();
}
}
void cb_reprobe_load(s32 sync_result) {
if (sync_result == 0) {
p2 = 0;
mc_print("opening save file {}", filename[op.param2 * 2 + 4]);
if (sceMcOpen(p1, 0, filename[op.param2 * 2 + 4], 1) == sceMcResSucceed) {
callback = cb_openedload;
} else {
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::INTERNAL_ERROR;
}
} else {
mc[p1].state = MemoryCardState::UNKNOWN;
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::BAD_HANDLE;
}
}
void cb_openedload(s32 sync_result) {
if (cb_check(sync_result, McStatusCode::READ_ERROR) == 0) {
p3 = sync_result;
size_t read_size = (BANK_SIZE + 2 * sizeof(McHeader));
mc_print("reading save file...");
if (sceMcRead(sync_result, op.data_ptr.c() + p2 * read_size, read_size) == sceMcResSucceed) {
callback = cb_readload;
} else {
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::INTERNAL_ERROR;
}
}
}
void cb_readload(s32 sync_result) {
if (cb_check(sync_result, McStatusCode::READ_ERROR) == 0) {
mc_print("closing save file..");
if (sceMcClose(p3) == sceMcResSucceed) {
callback = cb_closedload;
} else {
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::INTERNAL_ERROR;
}
}
}
void cb_closedload(s32 sync_result) {
if (cb_check(sync_result, McStatusCode::READ_ERROR) == 0) {
p2++;
if (p2 < 2) {
mc_print("reading next save bank {}", filename[op.param2 * 2 + 4 + p2]);
if (sceMcOpen(p1, 0, filename[op.param2 * 2 + 4 + p2], 1) == sceMcResSucceed) {
callback = cb_openedload;
} else {
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::INTERNAL_ERROR;
}
} else {
// let's verify the data.
McHeader* headers[2];
McHeader* footers[2];
bool ok[2];
headers[0] = (McHeader*)(op.data_ptr.c());
footers[0] = (McHeader*)(op.data_ptr.c() + sizeof(McHeader) + BANK_SIZE);
headers[1] = (McHeader*)(op.data_ptr.c() + sizeof(McHeader) * 2 + BANK_SIZE);
footers[1] = (McHeader*)(op.data_ptr.c() + sizeof(McHeader) * 3 + BANK_SIZE * 2);
static_assert(sizeof(McHeader) * 3 + BANK_SIZE * 2 == 0x20c00, "save layout");
ok[0] = true;
ok[1] = true;
for (int idx = 0; idx < 2; idx++) {
u32 expected_save_count = headers[idx]->save_count;
if (headers[idx]->unk1_repeated == expected_save_count &&
footers[idx]->save_count == expected_save_count &&
footers[idx]->unk1_repeated == expected_save_count) {
// save count is okay!
if (headers[idx]->magic == MEM_CARD_MAGIC && footers[idx]->magic == MEM_CARD_MAGIC) {
// magic numbers okay!
if (headers[idx]->checksum == footers[idx]->checksum) {
// checksum
auto expected_checksum = headers[idx]->checksum;
if (mc_checksum(make_u8_ptr(headers[idx] + 1), BANK_SIZE) != expected_checksum) {
mc_print("failed checksum");
ok[idx] = false;
}
} else {
mc_print("corrupted checksum");
ok[idx] = false;
}
} else {
mc_print("bad magic");
ok[idx] = false;
}
} else {
mc_print("bad save count");
ok[idx] = false;
}
}
mc_print("checking loaded banks");
//
if (!ok[0] && !ok[1]) {
// no good data.
if (headers[0]->save_count == 0 && headers[0]->checksum == 0 && headers[0]->magic == 0 &&
headers[0]->unk1_repeated == 0 && headers[1]->save_count == 0 &&
headers[1]->checksum == 0 && headers[1]->magic == 0 && headers[1]->unk1_repeated == 0) {
// this is a fresh file that you tried to load from...
mc_print("new game result");
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::NEW_GAME;
mc[p1].last_file = op.param2;
} else {
mc_print("corrupted data");
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::READ_ERROR;
}
} else {
// pick the bank
int bank = 0;
if (!ok[0] || !ok[1]) {
if (ok[1]) {
bank = 1;
}
} else {
bank = (headers[0]->save_count - headers[1]->save_count) < 1;
}
u32 current_save_count = headers[bank]->save_count;
memcpy(op.data_ptr.c(), op.data_ptr.c() + sizeof(McHeader), BANK_SIZE);
mc[p1].last_file = op.param2;
mc[p1].files[op.param2].most_recent_save_count = current_save_count;
mc[p1].files[op.param2].last_saved_bank = bank;
op.operation = MemoryCardOperationKind::NO_OP;
op.result = McStatusCode::OK;
mc_print("load succeeded");
}
}
}
}
Reference in a new issue View git blame Copy permalink