static int testMd5()
{
int ret;
int i = 0;
u8 digest[16];
const u8 correctDigest[] = {
0x38, 0xA6, 0xB2, 0x65, 0x28, 0x08, 0x13, 0x93,
0xD8, 0xAF, 0x17, 0xE0, 0xEC, 0x20, 0xD6, 0xDB
};
u8 data[] = {
0x5A, 0x0A, 0x3B, 0xD4, 0x25, 0x0D, 0x7F, 0x63,
0xC7, 0x97, 0x39, 0x23, 0x0F, 0x06, 0x45, 0x43,
0x41, 0x27, 0xD9, 0x31, 0x1A, 0x7D, 0xA7, 0xA4,
0x62, 0xCD, 0xB0, 0x66, 0xEE, 0x93, 0x5D, 0x42,
0x3C, 0xE1, 0xC4, 0x77, 0xD1, 0x96, 0xF2, 0xCA,
0x73, 0xBC, 0x85, 0xEF, 0x7E, 0x85, 0x4A, 0x5C,
0x39, 0x01, 0xDC, 0x86, 0x45, 0x86, 0xFA, 0x17,
0x96, 0x27, 0x25, 0x3F, 0xDC, 0x8B, 0x99, 0x27,
0x88, 0xBD, 0x2E, 0x3D, 0x41, 0x03, 0x46, 0x52,
0xB1, 0x3E, 0x32, 0xA7, 0x18, 0xBA, 0xF3, 0x0F,
0xE8, 0x4C, 0x93, 0xA2, 0xDE, 0x81, 0x41, 0xCA,
0x57, 0x44, 0x7E, 0x98, 0x9D, 0xED, 0x98, 0x1B,
0x2A, 0x3B, 0x30, 0xD1, 0x71, 0xB9, 0x7A, 0x87,
0x18, 0xAF, 0x91, 0xFE, 0x89, 0xA7, 0xCD, 0x5D,
0x8C, 0x68, 0xE4, 0x38, 0xC0, 0x39, 0x61, 0xBF,
0xFD, 0x58, 0xF9, 0x71, 0x0F, 0x0F, 0x92, 0x10,
0x5D, 0xDA, 0x5C, 0x68, 0x81, 0x71, 0xCC, 0x96,
0xD4, 0x08, 0xE1, 0xC3, 0xA7, 0x38, 0x7C, 0x49,
0x05, 0x23, 0x29, 0x81, 0x4C, 0xDA, 0x08, 0xBF,
0x91, 0x37, 0xBE, 0x50, 0x8C, 0xC1, 0x11, 0x6B,
0x3E, 0x72, 0x52, 0xC8, 0xEB, 0x70, 0x64, 0x75,
0xB1, 0xE0, 0x74, 0xA6, 0x46, 0x65, 0xCA, 0x74,
0x11, 0x23, 0x8C, 0xE7, 0x75, 0xB5, 0xA6, 0x79
};
printf("sceKernelUtilsMd5Digest...");
ret = sceKernelUtilsMd5Digest(data, sizeof(data), (void *)digest);
printf("0x%08X - %s\n", ret, ret ? "ERROR" : "OK");
if (ret)
return ret;
printf("Digest: ");
for (i = 0; i < 16; i++)
printf("%02X", digest[i]);
printf("\nCorrect Digest: ");
for (i = 0; i < 16; i++)
printf("%02X", correctDigest[i]);
printf("\nVerfying...");
for (i = 0; i < 16; i++)
if (digest[i] != correctDigest[i]) {
printf("NG\n");
return -1;
}
printf("OK\n");
return 0;
}
static int lua_md5sum(lua_State *L)
{
size_t size;
const char *string = luaL_checklstring(L, 1, &size);
if (!string) return luaL_error(L, "System.md5sum() takes a string as argument.");
u8 digest[16];
sceKernelUtilsMd5Digest((u8*)string, size, digest);
int i;
char result[33];
for (i = 0; i < 16; i++) sprintf(result + 2 * i, "%02x", digest[i]);
lua_pushstring(L, result);
return 1;
}
void checkMD5() {
const int random_data_len = strlen(random_data);
sceKernelUtilsMd5BlockInit(&md5ctx);
sceKernelUtilsMd5BlockUpdate(&md5ctx, random_data, 16);
sceKernelUtilsMd5BlockUpdate(&md5ctx, random_data + 16, random_data_len - 16);
struct MD5Digest digest;
sceKernelUtilsMd5BlockResult(&md5ctx, &digest);
// Probably not the right byte order.
printf("MD5 in parts: %08x%08x%08x%08x\n", digest.data[0], digest.data[1], digest.data[2], digest.data[3]);
memset(&digest, 0, sizeof(digest));
sceKernelUtilsMd5Digest(random_data, random_data_len, &digest);
printf("MD5 digest: %08x%08x%08x%08x\n", digest.data[0], digest.data[1], digest.data[2], digest.data[3]);
}
/*
* Assign a module which is a necessary step after a module
* is created. We check if the specified module can be loaded and
* if everything checked is correct, its moduleInfo section is
* copied with the moduleInfo section content provided by
* execFileInfo.
*/
s32 sceKernelAssignModule(SceModule *mod, SceLoadCoreExecFileInfo *execFileInfo)
{
SceModule *tmpMod = NULL;
SceModule *foundMod = NULL;
SceUID foundUid = 0;
s32 status;
u8 digest[16];
u32 modDevKitVersion;
u32 i;
u32 j;
if (mod == NULL) //0x0000692C
return SCE_ERROR_KERNEL_ERROR;
modDevKitVersion = 0;
mod->next = NULL; //0x00006934
//0x0000695C - 0x0000698C
/*
* Here, we check if a module with the same name as the
* to-be-assigned module is already loaded into memory. If there
* is more than one module with the same name, search for the
* latest loaded module among them. Once we are done with that
* search, we check if the loaded module has the attribute
* SCE_MODULE_ATTR_EXCLUSIVE_LOAD, if this is the case, we cannot
* assign the recently created module.
*/
for (tmpMod = g_loadCore.registeredMods; tmpMod; tmpMod = tmpMod->next) {
if (strcmp(execFileInfo->moduleInfo->modName, tmpMod->modName) == 0) { //0x0000695C
if (tmpMod->modId > foundUid) { //0x00006974
foundUid = mod->modId; //0x0000697C
foundMod = mod; //0x00006980
}
}
}
if (foundMod && foundMod->attribute == SCE_MODULE_ATTR_EXCLUSIVE_LOAD) //0x00006990 & 0x000069A0
return SCE_ERROR_KERNEL_EXCLUSIVE_LOAD;
status = CheckDevkitVersion(execFileInfo->moduleInfo, &modDevKitVersion); //0x000069AC
if (status < SCE_ERROR_OK) //0x000069B8
return SCE_ERROR_KERNEL_UNSUPPORTED_PRX_TYPE;
mod->attribute = (execFileInfo->moduleInfo->modAttribute & ~SCE_PRIVILEGED_MODULES) | execFileInfo->modInfoAttribute; //0x000069CC & 0x000069E0
if ((mod->attribute & SCE_PRIVILEGED_MODULES) == SCE_MODULE_KERNEL)
mod->status &= ~SCE_MODULE_USER_MODULE; //0x00006BB4
else
mod->status |= SCE_MODULE_USER_MODULE; //0x000069E8
mod->version[MODULE_VERSION_MINOR] = execFileInfo->moduleInfo->modVersion[MODULE_VERSION_MINOR]; //0x000069EC & 0x000069F8
mod->version[MODULE_VERSION_MAJOR] = execFileInfo->moduleInfo->modVersion[MODULE_VERSION_MAJOR]; //0x00006A00 & 0x00006A08
if (strcmp(execFileInfo->moduleInfo->modName, MODULE_IFHANDLE_NAME_OLD) == 0 ||
strcmp(execFileInfo->moduleInfo->modName, MODULE_IFHANDLE_NAME_NEW) == 0) //0x00006A0C & 0x00006A20
return SCE_ERROR_KERNEL_UNSUPPORTED_PRX_TYPE;
sceKernelUtilsMd5Digest((u8 *)execFileInfo->moduleInfo->modName, strlen(execFileInfo->moduleInfo->modName), digest); //0x00006A70
//0x00006A78 - 0x00006ACC
for (i = 0; i < HASH_DATA_64_BIT_ELEMENTS; i++) {
//0x00006A98 - 0x00006AB8
for (j = 0; j < sizeof digest; j++) {
if (digest[j] != *(u8 *)((u64 *)g_hashData + i)) //0x00006AA8
break;
}
if (j == 16) { //0x00006AC0
if ((modDevKitVersion & 0xFFFFFF00) <= MD5_DIGEST_UNSUPPORTED_DEVKIT_VERSION) //0x00006BA4
return SCE_ERROR_KERNEL_UNSUPPORTED_PRX_TYPE;
break;
}
}
/* copy over the moduleInfo data of the provided execFileInfo. */
strncpy(mod->modName, execFileInfo->moduleInfo->modName, SCE_MODULE_NAME_LEN); //0x00006ADC
mod->terminal = 0; //0x00006AE4
mod->entryAddr = execFileInfo->entryAddr; //0x00006AEC & 0x00006B08
mod->entTop = execFileInfo->moduleInfo->entTop; //0x00006B1C
mod->textSize = execFileInfo->textSize; //0x00006B20
mod->stubTop = execFileInfo->moduleInfo->stubTop; //0x00006B28
mod->dataSize = execFileInfo->dataSize; //0x00006B2C
mod->gpValue = (u32)execFileInfo->moduleInfo->gpValue; //0x00006B34
mod->bssSize = execFileInfo->bssSize; //0x00006B38
mod->entSize = execFileInfo->moduleInfo->entEnd - execFileInfo->moduleInfo->entTop; //0x00006B3C
mod->stubSize = execFileInfo->moduleInfo->stubEnd - execFileInfo->moduleInfo->stubTop; //0x00006B40
mod->nSegments = execFileInfo->numSegments; //0x00006B48
for (i = 0; i < SCE_KERNEL_MAX_MODULE_SEGMENT; i++) {
mod->segmentAddr[i] = execFileInfo->segmentAddr[i]; //0x00006B60
mod->segmentSize[i] = execFileInfo->segmentSize[i]; //0x00006B6C
mod->segmentAlign[i] = execFileInfo->segmentAlign[i]; //0x00006B78
}
updateUIDName(mod); //0x00006B7C
return SCE_ERROR_OK;
}
