#include "command.h"
#include "app.h"

#include <the_Foundation/string.h>
#include <ctype.h>

iBool equal_Command(const char *cmdWithArgs, const char *cmd) {
    if (strchr(cmdWithArgs, ':')) {
        return startsWith_CStr(cmdWithArgs, cmd) && cmdWithArgs[strlen(cmd)] == ' ';
    }
    return equal_CStr(cmdWithArgs, cmd);
}

static const iString *tokenString_(const char *label) {
    return collectNewFormat_String(" %s:", label);
}

int argLabel_Command(const char *cmd, const char *label) {
    const iString *tok = tokenString_(label);
    const char *ptr = strstr(cmd, cstr_String(tok));
    if (ptr) {
        return atoi(ptr + size_String(tok));
    }
    return 0;
}

int arg_Command(const char *cmd) {
    return argLabel_Command(cmd, "arg");
}

float argfLabel_Command(const char *cmd, const char *label) {
    const iString *tok = tokenString_(label);
    const char *ptr = strstr(cmd, cstr_String(tok));
    if (ptr) {
        return strtof(ptr + size_String(tok), NULL);
    }
    return 0.0f;
}

float argf_Command(const char *cmd) {
    const char *ptr = strstr(cmd, " arg:");
    if (ptr) {
        return strtof(ptr + 5, NULL);
    }
    return 0;
}

void *pointerLabel_Command(const char *cmd, const char *label) {
    const iString *tok = tokenString_(label);
    const char *ptr = strstr(cmd, cstr_String(tok));
    if (ptr) {
        void *val = NULL;
        sscanf(ptr + size_String(tok), "%p", &val);
        return val;
    }
    return NULL;
}

void *pointer_Command(const char *cmd) {
    return pointerLabel_Command(cmd, "ptr");
}

const char *suffixPtr_Command(const char *cmd, const char *label) {
    const iString *tok = tokenString_(label);
    const char *ptr = strstr(cmd, cstr_String(tok));
    if (ptr) {
        return ptr + size_String(tok);
    }
    return NULL;
}

iString *suffix_Command(const char *cmd, const char *label) {
    return newCStr_String(suffixPtr_Command(cmd, label));
}

const iString *string_Command(const char *cmd, const char *label) {
    iRangecc val = { suffixPtr_Command(cmd, label), NULL };
    if (val.start) {
        for (val.end = val.start; *val.end && !isspace(*val.end); val.end++) {}
        return collect_String(newRange_String(val));
    }
    return collectNew_String();
}

iInt2 dir_Command(const char *cmd) {
    const char *ptr = strstr(cmd, " dir:");
    if (ptr) {
        iInt2 dir;
        sscanf(ptr + 5, "%d%d", &dir.x, &dir.y);
        return dir;
    }
    return zero_I2();
}

iInt2 coord_Command(const char *cmd) {
    iInt2 coord = zero_I2();
    const char *ptr = strstr(cmd, " coord:");
    if (ptr) {
        sscanf(ptr + 7, "%d%d", &coord.x, &coord.y);
    }
    return coord;
}