src/usbsupport.c

   1 #include "include/usbld.h"
   2 #include "include/lang.h"
   3 #include "include/gui.h"
   4 #include "include/supportbase.h"
   5 #include "include/usbsupport.h"
   6 #include "include/util.h"
   7 #include "include/themes.h"
   8 #include "include/textures.h"
   9 #include "include/ioman.h"
  10 #include "include/system.h"
  11
  12 extern void *usb_cdvdman_irx;
  13 extern int size_usb_cdvdman_irx;
  14
  15 extern void *usb_4Ksectors_cdvdman_irx;
  16 extern int size_usb_4Ksectors_cdvdman_irx;
  17
  18 extern void *usbd_ps2_irx;
  19 extern int size_usbd_ps2_irx;
  20
  21 extern void *usbd_ps3_irx;
  22 extern int size_usbd_ps3_irx;
  23
  24 extern void *usbhdfsd_irx;
  25 extern int size_usbhdfsd_irx;
  26
  27 #ifdef VMC
  28 extern void *usb_mcemu_irx;
  29 extern int size_usb_mcemu_irx;
  30 #endif
  31
  32 void *usbd_irx;
  33 int size_usbd_irx;
  34
  35 static char usbPrefix[40];
  36 static int usbULSizePrev = -2;
  37 static unsigned char usbModifiedCDPrev[8];
  38 static unsigned char usbModifiedDVDPrev[8];
  39 static int usbGameCount = 0;
  40 static base_game_info_t *usbGames;
  41
  42 // forward declaration
  43 static item_list_t usbGameList;
  44
  45 int usbFindPartition(char *target, char *name) {
  46         int i, fd;
  47         char path[255];
  48
  49         for(i=0; i<5; i++) {
  50                 if (gUSBPrefix[0] != '\0')
  51                         sprintf(path, "mass%d:%s/%s", i, gUSBPrefix, name);
  52                 else
  53                         sprintf(path, "mass%d:%s", i, name);
  54                 fd = fioOpen(path, O_RDONLY);
  55
  56                 if(fd >= 0) {
  57                         if (gUSBPrefix[0] != '\0')
  58                                 sprintf(target, "mass%d:%s/", i, gUSBPrefix);
  59                         else
  60                                 sprintf(target, "mass%d:", i);
  61                         fioClose(fd);
  62                         return 1;
  63                 }
  64         }
  65
  66         // default to first partition (for themes, ...)
  67         if (gUSBPrefix[0] != '\0')
  68                 sprintf(target, "mass0:%s/", gUSBPrefix);
  69         else
  70                 sprintf(target, "mass0:");
  71         return 0;
  72 }
  73
  74 static void usbInitModules(void) {
  75         usbLoadModules();
  76
  77         // update Themes
  78         usbFindPartition(usbPrefix, "ul.cfg");
  79         char path[255];
  80         sprintf(path, "%sTHM", usbPrefix);
  81         thmAddElements(path, "/", usbGameList.mode);
  82
  83         sprintf(path, "%sCFG", usbPrefix);
  84         checkCreateDir(path);
  85
  86 #ifdef VMC
  87         sprintf(path, "%sVMC", usbPrefix);
  88         checkCreateDir(path);
  89 #endif
  90 }
  91
  92 void usbLoadModules(void) {
  93         LOG("usbLoadModules()\n");
  94         //first it search for custom usbd in MC?
  95         usbd_irx = readFile("mc?:BEDATA-SYSTEM/USBD.IRX", -1, &size_usbd_irx);
  96         if (!usbd_irx) {
  97                 usbd_irx = readFile("mc?:BADATA-SYSTEM/USBD.IRX", -1, &size_usbd_irx);
  98                 if (!usbd_irx) {
  99                         usbd_irx = readFile("mc?:BIDATA-SYSTEM/USBD.IRX", -1, &size_usbd_irx);
 100                         if (!usbd_irx) { // If don't exist it uses embedded
 101                                 if (sysPS3Detect() == 0) {
 102                                         usbd_irx = (void *) &usbd_ps2_irx;
 103                                         size_usbd_irx = size_usbd_ps2_irx;
 104                                 } else {
 105                                         usbd_irx = (void *) &usbd_ps3_irx;
 106                                         size_usbd_irx = size_usbd_ps3_irx;
 107                                 }
 108                         }
 109                 }
 110         }
 111
 112         sysLoadModuleBuffer(usbd_irx, size_usbd_irx, 0, NULL);
 113         sysLoadModuleBuffer(&usbhdfsd_irx, size_usbhdfsd_irx, 0, NULL);
 114
 115         delay(gUSBDelay);
 116
 117         LOG("usbLoadModules: modules loaded\n");
 118 }
 119
 120 void usbInit(void) {
 121         LOG("usbInit()\n");
 122         usbULSizePrev = -2;
 123         memset(usbModifiedCDPrev, 0, 8);
 124         memset(usbModifiedDVDPrev, 0, 8);
 125         usbGameCount = 0;
 126         usbGames = NULL;
 127
 128         ioPutRequest(IO_CUSTOM_SIMPLEACTION, &usbInitModules);
 129
 130         usbGameList.enabled = 1;
 131 }
 132
 133 item_list_t* usbGetObject(int initOnly) {
 134         if (initOnly && !usbGameList.enabled)
 135                 return NULL;
 136         return &usbGameList;
 137 }
 138
 139 static int usbNeedsUpdate(void) {
 140         int result = 0;
 141         fio_stat_t stat;
 142         char path[255];
 143
 144         usbFindPartition(usbPrefix, "ul.cfg");
 145
 146         sprintf(path, "%sCD", usbPrefix);
 147         if (fioGetstat(path, &stat) != 0)
 148                 memset(stat.mtime, 0, 8);
 149         if (memcmp(usbModifiedCDPrev, stat.mtime, 8)) {
 150                 memcpy(usbModifiedCDPrev, stat.mtime, 8);
 151                 result = 1;
 152         }
 153
 154         sprintf(path, "%sDVD", usbPrefix);
 155         if (fioGetstat(path, &stat) != 0)
 156                 memset(stat.mtime, 0, 8);
 157         if (memcmp(usbModifiedDVDPrev, stat.mtime, 8)) {
 158                 memcpy(usbModifiedDVDPrev, stat.mtime, 8);
 159                 result = 1;
 160         }
 161
 162         if (!sbIsSameSize(usbPrefix, usbULSizePrev))
 163                 result = 1;
 164
 165         return result;
 166 }
 167
 168 static int usbUpdateGameList(void) {
 169         sbReadList(&usbGames, usbPrefix, &usbULSizePrev, &usbGameCount);
 170         return usbGameCount;
 171 }
 172
 173 static int usbGetGameCount(void) {
 174         return usbGameCount;
 175 }
 176
 177 static void* usbGetGame(int id) {
 178         return (void*) &usbGames[id];
 179 }
 180
 181 static char* usbGetGameName(int id) {
 182         return usbGames[id].name;
 183 }
 184
 185 static int usbGetGameNameLength(int id) {
 186         if (usbGames[id].isISO)
 187                 return ISO_GAME_NAME_MAX + 1;
 188         else
 189                 return UL_GAME_NAME_MAX + 1;
 190 }
 191
 192 static char* usbGetGameStartup(int id) {
 193         return usbGames[id].startup;
 194 }
 195
 196 #ifndef __CHILDPROOF
 197 static void usbDeleteGame(int id) {
 198         sbDelete(&usbGames, usbPrefix, "/", usbGameCount, id);
 199         usbULSizePrev = -2;
 200 }
 201
 202 /*static void usbRenameGame(int id, char* newName) {
 203         // TODO when/if Jimmi add rename functionnality to usbhdfs, then we should use the above method
 204         //sbRename(&usbGames, usbPrefix, "/", usbGameCount, id, newName);
 205         usbULSizePrev = -2;
 206 }*/
 207 #endif
 208
 209 static void usbLaunchGame(int id, config_set_t* configSet) {
 210         int i, fd, val, index, compatmask;
 211         char isoname[32], partname[255], filename[32];
 212         base_game_info_t* game = &usbGames[id];
 213
 214         fd = fioDopen(usbPrefix);
 215         if (fd < 0) {
 216                 guiMsgBox(_l(_STR_ERR_FILE_INVALID), 0, NULL);
 217                 return;
 218         }
 219
 220 #ifdef VMC
 221         char vmc_name[32], vmc_path[255];
 222         int vmc_id, have_error = 0, size_mcemu_irx = 0;
 223         usb_vmc_infos_t usb_vmc_infos;
 224         vmc_superblock_t vmc_superblock;
 225
 226         for (vmc_id = 0; vmc_id < 2; vmc_id++) {
 227                 memset(&usb_vmc_infos, 0, sizeof(usb_vmc_infos_t));
 228                 configGetVMC(configSet, vmc_name, vmc_id);
 229                 if (vmc_name[0]) {
 230                         have_error = 1;
 231                         if (sysCheckVMC(usbPrefix, "/", vmc_name, 0, &vmc_superblock) > 0) {
 232                                 usb_vmc_infos.flags = vmc_superblock.mc_flag & 0xFF;
 233                                 usb_vmc_infos.flags |= 0x100;
 234                                 usb_vmc_infos.specs.page_size = vmc_superblock.page_size;
 235                                 usb_vmc_infos.specs.block_size = vmc_superblock.pages_per_block;
 236                                 usb_vmc_infos.specs.card_size = vmc_superblock.pages_per_cluster * vmc_superblock.clusters_per_card;
 237
 238                                 // Check vmc cluster chain (write operation can cause dammage)
 239                                 sprintf(vmc_path, "%s/VMC/%s.bin", gUSBPrefix, vmc_name);
 240                                 if (fioIoctl(fd, 0xCAFEC0DE, vmc_path)) {
 241                                         LOG("Cluster Chain OK\n");
 242                                         if ((i = fioIoctl(fd, 0xBEEFC0DE, vmc_path)) != 0) {
 243                                                 have_error = 0;
 244                                                 usb_vmc_infos.active = 1;
 245                                                 usb_vmc_infos.start_sector = i;
 246                                                 LOG("Start Sector: 0x%X\n", usb_vmc_infos.start_sector);
 247                                         }
 248                                 }
 249                         }
 250                 }
 251
 252                 if (have_error) {
 253                         char error[255];
 254                         snprintf(error, 255, _l(_STR_ERR_VMC_CONTINUE), vmc_name, (vmc_id + 1));
 255                         if (!guiMsgBox(error, 1, NULL)) {
 256                                 fioDclose(fd);
 257                                 return;
 258                         }
 259                 }
 260
 261                 for (i = 0; i < size_usb_mcemu_irx; i++) {
 262                         if (((u32*)&usb_mcemu_irx)[i] == (0xC0DEFAC0 + vmc_id)) {
 263                                 if (usb_vmc_infos.active)
 264                                         size_mcemu_irx = size_usb_mcemu_irx;
 265                                 memcpy(&((u32*)&usb_mcemu_irx)[i], &usb_vmc_infos, sizeof(usb_vmc_infos_t));
 266                                 break;
 267                         }
 268                 }
 269         }
 270 #endif
 271
 272         if (game->isISO)
 273                 sprintf(partname, "%s/%s/%s.%s.iso", gUSBPrefix, (game->media == 0x12) ? "CD" : "DVD", game->startup, game->name);
 274         else
 275                 sprintf(partname, "%s/%s.00", gUSBPrefix, isoname);
 276
 277         val = fioIoctl(fd, 0xDEADC0DE, partname);
 278         LOG("mass storage device sectorsize = %d\n", val);
 279         void** irx = &usb_cdvdman_irx;
 280         int irx_size = size_usb_cdvdman_irx;
 281         if (val == 4096) {
 282                 irx = &usb_4Ksectors_cdvdman_irx;
 283                 irx_size = size_usb_4Ksectors_cdvdman_irx;
 284         }
 285
 286         compatmask = sbPrepare(game, configSet, isoname, irx_size, irx, &index);
 287
 288         if (gCheckUSBFragmentation)
 289                 for (i = 0; i < game->parts; i++) {
 290                         if (!game->isISO)
 291                                 sprintf(partname, "%s/%s.%02x", gUSBPrefix, isoname, i);
 292
 293                         if (fioIoctl(fd, 0xCAFEC0DE, partname) == 0) {
 294                                 fioDclose(fd);
 295                                 guiMsgBox(_l(_STR_ERR_FRAGMENTED), 0, NULL);
 296                                 return;
 297                         }
 298                 }
 299
 300         if (gRememberLastPlayed) {
 301                 configSetStr(configGetByType(CONFIG_LAST), "last_played", game->startup);
 302                 saveConfig(CONFIG_LAST, 0);
 303         }
 304
 305         int offset = 44;
 306         for (i = 0; i < game->parts; i++) {
 307                 if (!game->isISO)
 308                         sprintf(partname, "%s/%s.%02x", gUSBPrefix, isoname, i);
 309
 310                 val = fioIoctl(fd, 0xBEEFC0DE, partname);
 311                 memcpy((void*)((u32)&usb_cdvdman_irx + index + offset), &val, 4);
 312                 offset += 4;
 313         }
 314
 315         fioDclose(fd);
 316
 317         char *altStartup = NULL;
 318         if (configGetStr(configSet, CONFIG_ITEM_ALTSTARTUP, &altStartup))
 319                 strncpy(filename, altStartup, 32);
 320         else
 321                 sprintf(filename, "%s", game->startup);
 322         shutdown(NO_EXCEPTION); // CAREFUL: shutdown will call usbCleanUp, so usbGames/game will be freed
 323         FlushCache(0);
 324
 325 #ifdef VMC
 326         sysLaunchLoaderElf(filename, "USB_MODE", irx_size, irx, size_mcemu_irx, &usb_mcemu_irx, compatmask, compatmask & COMPAT_MODE_1);
 327 #else
 328         sysLaunchLoaderElf(filename, "USB_MODE", irx_size, irx, compatmask, compatmask & COMPAT_MODE_1);
 329 #endif
 330 }
 331
 332 static config_set_t* usbGetConfig(int id) {
 333         return sbPopulateConfig(&usbGames[id], usbPrefix, "/");
 334 }
 335
 336 static int usbGetImage(char* folder, int isRelative, char* value, char* suffix, GSTEXTURE* resultTex, short psm) {
 337         char path[255];
 338         if (isRelative)
 339                 sprintf(path, "%s%s/%s_%s", usbPrefix, folder, value, suffix);
 340         else
 341                 sprintf(path, "%s%s_%s", folder, value, suffix);
 342         return texDiscoverLoad(resultTex, path, -1, psm);
 343 }
 344
 345 static void usbCleanUp(int exception) {
 346         if (usbGameList.enabled) {
 347                 LOG("usbCleanUp()\n");
 348
 349                 free(usbGames);
 350         }
 351 }
 352
 353 #ifdef VMC
 354 static int usbCheckVMC(char* name, int createSize) {
 355         return sysCheckVMC(usbPrefix, "/", name, createSize, NULL);
 356 }
 357 #endif
 358
 359 static item_list_t usbGameList = {
 360                 USB_MODE, 0, COMPAT, 0, MENU_MIN_INACTIVE_FRAMES, "USB Games", _STR_USB_GAMES, &usbInit, &usbNeedsUpdate,
 361 #ifdef __CHILDPROOF
 362                 &usbUpdateGameList, &usbGetGameCount, &usbGetGame, &usbGetGameName, &usbGetGameNameLength, &usbGetGameStartup, NULL, NULL,
 363 #else
 364                 &usbUpdateGameList, &usbGetGameCount, &usbGetGame, &usbGetGameName, &usbGetGameNameLength, &usbGetGameStartup, &usbDeleteGame, NULL,
 365 #endif
 366 #ifdef VMC
 367                 &usbLaunchGame, &usbGetConfig, &usbGetImage, &usbCleanUp, &usbCheckVMC, USB_ICON
 368 #else
 369                 &usbLaunchGame, &usbGetConfig, &usbGetImage, &usbCleanUp, USB_ICON
 370 #endif
 371 };