Start adding ps1 scanning

This commit is contained in:
Jean-André Santoni 2015-09-16 22:11:08 +02:00
parent 28ac662440
commit 07f362e88d
2 changed files with 268 additions and 0 deletions

View File

@ -44,6 +44,7 @@ enum database_type
DATABASE_TYPE_NONE = 0,
DATABASE_TYPE_ITERATE,
DATABASE_TYPE_ITERATE_ZIP,
DATABASE_TYPE_ITERATE_CUE,
DATABASE_TYPE_CRC_LOOKUP
};

View File

@ -16,6 +16,8 @@
#include <compat/strcasestr.h>
#include <compat/strl.h>
#include <retro_endianness.h>
#include <errno.h>
#include <fcntl.h>
#include "tasks.h"
@ -32,11 +34,29 @@
#define CB_DB_SCAN_FOLDER 0xde2bef8eU
#define HASH_EXTENSION_ZIP 0x0b88c7d8U
#define HASH_EXTENSION_CUE 0x0b886782U
#ifndef COLLECTION_SIZE
#define COLLECTION_SIZE 99999
#endif
#define MAX_TOKEN_LEN 255
#define MAGIC_LEN 16
struct MagicEntry
{
const char* system_name;
const char* magic;
};
static struct MagicEntry MAGIC_NUMBERS[] = {
{"ps1", "\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x00\x00\x02\x00\x02\x00"},
{"pcecd", "\x82\xb1\x82\xcc\x83\x76\x83\x8d\x83\x4f\x83\x89\x83\x80\x82\xcc\x92"},
{"scd", "\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x00\x00\x02\x00\x01\x53"},
{NULL, NULL}
};
typedef struct database_state_handle
{
database_info_list_t *info;
@ -46,6 +66,7 @@ typedef struct database_state_handle
uint32_t crc;
uint8_t *buf;
char zip_name[PATH_MAX_LENGTH];
char *ps1_id;
} database_state_handle_t;
typedef struct db_handle
@ -141,6 +162,9 @@ static int database_info_iterate_playlist(
return 1;
#endif
case HASH_EXTENSION_CUE:
db->type = DATABASE_TYPE_ITERATE_CUE;
return 1;
default:
{
ssize_t ret;
@ -337,6 +361,247 @@ static int database_info_iterate_playlist_zip(
return 1;
}
ssize_t get_token(int fd, char *token, size_t max_len)
{
char *c = token;
int rv;
ssize_t len = 0;
int in_string = 0;
while (1)
{
rv = read(fd, c, 1);
if (rv == 0)
return 0;
else if (rv < 1)
{
switch (errno)
{
case EINTR:
case EAGAIN:
continue;
default:
return -errno;
}
}
switch (*c)
{
case ' ':
case '\t':
case '\r':
case '\n':
if (c == token)
continue;
if (!in_string)
{
*c = '\0';
return len;
}
break;
case '\"':
if (c == token)
{
in_string = 1;
continue;
}
*c = '\0';
return len;
}
len++;
c++;
if (len == (ssize_t)max_len)
{
*c = '\0';
return len;
}
}
}
int find_token(int fd, const char *token)
{
int tmp_len = strlen(token);
char *tmp_token = (char*)calloc(tmp_len, 1);
if (!tmp_token)
return -1;
while (strncmp(tmp_token, token, tmp_len) != 0)
{
if (get_token(fd, tmp_token, tmp_len) <= 0)
return -1;
}
return 0;
}
static int detect_ps1_game(const char* track_path, char* game_id)
{
const char* pattern = "cdrom:";
const char* pat_c;
char* c;
char* id_start;
int i;
int fd = open(track_path, O_RDONLY);
if (fd < 0)
{
RARCH_LOG("Could not open data track: %s\n", strerror(errno));
return -errno;
}
lseek(fd, 0x9340, SEEK_SET);
if (read(fd, game_id, 10) > 0)
{
game_id[10] = '\0';
game_id[4] = '-';
}
close(fd);
return 1;
}
static int detect_system(const char* track_path, int32_t offset,
const char** system_name)
{
int rv;
char magic[MAGIC_LEN];
int fd;
int i;
fd = open(track_path, O_RDONLY);
if (fd < 0)
{
RARCH_LOG("Could not open data track of file '%s': %s\n",
track_path, strerror(errno));
rv = -errno;
goto clean;
}
lseek(fd, offset, SEEK_SET);
if (read(fd, magic, MAGIC_LEN) < MAGIC_LEN)
{
RARCH_LOG("Could not read data from file '%s' at offset %d: %s\n",
track_path, offset, strerror(errno));
rv = -errno;
goto clean;
}
RARCH_LOG("Comparing with known magic numbers...\n");
for (i = 0; MAGIC_NUMBERS[i].system_name != NULL; i++)
{
if (memcmp(MAGIC_NUMBERS[i].magic, magic, MAGIC_LEN) == 0)
{
*system_name = MAGIC_NUMBERS[i].system_name;
rv = 0;
goto clean;
}
}
RARCH_LOG("Could not find compatible system\n");
rv = -EINVAL;
clean:
close(fd);
return rv;
}
static int find_first_data_track(const char* cue_path, int32_t* offset,
char* track_path, size_t max_len)
{
int rv;
int fd = -1;
char tmp_token[MAX_TOKEN_LEN];
int m, s, f;
char cue_dir[PATH_MAX];
strlcpy(cue_dir, cue_path, PATH_MAX);
path_basedir(cue_dir);
fd = open(cue_path, O_RDONLY);
if (fd < 0)
{
RARCH_LOG("Could not open CUE file '%s': %s\n", cue_path,
strerror(errno));
return -errno;
}
RARCH_LOG("Parsing CUE file '%s'...\n", cue_path);
while (get_token(fd, tmp_token, MAX_TOKEN_LEN) > 0)
{
if (strcmp(tmp_token, "FILE") == 0)
{
get_token(fd, tmp_token, MAX_TOKEN_LEN);
fill_pathname_join(track_path, cue_dir, tmp_token, max_len);
}
else if (strcasecmp(tmp_token, "TRACK") == 0)
{
get_token(fd, tmp_token, MAX_TOKEN_LEN);
get_token(fd, tmp_token, MAX_TOKEN_LEN);
if (strcasecmp(tmp_token, "AUDIO") == 0)
continue;
find_token(fd, "INDEX");
get_token(fd, tmp_token, MAX_TOKEN_LEN);
get_token(fd, tmp_token, MAX_TOKEN_LEN);
if (sscanf(tmp_token, "%02d:%02d:%02d", &m, &s, &f) < 3)
{
RARCH_LOG("Error parsing time stamp '%s'\n", tmp_token);
return -errno;
}
*offset = ((m * 60) * (s * 75) * f) * 25;
RARCH_LOG("Found 1st data track on file '%s+%d'\n",
track_path, *offset);
rv = 0;
goto clean;
}
}
rv = -EINVAL;
clean:
close(fd);
return rv;
}
static int database_info_iterate_playlist_cue(
database_state_handle_t *db_state,
database_info_handle_t *db, const char *name)
{
int rv;
char track_path[PATH_MAX];
int32_t offset = 0;
const char* system_name = NULL;
size_t max_len = MAX_TOKEN_LEN;
char game_id[4096];
rv = find_first_data_track(name, &offset, track_path, PATH_MAX);
if (rv < 0)
{
RARCH_LOG("Could not find valid data track: %s\n", strerror(-rv));
return rv;
}
RARCH_LOG("Reading 1st data track...\n");
if ((rv = detect_system(track_path, offset, &system_name)) < 0)
return rv;
RARCH_LOG("Detected %s media\n", system_name);
if (strcmp(system_name, "ps1") == 0)
{
if (detect_ps1_game(track_path, game_id) == 0)
return 0;
RARCH_LOG("Found disk label '%s'\n", game_id);
}
return 0;
}
static int database_info_iterate(database_state_handle_t *db_state, database_info_handle_t *db)
{
const char *name = db ? db->list->elems[db->list_ptr].data : NULL;
@ -355,6 +620,8 @@ static int database_info_iterate(database_state_handle_t *db_state, database_inf
return database_info_iterate_playlist(db_state, db, name);
case DATABASE_TYPE_ITERATE_ZIP:
return database_info_iterate_playlist_zip(db_state, db, name);
case DATABASE_TYPE_ITERATE_CUE:
return database_info_iterate_playlist_cue(db_state, db, name);
case DATABASE_TYPE_CRC_LOOKUP:
return database_info_iterate_crc_lookup(db_state, db, NULL);
}