Function StdioBaseScanf

common/script/cstdlib/stdio.c:567–609

internal do-anything v[s][n]scanf() formatting system with input from strings or FILE * */

/* internal do-anything v[s][n]scanf() formatting system with input
    from strings or FILE * */
int StdioBaseScanf(
    struct ParseState* Parser, FILE* Stream, char* StrIn, char* Format, struct StdVararg* Args)
{
    struct Value* ThisArg = Args->Param[0];
    int ArgCount          = 0;
    void* ScanfArg[MAX_SCANF_ARGS];

    if (Args->NumArgs > MAX_SCANF_ARGS)
    {
        ProgramFail(Parser, "too many arguments to scanf() - %d max", MAX_SCANF_ARGS);
    }

    for (ArgCount = 0; ArgCount < Args->NumArgs; ArgCount++)
    {
        ThisArg = (struct Value*)((char*)ThisArg +
                                  MEM_ALIGN(sizeof(struct Value) + TypeStackSizeValue(ThisArg)));

        if (ThisArg->Typ->Base == TypePointer)
        {
            ScanfArg[ArgCount] = ThisArg->Val->Pointer;
        }
        else if (ThisArg->Typ->Base == TypeArray)
        {
            ScanfArg[ArgCount] = &ThisArg->Val->ArrayMem[0];
        }
        else
        {
            ProgramFail(
                Parser, "non-pointer argument to scanf() - argument %d after format", ArgCount + 1);
        }
    }

    if (Stream != NULL)
    {
        return fscanf(Stream, Format, ScanfArg[0], ScanfArg[1], ScanfArg[2], ScanfArg[3],
            ScanfArg[4], ScanfArg[5], ScanfArg[6], ScanfArg[7], ScanfArg[8], ScanfArg[9]);
    }
    else
    {
        return sscanf(StrIn, Format, ScanfArg[0], ScanfArg[1], ScanfArg[2], ScanfArg[3],
            ScanfArg[4], ScanfArg[5], ScanfArg[6], ScanfArg[7], ScanfArg[8], ScanfArg[9]);
    }
}

/* stdio calls */
void StdioFopen(