mirror of
https://github.com/suchmememanyskill/TegraExplorer.git
synced 2024-11-08 13:11:54 +00:00
133 lines
No EOL
3.1 KiB
C
133 lines
No EOL
3.1 KiB
C
#include "model.h"
|
|
#include "compat.h"
|
|
#include "genericClass.h"
|
|
#include "eval.h"
|
|
#include "garbageCollector.h"
|
|
#include "intClass.h"
|
|
#include "standardLibrary.h"
|
|
#include <string.h>
|
|
|
|
#ifndef WIN32
|
|
#include "../storage/mountmanager.h"
|
|
#include "../keys/keys.h"
|
|
#endif
|
|
|
|
ClassFunction(stdIf) {
|
|
s64 value = getIntValue(args[0]);
|
|
|
|
|
|
if (value) {
|
|
Variable_t* res = genericCallDirect(args[1], NULL, 0);
|
|
if (res == NULL)
|
|
return NULL;
|
|
|
|
removePendingReference(res);
|
|
}
|
|
|
|
return &emptyClass;
|
|
}
|
|
|
|
// TODO: implement else by making if return a class that is else-able
|
|
|
|
ClassFunction(stdWhile) {
|
|
Variable_t* result = eval(args[0]->function.function.operations.data, args[0]->function.function.operations.count, 1);
|
|
if (result == NULL || result->variableType != IntClass)
|
|
return NULL;
|
|
|
|
while (result->integer.value) {
|
|
removePendingReference(result);
|
|
Variable_t* res = genericCallDirect(args[1], NULL, 0);
|
|
if (res == NULL)
|
|
return NULL;
|
|
|
|
removePendingReference(res);
|
|
|
|
result = eval(args[0]->function.function.operations.data, args[0]->function.function.operations.count, 1);
|
|
if (result == NULL || result->variableType != IntClass)
|
|
return NULL;
|
|
}
|
|
|
|
removePendingReference(result);
|
|
|
|
return &emptyClass;
|
|
}
|
|
|
|
ClassFunction(stdPrint) {
|
|
for (int i = 0; i < argsLen; i++) {
|
|
Variable_t* res = callMemberFunctionDirect(args[i], "print", NULL, 0);
|
|
if (res == NULL)
|
|
return NULL;
|
|
}
|
|
|
|
|
|
return &emptyClass;
|
|
}
|
|
|
|
ClassFunction(stdExit) {
|
|
return NULL;
|
|
}
|
|
|
|
#ifndef WIN32
|
|
ClassFunction(stdMountSysmmc){
|
|
if (connectMMC(MMC_CONN_EMMC))
|
|
return newIntVariablePtr(1);
|
|
|
|
Variable_t *arg = (*args);
|
|
if (mountMMCPart(arg->string.value).err)
|
|
return newIntVariablePtr(1); // Maybe change for error?
|
|
|
|
return newIntVariablePtr(0);
|
|
}
|
|
|
|
ClassFunction(stdMountSave){
|
|
Variable_t *arg = (*args);
|
|
Variable_t var = {.variableType = SaveClass};
|
|
SaveClass_t* save = calloc(1, sizeof(SaveClass_t));
|
|
if (f_open(&save->saveFile, arg->string.value, FA_READ))
|
|
return NULL;
|
|
save_init(&save->saveCtx, &save->saveFile, dumpedKeys.save_mac_key, 0);
|
|
if (!save_process(&save->saveCtx))
|
|
return NULL;
|
|
|
|
var.save = save;
|
|
return copyVariableToPtr(var);
|
|
}
|
|
#else
|
|
ClassFunction(stdMountSysmmc){
|
|
return newIntVariablePtr(0);
|
|
}
|
|
ClassFunction(stdMountSave){
|
|
return newIntVariablePtr(0);
|
|
}
|
|
#endif
|
|
|
|
enum standardFunctionIndexes {
|
|
STD_IF = 0,
|
|
STD_WHILE,
|
|
STD_PRINT,
|
|
STD_MOUNTSYSMMC,
|
|
STD_MOUNTSAVE,
|
|
STD_EXIT,
|
|
};
|
|
|
|
u8 oneIntoneFunction[] = { IntClass, FunctionClass };
|
|
u8 doubleFunctionClass[] = { FunctionClass, FunctionClass };
|
|
u8 oneStringArgStd[] = {StringClass};
|
|
|
|
ClassFunctionTableEntry_t standardFunctionDefenitions[] = {
|
|
[STD_IF] = {"if", stdIf, 2, oneIntoneFunction},
|
|
[STD_WHILE] = {"while", stdWhile, 2, doubleFunctionClass},
|
|
[STD_PRINT] = {"print", stdPrint, VARARGCOUNT, 0},
|
|
[STD_MOUNTSYSMMC] = {"mountsys", stdMountSysmmc, 1, oneStringArgStd},
|
|
[STD_MOUNTSAVE] = {"readsave", stdMountSave, 1, oneStringArgStd},
|
|
[STD_EXIT] = {"exit", stdExit, 0, 0},
|
|
};
|
|
|
|
ClassFunctionTableEntry_t* searchStdLib(char* funcName) {
|
|
for (int i = 0; i < ARRAY_SIZE(standardFunctionDefenitions); i++) {
|
|
if (!strcmp(funcName, standardFunctionDefenitions[i].name))
|
|
return &standardFunctionDefenitions[i];
|
|
}
|
|
|
|
return NULL;
|
|
} |