WiiFlow_Lite/source/loader/disc.c

424 lines
8.0 KiB
C
Raw Normal View History

2012-01-21 21:57:41 +01:00
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <ogcsys.h>
#include <unistd.h>
#include <ogc/lwp_threads.h>
2012-01-21 21:57:41 +01:00
#include <ogc/lwp_watchdog.h>
#include "wiiuse/wpad.h"
2012-01-21 21:57:41 +01:00
#include <ogc/machine/processor.h>
#include "apploader.h"
#include "disc.h"
#include "wdvd.h"
#include "sys.h"
#include "fst.h"
#include "videopatch.h"
#include "wbfs.h"
#include "patchcode.h"
#include "frag.h"
#include "usbstorage.h"
#include "wip.h"
#include "memory.h"
2012-01-21 21:57:41 +01:00
#include "gecko.h"
#include "utils.h"
#include "cios.h"
2012-01-21 21:57:41 +01:00
/* Constants */
#define PTABLE_OFFSET 0x40000
//appentrypoint
u32 appentrypoint;
/* Disc pointers */
static u32 *buffer = (u32 *)0x93000000;
static u8 *diskid = (u8 *)0x80000000;
GXRModeObj *vmode = NULL;
u32 vmode_reg = 0;
extern void __exception_closeall();
2012-05-16 17:27:14 +02:00
entry_point p_entry;
2012-01-21 21:57:41 +01:00
void __Disc_SetLowMem()
{
/* Setup low memory */
*Sys_Magic = 0x0D15EA5E; // Standard Boot Code
*Sys_Version = 0x00000001; // Version
*Arena_L = 0x00000000; // Arena Low
*BI2 = 0x817E5480; // BI2
*Bus_Speed = 0x0E7BE2C0; // Console Bus Speed
*CPU_Speed = 0x2B73A840; // Console CPU Speed
*Assembler = 0x38A00040; // Assembler
2012-05-24 18:48:24 +02:00
*(vu32*)0x800000E4 = 0x80431A80;
*Dev_Debugger = 0x81800000; // Dev Debugger Monitor Address
*Simulated_Mem = 0x01800000; // Simulated Memory Size
*(vu32*)0xCD00643C = 0x00000000; // 32Mhz on Bus
2012-05-24 18:48:24 +02:00
/* Fix for Sam & Max (WiiPower) */
if (!is_ios_type(IOS_TYPE_HERMES, IOS_GetVersion()))
*GameID_Address = 0x80000000;
2012-05-24 18:48:24 +02:00
/* Copy disc ID */
2012-05-24 18:48:24 +02:00
memcpy((void *)Online_Check, (void *)Disc_ID, 4);
2012-01-21 21:57:41 +01:00
}
GXRModeObj * __Disc_SelectVMode(u8 videoselected, u64 chantitle)
2012-01-21 21:57:41 +01:00
{
vmode = VIDEO_GetPreferredMode(0);
2012-01-21 21:57:41 +01:00
/* Get video mode configuration */
bool progressive = (CONF_GetProgressiveScan() > 0) && VIDEO_HaveComponentCable();
2012-01-21 21:57:41 +01:00
/* Select video mode register */
switch (CONF_GetVideo())
{
case CONF_VIDEO_PAL:
if (CONF_GetEuRGB60() > 0)
{
vmode_reg = VI_EURGB60;
vmode = progressive ? &TVNtsc480Prog : &TVEurgb60Hz480IntDf;
}
else
vmode_reg = VI_PAL;
break;
case CONF_VIDEO_MPAL:
vmode_reg = VI_MPAL;
break;
case CONF_VIDEO_NTSC:
vmode_reg = VI_NTSC;
break;
}
2012-01-21 21:57:41 +01:00
char Region;
if(chantitle)
2012-01-21 21:57:41 +01:00
Region = ((u32)(chantitle) & 0xFFFFFFFF) % 256;
else
Region = diskid[3];
2012-01-21 21:57:41 +01:00
switch(videoselected)
2012-01-21 21:57:41 +01:00
{
case 0: // DEFAULT (DISC/GAME)
/* Select video mode */
switch(Region)
{
case 'W':
break; // Don't overwrite wiiware video modes.
// PAL
case 'D':
case 'F':
case 'P':
case 'X':
case 'Y':
if(CONF_GetVideo() != CONF_VIDEO_PAL)
{
vmode_reg = VI_PAL;
vmode = progressive ? &TVNtsc480Prog : &TVNtsc480IntDf;
}
break;
// NTSC
case 'E':
case 'J':
default:
if(CONF_GetVideo() != CONF_VIDEO_NTSC)
{
vmode_reg = VI_NTSC;
vmode = progressive ? &TVNtsc480Prog : &TVEurgb60Hz480IntDf;
}
break;
}
2012-01-21 21:57:41 +01:00
break;
case 1: // SYSTEM
break;
case 2: // PAL50
vmode = &TVPal528IntDf;
vmode_reg = vmode->viTVMode >> 2;
2012-01-21 21:57:41 +01:00
break;
case 3: // PAL60
vmode = progressive ? &TVNtsc480Prog : &TVEurgb60Hz480IntDf;
vmode_reg = progressive ? TVEurgb60Hz480Prog.viTVMode >> 2 : vmode->viTVMode >> 2;
2012-01-21 21:57:41 +01:00
break;
case 4: // NTSC
vmode = progressive ? &TVNtsc480Prog : &TVNtsc480IntDf;
vmode_reg = vmode->viTVMode >> 2;
break;
case 5: // PROGRESSIVE 480P
vmode = &TVNtsc480Prog;
vmode_reg = Region == 'P' ? TVEurgb60Hz480Prog.viTVMode >> 2 : vmode->viTVMode >> 2;
break;
default:
break;
}
2012-01-21 21:57:41 +01:00
return vmode;
}
void __Disc_SetVMode(void)
{
/* Set video mode register */
*(vu32 *)0x800000CC = vmode_reg;
DCFlushRange((void *)(0x800000CC), 4);
2012-01-21 21:57:41 +01:00
/* Set video mode */
if(vmode != 0)
VIDEO_Configure(vmode);
2012-05-30 16:06:17 +02:00
/* Setup video */
VIDEO_SetBlack(TRUE);
VIDEO_Flush();
VIDEO_WaitVSync();
if(vmode->viTVMode & VI_NON_INTERLACE)
VIDEO_WaitVSync();
else while(VIDEO_GetNextField())
VIDEO_WaitVSync();
2012-01-21 21:57:41 +01:00
}
void __Disc_SetTime(void)
{
/* Set proper time */
settime(secs_to_ticks(time(NULL) - 946684800));
}
s32 Disc_FindPartition(u64 *outbuf)
2012-01-21 21:57:41 +01:00
{
u64 offset = 0;
u32 cnt;
u32 *TMP_Buffer = (u32*)MEM2_alloc(0x20);
if(!TMP_Buffer)
return -1;
2012-01-21 21:57:41 +01:00
/* Read partition info */
s32 ret = WDVD_UnencryptedRead(TMP_Buffer, 0x20, PTABLE_OFFSET);
if(ret < 0)
{
MEM2_free(TMP_Buffer);
return ret;
}
2012-01-21 21:57:41 +01:00
/* Get data */
u32 nb_partitions = TMP_Buffer[0];
u64 table_offset = TMP_Buffer[1] << 2;
2012-01-21 21:57:41 +01:00
if(nb_partitions > 8)
{
MEM2_free(TMP_Buffer);
return -1;
}
memset(TMP_Buffer, 0, sizeof(TMP_Buffer));
2012-01-21 21:57:41 +01:00
/* Read partition table */
ret = WDVD_UnencryptedRead(TMP_Buffer, 0x20, table_offset);
if (ret < 0)
{
MEM2_free(TMP_Buffer);
return ret;
}
2012-01-21 21:57:41 +01:00
/* Find game partition */
for(cnt = 0; cnt < nb_partitions; cnt++)
2012-01-21 21:57:41 +01:00
{
u32 type = TMP_Buffer[cnt * 2 + 1];
2012-01-21 21:57:41 +01:00
/* Game partition */
if(!type)
offset = TMP_Buffer[cnt * 2] << 2;
2012-01-21 21:57:41 +01:00
}
MEM2_free(TMP_Buffer);
2012-01-21 21:57:41 +01:00
/* No game partition found */
if (!offset)
return -1;
2012-01-21 21:57:41 +01:00
/* Set output buffer */
*outbuf = offset;
WDVD_Seek(offset);
return 0;
}
s32 Disc_Init(void)
{
/* Init DVD subsystem */
return WDVD_Init();
}
s32 Disc_Open(bool boot_disc)
2012-01-21 21:57:41 +01:00
{
/* Reset drive */
s32 ret = WDVD_Reset();
if (ret < 0) return ret;
memset(diskid, 0, 32);
/* Read disc ID */
ret = WDVD_ReadDiskId(diskid);
/* Directly set Audio Streaming for GC*/
if(boot_disc)
gprintf("Setting Audio Streaming for GC Games: 0x%08x\n", WDVD_SetStreaming());
return ret;
2012-01-21 21:57:41 +01:00
}
s32 Disc_Wait(void)
{
u32 cover = 0;
int icounter = 0;
/* Wait for disc */
while (!(cover & 0x2))
{
/* Get cover status */
s32 ret = WDVD_GetCoverStatus(&cover);
if (ret < 0) return ret;
// 10 tries to make sure it doesn<73>t "freeze" in Install dialog
// if no Game Disc is insert
icounter++;
sleep(1);
if(icounter > 10)
return -1;
}
return 0;
}
s32 Disc_SetUSB(const u8 *id)
{
if(id)
return set_frag_list((u8 *) id);
2012-01-21 21:57:41 +01:00
s32 part = -1;
if(is_ios_type(IOS_TYPE_HERMES, IOS_GetVersion()))
part = wbfs_part_idx ? wbfs_part_idx - 1 : 0;
return WDVD_SetUSBMode(wbfsDev, (u8 *) id, part);
2012-01-21 21:57:41 +01:00
}
s32 Disc_ReadHeader(void *outbuf)
{
/* Read Wii disc header */
return WDVD_UnencryptedRead(outbuf, sizeof(struct discHdr), 0);
}
s32 Disc_ReadGCHeader(void *outbuf)
{
/* Read GC disc header */
return WDVD_UnencryptedRead(outbuf, sizeof(struct gc_discHdr), 0);
}
s32 Disc_Type(bool gc)
{
s32 ret;
u32 check;
u32 magic;
if (!gc)
{
check = WII_MAGIC;
struct discHdr *header = (struct discHdr *)buffer;
ret = Disc_ReadHeader(header);
magic = header->magic;
}
else
{
check = GC_MAGIC;
struct gc_discHdr *header = (struct gc_discHdr *)buffer;
ret = Disc_ReadGCHeader(header);
if(strcmp((char *)header->id, "GCOPDV") == 0)
magic = GC_MAGIC;
else
magic = header->magic;
2012-01-21 21:57:41 +01:00
}
if (ret < 0)
return ret;
2012-01-21 21:57:41 +01:00
/* Check magic word */
if (magic != check) return -1;
return 0;
}
s32 Disc_IsWii(void)
{
return Disc_Type(0);
}
s32 Disc_IsGC(void)
{
return Disc_Type(1);
}
s32 Disc_BootPartition()
2012-01-21 21:57:41 +01:00
{
/* Set time */
__Disc_SetTime();
/* Set an appropriate video mode */
__Disc_SetVMode();
/* Shutdown IOS subsystems */
u32 level = IRQ_Disable();
__IOS_ShutdownSubsystems();
__exception_closeall();
2012-01-21 21:57:41 +01:00
/* Originally from tueidj - taken from NeoGamma (thx) */
2012-01-21 21:57:41 +01:00
*(vu32*)0xCC003024 = 1;
if (hooktype != 0)
{
asm volatile (
2012-01-21 21:57:41 +01:00
"lis %r3, appentrypoint@h\n"
"ori %r3, %r3, appentrypoint@l\n"
"lwz %r3, 0(%r3)\n"
"mtlr %r3\n"
"lis %r3, 0x8000\n"
"ori %r3, %r3, 0x18A8\n"
"nop\n"
"mtctr %r3\n"
"bctr\n"
);
}
else
{
asm volatile (
2012-01-21 21:57:41 +01:00
"lis %r3, appentrypoint@h\n"
"ori %r3, %r3, appentrypoint@l\n"
"lwz %r3, 0(%r3)\n"
"mtlr %r3\n"
"blr\n"
);
}
IRQ_Restore(level);
2012-01-21 21:57:41 +01:00
return 0;
}
void RunApploader(u64 offset, u8 vidMode, bool vipatch, bool countryString, u8 patchVidMode, int aspectRatio, u32 returnTo)
2012-01-21 21:57:41 +01:00
{
WDVD_OpenPartition(offset);
2012-01-21 21:57:41 +01:00
/* hide cios devices */
shadow_mload();
/* Setup low memory */
__Disc_SetLowMem();
/* Select an appropriate video mode */
__Disc_SelectVMode(vidMode, 0);
/* Run apploader */
Apploader_Run(&p_entry, vidMode, vmode, vipatch, countryString, patchVidMode, aspectRatio, returnTo);
2012-05-16 17:27:14 +02:00
appentrypoint = (u32)p_entry;
2012-01-21 21:57:41 +01:00
}