json.qh File Reference

This graph shows which files directly or indirectly include this file:

Go to the source code of this file.

Functions
bool	_json_parse_array ()
bool	_json_parse_false ()
bool	_json_parse_float ()
bool	_json_parse_int ()
bool	_json_parse_members ()
bool	_json_parse_null ()
bool	_json_parse_number ()
bool	_json_parse_object ()
	Parse a json object.
bool	_json_parse_pair ()
bool	_json_parse_string (bool add)
bool	_json_parse_true ()
bool	_json_parse_value ()

Function Documentation

_json_parse_array()

bool _json_parse_array

(

)

Definition at line 71 of file json.qc.

{
    JSON_BEGIN();
    if (STRING_ITERATOR_GET(_json) != '[')
        JSON_FAIL("expected '['");
    int len = bufstr_add(_json_buffer, "0", 0);
    if (len)
        bufstr_set(_json_buffer, len - 1, strcat(bufstr_get(_json_buffer, len - 1), ".length"));
    bool required = false;
    for (int n = 0; ; ++n)
    {
        string key = ftos(n);
        if (_json_ns)
            key = strcat(_json_ns, ".", key);
        int it = bufstr_add(_json_buffer, key, 0);
        bool ret = false;
        WITH(string, _json_ns, key, ret = _json_parse_value());
        if (!ret)
        {
            bufstr_free(_json_buffer, it);
            if (required)
                JSON_FAIL("expected value");
            else
                break;
        }
        bufstr_set(_json_buffer, len, ftos(n + 1));
        if (STRING_ITERATOR_PEEK(_json) == ',')
        {
            STRING_ITERATOR_NEXT(_json);
            required = true;
            continue;
        }
        break;
    }
    if (STRING_ITERATOR_GET(_json) != ']')
        JSON_FAIL("expected ']'");
    JSON_END();
}

References _json_buffer, _json_ns, _json_parse_value(), ftos(), JSON_BEGIN, JSON_END, JSON_FAIL, strcat(), STRING_ITERATOR_GET, STRING_ITERATOR_NEXT, STRING_ITERATOR_PEEK, and WITH.

Referenced by _json_parse_value(), and PlayerStats_PlayerBasic_Handler().

_json_parse_false()

bool _json_parse_false

(

)

Definition at line 139 of file json.qc.

    {
        JSON_BEGIN();
        if (!(STRING_ITERATOR_GET(_json) == 'f'
        &&    STRING_ITERATOR_GET(_json) == 'a'
        &&    STRING_ITERATOR_GET(_json) == 'l'
        &&    STRING_ITERATOR_GET(_json) == 's'
        &&    STRING_ITERATOR_GET(_json) == 'e'))
            JSON_FAIL("expected 'false'");
        bufstr_add(_json_buffer, "0", 0);
        JSON_END();
    }

References _json_buffer, JSON_BEGIN, JSON_END, JSON_FAIL, and STRING_ITERATOR_GET.

Referenced by _json_parse_value().

_json_parse_float()

bool _json_parse_float

(

)

Definition at line 216 of file json.qc.

    {
        JSON_BEGIN();
        string s = "";
        bool needdot = true;
        for (int c; (c = STRING_ITERATOR_GET(_json)); )
        {
            if (c < '0' || c > '9')
            {
                if (c == '.' && needdot) // fine
                    needdot = false;
                else
                {
                    STRING_ITERATOR_UNGET(_json);
                    break;
                }
            }
            s = strcat(s, chr2str(c));
        }
        if (s == "")
            JSON_FAIL("expected float");
        bufstr_add(_json_buffer, s, 0);
        JSON_END();
    }

References _json_buffer, chr2str, JSON_BEGIN, JSON_END, JSON_FAIL, strcat(), STRING_ITERATOR_GET, and STRING_ITERATOR_UNGET.

Referenced by _json_parse_number().

_json_parse_int()

bool _json_parse_int

(

)

Definition at line 242 of file json.qc.

    {
        JSON_BEGIN();
        string s = "";
        for (int c; (c = STRING_ITERATOR_GET(_json)); )
        {
            if (c < '0' || c > '9')
            {
                STRING_ITERATOR_UNGET(_json);
                break;
            }
            if (s == "" && c == '0')
                JSON_FAIL("expected [1-9]");
            s = strcat(s, chr2str(c));
        }
        if (s == "")
            JSON_FAIL("expected int");
        if (ftos(stof(s)) != s)
            JSON_FAIL("expected int");
        bufstr_add(_json_buffer, s, 0);
        JSON_END();
    }

References _json_buffer, chr2str, ftos(), JSON_BEGIN, JSON_END, JSON_FAIL, stof(), strcat(), STRING_ITERATOR_GET, and STRING_ITERATOR_UNGET.

Referenced by _json_parse_number().

_json_parse_members()

bool _json_parse_members

(

)

Definition at line 33 of file json.qc.

    {
        JSON_BEGIN();
        for (;;)
        {
            if (!_json_parse_pair())
                JSON_FAIL("expected pair");
            if (STRING_ITERATOR_PEEK(_json) == ',')
            {
                STRING_ITERATOR_NEXT(_json);
                continue;
            }
            break;
        }
        JSON_END();
    }

References _json_parse_pair(), JSON_BEGIN, JSON_END, JSON_FAIL, STRING_ITERATOR_NEXT, and STRING_ITERATOR_PEEK.

Referenced by _json_parse_object().

_json_parse_null()

bool _json_parse_null

(

)

