mirror of
https://github.com/DarkStore-3DS/Project_CTR.git
synced 2026-07-03 00:39:14 +00:00
makerom v0.1
This commit is contained in:
3DSGuy
+445
@@ -0,0 +1,445 @@
|
||||
#include "lib.h"
|
||||
#include "yamlsettings.h"
|
||||
|
||||
// Private Prototypes
|
||||
void InitYamlContext(ctr_yaml_context *ctx);
|
||||
int ParseSpecFile(void *set, char *path, specfile_type type);
|
||||
void CheckEvent(ctr_yaml_context *ctx);
|
||||
|
||||
void BadYamlFormatting(void);
|
||||
|
||||
// Code
|
||||
int GetYamlSettings(user_settings *set)
|
||||
{
|
||||
rsf_settings rsf_set;
|
||||
memset(&rsf_set,0,sizeof(rsf_settings));
|
||||
desc_settings desc_set;
|
||||
memset(&desc_set,0,sizeof(desc_settings));
|
||||
InvalidateRSFBooleans(&rsf_set);
|
||||
InvalidateDESCBooleans(&desc_set);
|
||||
InvalidateRSFBooleans(&desc_set.DefaultSpec);
|
||||
if(set->rsf_path){
|
||||
int res = ParseSpecFile(&rsf_set,set->rsf_path,type_rsf);
|
||||
if(res) return res;
|
||||
}
|
||||
if(set->desc_path){
|
||||
int res = ParseSpecFile(&desc_set,set->desc_path,type_desc);
|
||||
if(res) return res;
|
||||
}
|
||||
return MergeSpecData(&set->yaml_set,&desc_set,&rsf_set);
|
||||
}
|
||||
|
||||
int ParseSpecFile(void *set, char *path, specfile_type type)
|
||||
{
|
||||
ctr_yaml_context *ctx = malloc(sizeof(ctr_yaml_context));
|
||||
InitYamlContext(ctx);
|
||||
|
||||
|
||||
|
||||
/* Set Specfile Type */
|
||||
ctx->type = type;
|
||||
|
||||
/* Create the Parser object. */
|
||||
yaml_parser_initialize(&ctx->parser);
|
||||
|
||||
/* Set a file input. */
|
||||
FILE *input = fopen(path,"rb");
|
||||
yaml_parser_set_input_file(&ctx->parser, input);
|
||||
|
||||
|
||||
ctx->IsSequence = false;
|
||||
ctx->IsKey = true;
|
||||
ctx->prev_event = 0;
|
||||
ctx->Level = 0;
|
||||
|
||||
|
||||
/* Read the event sequence. */
|
||||
while (!ctx->done) {
|
||||
/* Get the next event. */
|
||||
GetEvent(ctx);
|
||||
if(ctx->error) goto error;
|
||||
|
||||
/* Proccess Event */
|
||||
|
||||
|
||||
if(EventIsScalar(ctx)){
|
||||
if(ctx->type == type_rsf) EvaluateRSF((rsf_settings*)set,ctx);
|
||||
else EvaluateDESC((desc_settings*)set,ctx);
|
||||
if(ctx->error) goto error;
|
||||
break;
|
||||
}
|
||||
/*
|
||||
if((ctx->event.type == YAML_SEQUENCE_START_EVENT|| ctx->event.type == YAML_MAPPING_START_EVENT) && ctx->prev_event == YAML_SCALAR_EVENT) printf(":\n");
|
||||
if(ctx->event.type == YAML_SCALAR_EVENT){
|
||||
if(ctx->IsSequence){
|
||||
printf(" - %s\n",ctx->event.data.scalar.value);
|
||||
}
|
||||
else{
|
||||
if(!ctx->IsKey) printf(": %s\n",ctx->event.data.scalar.value);
|
||||
else printf("%s",ctx->event.data.scalar.value);
|
||||
}
|
||||
}
|
||||
*/
|
||||
|
||||
/* Finish Event */
|
||||
FinishEvent(ctx);
|
||||
if(ctx->error) goto error;
|
||||
}
|
||||
|
||||
/* Destroy the Parser object. */
|
||||
yaml_parser_delete(&ctx->parser);
|
||||
fclose(input);
|
||||
return 0;
|
||||
|
||||
/* On error. */
|
||||
error:
|
||||
fprintf(stderr,"[-] Error Proccessing %s file\n",ctx->type? "DESC" : "RSF");
|
||||
|
||||
/* Destroy the Parser object. */
|
||||
yaml_parser_delete(&ctx->parser);
|
||||
fclose(input);
|
||||
return ctx->error;
|
||||
}
|
||||
|
||||
void InitYamlContext(ctr_yaml_context *ctx)
|
||||
{
|
||||
memset(ctx,0,sizeof(ctr_yaml_context));
|
||||
}
|
||||
|
||||
char *GetYamlString(ctr_yaml_context *ctx)
|
||||
{
|
||||
/*
|
||||
if(EventIsScalar(ctx)){
|
||||
if(!GetYamlStringSize(ctx) && !ctx->event.data.scalar.value)
|
||||
return ctx->event.data.scalar.value;
|
||||
}
|
||||
|
||||
return NULL;
|
||||
*/
|
||||
return (char*)ctx->event.data.scalar.value;
|
||||
}
|
||||
|
||||
|
||||
u32 GetYamlStringSize(ctr_yaml_context *ctx)
|
||||
{
|
||||
return ctx->event.data.scalar.length;
|
||||
}
|
||||
|
||||
void GetEvent(ctr_yaml_context *ctx)
|
||||
{
|
||||
if (!yaml_parser_parse(&ctx->parser, &ctx->event)){
|
||||
ctx->error = YAML_API_ERROR;
|
||||
return;
|
||||
}
|
||||
CheckEvent(ctx);
|
||||
}
|
||||
|
||||
void CheckEvent(ctr_yaml_context *ctx)
|
||||
{
|
||||
switch(ctx->event.type){
|
||||
case YAML_SEQUENCE_START_EVENT:
|
||||
ctx->IsSequence = true;
|
||||
ctx->IsKey = true;
|
||||
ctx->Level++;
|
||||
//printf("[LEVEL] %d\n",ctx->Level);
|
||||
break;
|
||||
case YAML_SEQUENCE_END_EVENT:
|
||||
ctx->IsSequence = false;
|
||||
ctx->IsKey = true;
|
||||
ctx->Level--;
|
||||
//printf("[LEVEL] %d\n",ctx->Level);
|
||||
break;
|
||||
case YAML_MAPPING_START_EVENT:
|
||||
ctx->IsKey = true;
|
||||
ctx->Level++;
|
||||
//printf("[LEVEL] %d\n",ctx->Level);
|
||||
break;
|
||||
case YAML_MAPPING_END_EVENT:
|
||||
ctx->IsKey = true;
|
||||
ctx->Level--;
|
||||
//printf("[LEVEL] %d\n",ctx->Level);
|
||||
break;
|
||||
case YAML_DOCUMENT_END_EVENT:
|
||||
case YAML_STREAM_END_EVENT:
|
||||
ctx->done = true;
|
||||
break;
|
||||
default: break;
|
||||
}
|
||||
}
|
||||
|
||||
void FinishEvent(ctr_yaml_context *ctx)
|
||||
{
|
||||
if(ctx->event.type == YAML_SCALAR_EVENT) {
|
||||
if(!ctx->IsSequence){
|
||||
if(!ctx->IsKey)ctx->IsKey = true;
|
||||
else ctx->IsKey = false;
|
||||
}
|
||||
}
|
||||
ctx->prev_event = ctx->event.type;
|
||||
yaml_event_delete(&ctx->event);
|
||||
}
|
||||
|
||||
bool EventIsScalar(ctr_yaml_context *ctx)
|
||||
{
|
||||
return (ctx->event.type == YAML_SCALAR_EVENT);
|
||||
}
|
||||
|
||||
bool EventIsMappingStart(ctr_yaml_context *ctx)
|
||||
{
|
||||
return (ctx->event.type == YAML_MAPPING_START_EVENT);
|
||||
}
|
||||
|
||||
bool EventIsMappingEnd(ctr_yaml_context *ctx)
|
||||
{
|
||||
return (ctx->event.type == YAML_MAPPING_END_EVENT);
|
||||
}
|
||||
|
||||
bool EventIsSequenceStart(ctr_yaml_context *ctx)
|
||||
{
|
||||
return (ctx->event.type == YAML_SEQUENCE_START_EVENT);
|
||||
}
|
||||
|
||||
bool EventIsSequenceEnd(ctr_yaml_context *ctx)
|
||||
{
|
||||
return (ctx->event.type == YAML_SEQUENCE_END_EVENT);
|
||||
}
|
||||
|
||||
bool CheckSequenceEvent(ctr_yaml_context *ctx)
|
||||
{
|
||||
GetEvent(ctx);
|
||||
if(!EventIsSequenceStart(ctx)){
|
||||
FinishEvent(ctx);
|
||||
//fprintf(stderr,"[-] Bad formatting in Spec file (Expected Sequence)\n");
|
||||
//ctx->error = YAML_BAD_FORMATTING;
|
||||
return false;
|
||||
}
|
||||
FinishEvent(ctx);
|
||||
return true;
|
||||
}
|
||||
|
||||
bool CheckMappingEvent(ctr_yaml_context *ctx)
|
||||
{
|
||||
GetEvent(ctx);
|
||||
if(!EventIsMappingStart(ctx)){
|
||||
FinishEvent(ctx);
|
||||
//fprintf(stderr,"[-] Bad formatting in Spec file (Expected Mapping)\n");
|
||||
//ctx->error = YAML_BAD_FORMATTING;
|
||||
return false;
|
||||
}
|
||||
FinishEvent(ctx);
|
||||
return true;
|
||||
}
|
||||
|
||||
void BadYamlFormatting(void)
|
||||
{
|
||||
fprintf(stderr,"[-] Bad formatting in Spec file\n");
|
||||
}
|
||||
|
||||
|
||||
bool cmpYamlValue(char *string,ctr_yaml_context *ctx)
|
||||
{
|
||||
return (strcmp(GetYamlString(ctx),string) == 0);
|
||||
}
|
||||
|
||||
bool casecmpYamlValue(char *string,ctr_yaml_context *ctx)
|
||||
{
|
||||
return (strcasecmp(GetYamlString(ctx),string) == 0);
|
||||
}
|
||||
|
||||
void SetSimpleYAMLValue(char **dest, char *key, ctr_yaml_context *ctx, u32 size_limit)
|
||||
{
|
||||
if(*dest){
|
||||
fprintf(stderr,"[-] Item '%s' is already set\n",key);
|
||||
ctx->error = YAML_MEM_ERROR;
|
||||
return;
|
||||
}
|
||||
|
||||
GetEvent(ctx);
|
||||
if(ctx->error || ctx->done) return;
|
||||
if(!EventIsScalar(ctx)){
|
||||
fprintf(stderr,"[-] '%s' requires a value\n",key);
|
||||
ctx->error = YAML_BAD_FORMATTING;
|
||||
return;
|
||||
}
|
||||
if(!GetYamlStringSize(ctx)) return;
|
||||
|
||||
u32 size = GetYamlStringSize(ctx);
|
||||
if(size > size_limit && size_limit) size = size_limit;
|
||||
|
||||
|
||||
char *tmp = *dest;
|
||||
tmp = malloc(size+2);
|
||||
if(!tmp) {
|
||||
ctx->error = YAML_MEM_ERROR;
|
||||
return;
|
||||
}
|
||||
memset(tmp,0,size+2);
|
||||
memcpy(tmp,GetYamlString(ctx),size);
|
||||
|
||||
//printf("Setting %s to %s (size of %d)\n",key,GetYamlString(ctx),size);
|
||||
//printf("Check: %s & %x\n",tmp,tmp);
|
||||
*dest = tmp;
|
||||
|
||||
}
|
||||
|
||||
bool SetBoolYAMLValue(char *key, ctr_yaml_context *ctx)
|
||||
{
|
||||
GetEvent(ctx);
|
||||
if(ctx->error || ctx->done) return false;
|
||||
if(!EventIsScalar(ctx)){
|
||||
fprintf(stderr,"[-] '%s' requires a value\n",key);
|
||||
ctx->error = YAML_BAD_FORMATTING;
|
||||
return false;
|
||||
}
|
||||
if(!GetYamlStringSize(ctx)){
|
||||
fprintf(stderr,"[-] '%s' requires a value\n",key);
|
||||
ctx->error = YAML_BAD_FORMATTING;
|
||||
return false;
|
||||
}
|
||||
|
||||
if(casecmpYamlValue("true",ctx)) return true;
|
||||
if(casecmpYamlValue("false",ctx)) return false;
|
||||
|
||||
fprintf(stderr,"[-] Invalid '%s'\n",key);
|
||||
ctx->error = YAML_BAD_FORMATTING;
|
||||
return false;
|
||||
|
||||
}
|
||||
|
||||
u32 SetYAMLSequence(char ***dest, char *key, ctr_yaml_context *ctx)
|
||||
{
|
||||
if(*dest){
|
||||
fprintf(stderr,"[-] %s already set\n",key);
|
||||
ctx->error = YAML_MEM_ERROR;
|
||||
return 0;
|
||||
}
|
||||
|
||||
u32 ActualCount = 0;
|
||||
u32 SlotCount = 0;
|
||||
char **tmp = *dest;
|
||||
if(!CheckSequenceEvent(ctx)) return 0;
|
||||
SlotCount = 10;
|
||||
tmp = malloc((SlotCount+1)*sizeof(char*));
|
||||
if(!tmp){
|
||||
ctx->error = YAML_MEM_ERROR;
|
||||
return 0;
|
||||
}
|
||||
memset(tmp,0,(SlotCount+1)*sizeof(char*));
|
||||
GetEvent(ctx);
|
||||
if(ctx->error || ctx->done) return 0;
|
||||
if(!EventIsScalar(ctx)){
|
||||
fprintf(stderr,"[-] '%s' requires a value\n",key);
|
||||
ctx->error = YAML_BAD_FORMATTING;
|
||||
return 0;
|
||||
}
|
||||
|
||||
|
||||
if(!GetYamlStringSize(ctx)) return 0;
|
||||
u32 InitLevel = ctx->Level;
|
||||
while(ctx->Level == InitLevel){
|
||||
if(ctx->error || ctx->done) return 0;
|
||||
tmp[ActualCount] = malloc(GetYamlStringSize(ctx)+1);
|
||||
memset(tmp[ActualCount],0,GetYamlStringSize(ctx)+1);
|
||||
memcpy(tmp[ActualCount],GetYamlString(ctx),GetYamlStringSize(ctx));
|
||||
ActualCount++;
|
||||
if(ActualCount >= SlotCount){ // if Exceeding Ptr capacity, expand buffer
|
||||
SlotCount = SlotCount*2;
|
||||
char **tmp1 = malloc((SlotCount+1)*sizeof(char*)); // allocate new buffer
|
||||
if(!tmp1){
|
||||
ctx->error = YAML_MEM_ERROR;
|
||||
return 0;
|
||||
}
|
||||
memset(tmp1,0,(SlotCount+1)*sizeof(char*));
|
||||
for(u32 i = 0; i < ActualCount; i++) tmp1[i] = tmp[i]; // Transfer ptrs
|
||||
free(tmp); // free original buffer
|
||||
tmp = tmp1; // transfer main ptr
|
||||
}
|
||||
FinishEvent(ctx);
|
||||
GetEvent(ctx);
|
||||
}
|
||||
FinishEvent(ctx);
|
||||
*dest = tmp; // Give main ptr to location
|
||||
return ActualCount++; // return number of strings
|
||||
}
|
||||
|
||||
u32 SetYAMLSequenceFromMapping(char ***dest, char *key, ctr_yaml_context *ctx, bool StoreKey)
|
||||
{
|
||||
if(*dest){
|
||||
fprintf(stderr,"[-] %s already set\n",key);
|
||||
ctx->error = YAML_MEM_ERROR;
|
||||
return 0;
|
||||
}
|
||||
|
||||
u32 ActualCount = 0;
|
||||
u32 SlotCount = 0;
|
||||
char **tmp = *dest;
|
||||
if(!CheckMappingEvent(ctx)) return 0;
|
||||
SlotCount = 10;
|
||||
tmp = malloc((SlotCount+1)*sizeof(char*));
|
||||
if(!tmp){
|
||||
ctx->error = YAML_MEM_ERROR;
|
||||
return 0;
|
||||
}
|
||||
memset(tmp,0,(SlotCount+1)*sizeof(char*));
|
||||
GetEvent(ctx);
|
||||
if(ctx->error || ctx->done) return 0;
|
||||
if(!EventIsScalar(ctx)){
|
||||
fprintf(stderr,"[-] '%s' requires a value\n",key);
|
||||
ctx->error = YAML_BAD_FORMATTING;
|
||||
return 0;
|
||||
}
|
||||
|
||||
|
||||
if(!GetYamlStringSize(ctx)) return 0;
|
||||
u32 InitLevel = ctx->Level;
|
||||
while(ctx->Level == InitLevel){
|
||||
if(ctx->error || ctx->done) return 0;
|
||||
if(ctx->IsKey == StoreKey){
|
||||
tmp[ActualCount] = malloc(GetYamlStringSize(ctx)+1);
|
||||
memset(tmp[ActualCount],0,GetYamlStringSize(ctx)+1);
|
||||
memcpy(tmp[ActualCount],GetYamlString(ctx),GetYamlStringSize(ctx));
|
||||
ActualCount++;
|
||||
if(ActualCount >= SlotCount){ // if Exceeding Ptr capacity, expand buffer
|
||||
SlotCount = SlotCount*2;
|
||||
char **tmp1 = malloc((SlotCount+1)*sizeof(char*)); // allocate new buffer
|
||||
if(!tmp1){
|
||||
ctx->error = YAML_MEM_ERROR;
|
||||
return 0;
|
||||
}
|
||||
memset(tmp1,0,(SlotCount+1)*sizeof(char*));
|
||||
for(u32 i = 0; i < ActualCount; i++) tmp1[i] = tmp[i]; // Transfer ptrs
|
||||
free(tmp); // free original buffer
|
||||
tmp = tmp1; // transfer main ptr
|
||||
}
|
||||
}
|
||||
FinishEvent(ctx);
|
||||
GetEvent(ctx);
|
||||
}
|
||||
FinishEvent(ctx);
|
||||
*dest = tmp; // Give main ptr to location
|
||||
return ActualCount++; // return number of strings
|
||||
}
|
||||
|
||||
void SkipYAMLGroup(ctr_yaml_context *ctx) // Why Nintendo? Why is this necessary? Why can't you just create valid .desc files?
|
||||
{
|
||||
FinishEvent(ctx);
|
||||
GetEvent(ctx);
|
||||
if(!EventIsMappingStart(ctx) && !EventIsSequenceStart(ctx) && EventIsScalar(ctx)) return;
|
||||
FinishEvent(ctx);
|
||||
GetEvent(ctx);
|
||||
|
||||
if(ctx->error || ctx->done) return;
|
||||
if(!EventIsScalar(ctx)){
|
||||
fprintf(stderr,"[-] 'Format error\n");
|
||||
ctx->error = YAML_BAD_FORMATTING;
|
||||
return;
|
||||
}
|
||||
if(!GetYamlStringSize(ctx)) return;
|
||||
u32 InitLevel = ctx->Level;
|
||||
while(ctx->Level == InitLevel){
|
||||
if(ctx->error || ctx->done) return;
|
||||
FinishEvent(ctx);
|
||||
GetEvent(ctx);
|
||||
}
|
||||
FinishEvent(ctx);
|
||||
}
|
||||
Reference in New Issue
Block a user