398 lines
11 KiB
C
398 lines
11 KiB
C
//
|
|
// Copyright (c) 2017 The Altra64 project contributors
|
|
// Portions (c) 2013 saturnu (Alt64) based on libdragon, Neo64Menu, ED64IO, libn64-hkz, libmikmod
|
|
// See LICENSE file in the project root for full license information.
|
|
//
|
|
|
|
#include <libdragon.h>
|
|
#include <string.h>
|
|
#include <stdio.h>
|
|
#include "types.h"
|
|
#include "memorypak.h"
|
|
#include "fat.h"
|
|
#include "menu.h"
|
|
#include "mem.h"
|
|
#include "strlib.h"
|
|
#include "sys.h"
|
|
|
|
static uint8_t mempak_data[128 * 256];
|
|
char *mempak_path;
|
|
|
|
char ___TranslateNotes(char *bNote, char *Text)
|
|
{
|
|
#pragma warning(disable : 4305 4309)
|
|
char cReturn = 0x00;
|
|
const char aSpecial[] = {0x21, 0x22, 0x23, 0x60, 0x2A, 0x2B, 0x2C, 0x2D, 0x2E, 0x2F, 0x3A, 0x3D, 0x3F, 0x40, 0x74, 0xA9, 0xAE};
|
|
// { '!' , '\"', '#' , '`' , '*' , '+' , ',' , '-' , '.' , '/' , ':' , '=' , '?' , '>' , 'tm', '(r)','(c)' };
|
|
#pragma warning(default : 4305 4309)
|
|
int i = 16;
|
|
do
|
|
{
|
|
char b = bNote[i];
|
|
if ((b > 0) && i < 32)
|
|
{
|
|
if (b <= 0x0F) // translate Icons as Spaces
|
|
*Text = 0x20;
|
|
else if (b <= 0x19) // Numbers
|
|
*Text = 0x20 + b;
|
|
else if (b <= 0x33) // Characters
|
|
*Text = 0x47 + b;
|
|
else if (b <= 0x44) // special Symbols
|
|
*Text = aSpecial[b - 0x34];
|
|
else if (b <= 0x94) // Japan
|
|
*Text = 0xC0 + (b % 40);
|
|
else // unknown
|
|
*Text = (char)0xA4;
|
|
|
|
++i;
|
|
++Text;
|
|
}
|
|
else
|
|
{
|
|
*Text = '\0';
|
|
if (b)
|
|
{
|
|
i = 12;
|
|
Text = &cReturn;
|
|
}
|
|
else
|
|
i = 13;
|
|
}
|
|
} while (i != 13);
|
|
|
|
return cReturn;
|
|
}
|
|
|
|
char ___CountBlocks(char *bMemPakBinary, char *aNoteSizes)
|
|
{
|
|
int wRemainingBlocks = 123;
|
|
char bNextIndex;
|
|
int i = 0;
|
|
while (i < 16 && wRemainingBlocks <= 123)
|
|
{
|
|
aNoteSizes[i] = 0;
|
|
bNextIndex = bMemPakBinary[0x307 + (i * 0x20)];
|
|
while ((bNextIndex >= 5) && (aNoteSizes[i] < wRemainingBlocks))
|
|
{
|
|
aNoteSizes[i]++;
|
|
bNextIndex = bMemPakBinary[0x101 + (bNextIndex * 2)];
|
|
}
|
|
|
|
if (aNoteSizes[i] > wRemainingBlocks)
|
|
wRemainingBlocks = 0xFF;
|
|
else
|
|
wRemainingBlocks -= aNoteSizes[i];
|
|
|
|
i++;
|
|
}
|
|
return wRemainingBlocks;
|
|
}
|
|
|
|
//old method to write a file to the mempak at controller 1
|
|
void file_to_mpk(display_context_t disp, u8 *filename)
|
|
{
|
|
u8 tmp[32];
|
|
u8 buff[64];
|
|
u8 ok = 0;
|
|
|
|
printText(filename, 9, -1, disp);
|
|
FatRecord rec_tmpf;
|
|
ok = fatFindRecord(filename, &rec_tmpf, 0);
|
|
|
|
u8 resp = 0;
|
|
resp = fatOpenFileByName(filename, 0);
|
|
|
|
u8 *pch;
|
|
pch = strrchr(filename, '.');
|
|
sprintf(buff, "%s", (pch + 2));
|
|
|
|
if (strcmp(buff, "64") == 0)
|
|
{
|
|
printText("Dexdrive format", 9, -1, disp);
|
|
printText("skip header", 9, -1, disp);
|
|
|
|
static uint8_t mempak_data_buff[36928];
|
|
resp = fatReadFile(&mempak_data_buff, 36928 / 512);
|
|
|
|
memcpy(&mempak_data, mempak_data_buff + 4160, 32768);
|
|
}
|
|
else
|
|
{
|
|
printText("Z64 format", 9, -1, disp);
|
|
resp = fatReadFile(&mempak_data, 32768 / 512);
|
|
}
|
|
|
|
int err = 0;
|
|
for (int j = 0; j < 128; j++)
|
|
{
|
|
err |= write_mempak_sector(0, j, &mempak_data[j * MEMPAK_BLOCK_SIZE]);
|
|
}
|
|
}
|
|
|
|
void view_mpk_file(display_context_t disp, char *mpk_filename)
|
|
{
|
|
u8 tmp[32];
|
|
u8 buff[64];
|
|
u8 ok = 0;
|
|
|
|
FatRecord rec_tmpf;
|
|
ok = fatFindRecord(mpk_filename, &rec_tmpf, 0);
|
|
|
|
u8 resp = 0;
|
|
resp = fatOpenFileByName(mpk_filename, 0);
|
|
|
|
u8 *pch;
|
|
pch = strrchr(mpk_filename, '.');
|
|
sprintf(buff, "%s", (pch + 2));
|
|
|
|
if (strcmp(buff, "64") == 0)
|
|
{
|
|
static uint8_t mempak_data_buff[36928];
|
|
resp = fatReadFile(&mempak_data_buff, 36928 / 512);
|
|
memcpy(&mempak_data, mempak_data_buff + 4160, 32768);
|
|
}
|
|
else
|
|
{
|
|
resp = fatReadFile(&mempak_data, 32768 / 512);
|
|
}
|
|
|
|
printText("File content:", 11, 5, disp);
|
|
printText(" ", 11, -1, disp);
|
|
|
|
int notes_c = 0;
|
|
|
|
char szBuffer[40],
|
|
cAppendix;
|
|
int bFirstChar;
|
|
|
|
int i = 0,
|
|
nNotes = 0,
|
|
iSum = 0,
|
|
iRemainingBlocks;
|
|
|
|
char aNoteSizes[16];
|
|
|
|
for (i = 0x10A; i < 0x200; i++)
|
|
iSum += mempak_data[i];
|
|
|
|
if (((iSum % 256) == mempak_data[0x101]))
|
|
{
|
|
iRemainingBlocks = ___CountBlocks(mempak_data, aNoteSizes);
|
|
|
|
if (iRemainingBlocks <= 123)
|
|
{
|
|
for (notes_c = 0; notes_c < 16; notes_c++)
|
|
{
|
|
if (mempak_data[0x300 + (notes_c * 32)] ||
|
|
mempak_data[0x301 + (notes_c * 32)] ||
|
|
mempak_data[0x302 + (notes_c * 32)])
|
|
{
|
|
cAppendix = ___TranslateNotes(&mempak_data[0x300 + (notes_c * 32)], szBuffer);
|
|
|
|
if (cAppendix != '\0')
|
|
sprintf(szBuffer, "%s. %c", szBuffer, cAppendix);
|
|
|
|
bFirstChar = 1;
|
|
for (i = 0; i < (int)strlen(szBuffer); i++)
|
|
{
|
|
if (szBuffer[i] == ' ')
|
|
bFirstChar = 1;
|
|
else
|
|
{
|
|
if (bFirstChar && (szBuffer[i] >= 'a') && (szBuffer[i] <= 'z'))
|
|
{
|
|
bFirstChar = 0;
|
|
szBuffer[i] -= 0x20;
|
|
}
|
|
}
|
|
}
|
|
printText(szBuffer, 11, -1, disp);
|
|
|
|
switch (mempak_data[0x303 + (notes_c * 32)])
|
|
{
|
|
case 0x00:
|
|
sprintf(szBuffer, "None");
|
|
break;
|
|
case 0x37:
|
|
sprintf(szBuffer, "Beta");
|
|
break;
|
|
case 0x41:
|
|
sprintf(szBuffer, "NTSC");
|
|
break;
|
|
case 0x44:
|
|
sprintf(szBuffer, "Germany");
|
|
break;
|
|
case 0x45:
|
|
sprintf(szBuffer, "USA");
|
|
break;
|
|
case 0x46:
|
|
sprintf(szBuffer, "France");
|
|
break;
|
|
case 0x49:
|
|
sprintf(szBuffer, "Italy");
|
|
break;
|
|
case 0x4A:
|
|
sprintf(szBuffer, "Japan");
|
|
break;
|
|
case 0x50:
|
|
sprintf(szBuffer, "Europe");
|
|
break;
|
|
case 0x53:
|
|
sprintf(szBuffer, "Spain");
|
|
break;
|
|
case 0x55:
|
|
sprintf(szBuffer, "Australia");
|
|
break;
|
|
case 0x58:
|
|
case 0x59:
|
|
sprintf(szBuffer, "PAL");
|
|
break;
|
|
default:
|
|
sprintf(szBuffer, "Unknown(%02X)", mempak_data[0x303 + (notes_c * 32)]);
|
|
}
|
|
|
|
sprintf(szBuffer, "%i", aNoteSizes[notes_c]);
|
|
nNotes++;
|
|
}
|
|
}
|
|
}
|
|
|
|
int free_c = 0;
|
|
for (free_c = nNotes; free_c < 16; free_c++)
|
|
printText("[free]", 11, -1, disp);
|
|
|
|
char buff[512];
|
|
printText(" ", 11, -1, disp);
|
|
printText("Free space:", 11, -1, disp);
|
|
sprintf(buff, "%i blocks", iRemainingBlocks);
|
|
printText(buff, 11, -1, disp);
|
|
}
|
|
else
|
|
{
|
|
printText("empty", 11, -1, disp);
|
|
}
|
|
}
|
|
|
|
void view_mpk(display_context_t disp)
|
|
{
|
|
int err;
|
|
|
|
printText("Mempak content:", 11, 5, disp);
|
|
get_accessories_present();
|
|
|
|
/* Make sure they don't have a rumble pak inserted instead */
|
|
switch (identify_accessory(0))
|
|
{
|
|
case ACCESSORY_NONE:
|
|
|
|
printText(" ", 11, -1, disp);
|
|
printText("no Mempak", 11, -1, disp);
|
|
break;
|
|
|
|
case ACCESSORY_MEMPAK:
|
|
if ((err = validate_mempak(0)))
|
|
{
|
|
if (err == -3)
|
|
{
|
|
printText(" ", 11, -1, disp);
|
|
|
|
printText("not formatted", 11, -1, disp);
|
|
}
|
|
else
|
|
{
|
|
printText(" ", 11, -1, disp);
|
|
printText("read error", 11, -1, disp);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
printText(" ", 11, -1, disp);
|
|
for (int j = 0; j < 16; j++)
|
|
{
|
|
entry_structure_t entry;
|
|
|
|
get_mempak_entry(0, j, &entry);
|
|
|
|
if (entry.valid)
|
|
{
|
|
char tmp[512];
|
|
sprintf(tmp, "%s", entry.name);
|
|
printText(tmp, 11, -1, disp);
|
|
}
|
|
else
|
|
{
|
|
printText("[free]", 11, -1, disp);
|
|
}
|
|
}
|
|
|
|
char buff[512];
|
|
printText(" ", 11, -1, disp);
|
|
printText("Free space:", 11, -1, disp);
|
|
sprintf(buff, "%d blocks", get_mempak_free_space(0));
|
|
printText(buff, 11, -1, disp);
|
|
}
|
|
break;
|
|
|
|
case ACCESSORY_RUMBLEPAK:
|
|
printText("RumblePak inserted", 11, -1, disp);
|
|
break;
|
|
|
|
default:
|
|
break;
|
|
}
|
|
}
|
|
|
|
//old function to dump a mempak to a file
|
|
void mpk_to_file(display_context_t disp, char *mpk_filename, int quick)
|
|
{
|
|
u8 buff[64];
|
|
u8 v = 0;
|
|
u8 ok = 0;
|
|
|
|
if (quick)
|
|
sprintf(buff, "%s%s", mempak_path, mpk_filename);
|
|
else
|
|
sprintf(buff, "%s%s.MPK", mempak_path, mpk_filename);
|
|
|
|
FatRecord rec_tmpf;
|
|
|
|
if (!fatFindRecord(buff, &rec_tmpf, 0))
|
|
{ //filename already exists
|
|
printText("File exists", 9, -1, disp);
|
|
if (quick)
|
|
printText("override", 9, -1, disp);
|
|
else
|
|
while (ok == 0)
|
|
{
|
|
sprintf(buff, "%s%s%i.MPK", mempak_path, mpk_filename, v);
|
|
|
|
ok = fatFindRecord(buff, &rec_tmpf, 0);
|
|
if (ok == 0)
|
|
v++;
|
|
else
|
|
break;
|
|
}
|
|
}
|
|
|
|
u8 resp = 0;
|
|
resp = fatCreateRecIfNotExist(buff, 0);
|
|
resp = fatOpenFileByName(buff, 32768 / 512);
|
|
|
|
controller_init();
|
|
|
|
int err = 0;
|
|
for (int j = 0; j < 128; j++)
|
|
{
|
|
err |= read_mempak_sector(0, j, &mempak_data[j * 256]);
|
|
}
|
|
|
|
fatWriteFile(&mempak_data, 32768 / 512);
|
|
|
|
sleep(500);
|
|
|
|
sprintf(buff, "File: %s%i.MPK", mpk_filename, v);
|
|
|
|
printText(buff, 9, -1, disp);
|
|
printText("backup done...", 9, -1, disp);
|
|
}
|