Definition at line 153 of file json.qc.

    {
        JSON_BEGIN();
        if (!(STRING_ITERATOR_GET(_json) == 'n'
        &&    STRING_ITERATOR_GET(_json) == 'u'
        &&    STRING_ITERATOR_GET(_json) == 'l'
        &&    STRING_ITERATOR_GET(_json) == 'l'))
            JSON_FAIL("expected 'null'");
        bufstr_add(_json_buffer, "", 0);
        JSON_END();
    }

References _json_buffer, JSON_BEGIN, JSON_END, JSON_FAIL, and STRING_ITERATOR_GET.

Referenced by _json_parse_value().

_json_parse_number()

bool _json_parse_number

(

)

Definition at line 207 of file json.qc.

{
    JSON_BEGIN();
    if (!(_json_parse_float() || _json_parse_int()))
        JSON_FAIL("expected number");
    JSON_END();
}

References _json_parse_float(), _json_parse_int(), JSON_BEGIN, JSON_END, and JSON_FAIL.

Referenced by _json_parse_value().

_json_parse_object()

bool _json_parse_object

(

)

Parse a json object.

Definition at line 21 of file json.qc.

{
    JSON_BEGIN();
    if (STRING_ITERATOR_GET(_json) != '{')
        JSON_FAIL("expected '{'");
    WITH(int, _json_keys, bufstr_add(_json_buffer, "", 0), _json_parse_members());
    if (STRING_ITERATOR_GET(_json) != '}')
        JSON_FAIL("expected '}'");
    JSON_END();
}

References _json_buffer, _json_keys, _json_parse_members(), JSON_BEGIN, JSON_END, JSON_FAIL, STRING_ITERATOR_GET, and WITH.

Referenced by _json_parse_value(), MX_Messages_(), MX_Sync_(), and TEST().

_json_parse_pair()

bool _json_parse_pair

(

)

Definition at line 51 of file json.qc.

        {
            JSON_BEGIN();
            if (!_json_parse_string(false))
                JSON_FAIL("expected string");
            string key = _json_temp;
            bufstr_set(_json_buffer, _json_keys, cons(bufstr_get(_json_buffer, _json_keys), key));
            if (_json_ns)
                key = strcat(_json_ns, ".", key);
            bufstr_add(_json_buffer, key, 0);
            if (STRING_ITERATOR_GET(_json) != ':')
                JSON_FAIL("expected ':'");
            bool ret = false;
            WITH(string, _json_ns, key, ret = _json_parse_value());
            if (!ret)
                JSON_FAIL("expected value");
            JSON_END();
        }

References _json_buffer, _json_keys, _json_ns, _json_parse_string(), _json_parse_value(), _json_temp, cons(), JSON_BEGIN, JSON_END, JSON_FAIL, strcat(), STRING_ITERATOR_GET, and WITH.

Referenced by _json_parse_members().

_json_parse_string()

bool _json_parse_string

(

bool

add

)

Definition at line 166 of file json.qc.

{
    JSON_BEGIN();
    if (STRING_ITERATOR_GET(_json) != '"')
        JSON_FAIL("expected opening '\"'");
    string s = "";
    for (int c; (c = STRING_ITERATOR_GET(_json)); )
    {
        if (c == '"')
        {
            STRING_ITERATOR_UNGET(_json);
            break;
        }
        else if (c == '\\')
        {
            string esc;
            switch (STRING_ITERATOR_GET(_json))
            {
                default:
                    JSON_FAIL("expected ( '\"' | '\\' | 'n' | 't' )");
                case '"':  esc = "\"";  break;
                case '\\': esc = "\\";  break;
                case 'n':  esc = "\n";  break;
                case 't':  esc = "\t";  break;
                case 'u':  esc = "\\u"; break; // TODO
                case '/':  esc = "/";   break;
            }
            s = strcat(s, esc);
        }
        else
            s = strcat(s, chr2str(c));
    }
    if (STRING_ITERATOR_GET(_json) != '"')
        JSON_FAIL("expected closing '\"'");
    if (add)
        bufstr_add(_json_buffer, s, 0);
    _json_temp = s;
    JSON_END();
}

References _json_buffer, _json_temp, chr2str, JSON_BEGIN, JSON_END, JSON_FAIL, strcat(), STRING_ITERATOR_GET, and STRING_ITERATOR_UNGET.

Referenced by _json_parse_pair(), and _json_parse_value().

_json_parse_true()

bool _json_parse_true

(

)

Definition at line 126 of file json.qc.

    {
        JSON_BEGIN();
        if (!(STRING_ITERATOR_GET(_json) == 't'
        &&    STRING_ITERATOR_GET(_json) == 'r'
        &&    STRING_ITERATOR_GET(_json) == 'u'
        &&    STRING_ITERATOR_GET(_json) == 'e'))
            JSON_FAIL("expected 'true'");
        bufstr_add(_json_buffer, "1", 0);
        JSON_END();
    }

References _json_buffer, JSON_BEGIN, JSON_END, JSON_FAIL, and STRING_ITERATOR_GET.

Referenced by _json_parse_value().

_json_parse_value()

bool _json_parse_value

(

)

Definition at line 111 of file json.qc.

{
    JSON_BEGIN();
    if (!(_json_parse_string(true)
    ||    _json_parse_number()
    ||    _json_parse_object()
    ||    _json_parse_array()
    ||    _json_parse_true()
    ||    _json_parse_false()
    ||    _json_parse_null()))
        JSON_FAIL("expected value");
    JSON_END();
}

References _json_parse_array(), _json_parse_false(), _json_parse_null(), _json_parse_number(), _json_parse_object(), _json_parse_string(), _json_parse_true(), JSON_BEGIN, JSON_END, and JSON_FAIL.

Referenced by _json_parse_array(), and _json_parse_pair().