| //+------------------------------------------------------------------+
|
| //| Parser.cpp |
|
| //| Copyright 2026, Niquel Mendoza. |
|
| //| https://www.mql5.com/ |
|
| //+------------------------------------------------------------------+
|
|
|
| //+------------------------------------------------------------------+
|
| //| Pre-Defines |
|
| //+------------------------------------------------------------------+
|
| #pragma once
|
| #define TSNPARSERIN_CPP_DLL
|
| #define TSN_TARGET_AVX2
|
|
|
| //+------------------------------------------------------------------+
|
| //| Includes |
|
| //+------------------------------------------------------------------+
|
| //--- Includes extra
|
| #include "..\\..\\..\\BasesParserSLan\\Src\\Def.mqh"
|
| #include "..\\JsonDefines.mqh"
|
| #include <cstdio>
|
|
|
| //--- Definiciones base
|
| #if defined(TSN_TARGET_AVX512)
|
| #include <immintrin.h>
|
| // kernel con __m512i, _mm512_*, 1 carga de 64 bytes
|
|
|
| #elif defined(TSN_TARGET_AVX2)
|
| #include <immintrin.h>
|
| // kernel con __m256i, _mm256_*, 2 cargas de 32 bytes (lo que ya armamos)
|
|
|
| #elif defined(TSN_TARGET_SSE42)
|
| #include <nmmintrin.h>
|
| // kernel con __m128i, _mm_*, 4 cargas de 16 bytes
|
|
|
| #else
|
| #error "Debes definir TSN_TARGET_AVX512, TSN_TARGET_AVX2 o TSN_TARGET_SSE42"
|
| #endif
|
|
|
| #include <cstdarg>
|
|
|
| //+------------------------------------------------------------------+
|
| //| |
|
| //+------------------------------------------------------------------+
|
| using ulong = uint64_t;
|
| using uchar = uint8_t;
|
|
|
| //--- mascaras
|
| #define TSNTABLES_MASK_IMPARES_F (0xAAAAAAAAAAAAAAAA)
|
| #define TSNTABLES_MASK_PARES_F (0x5555555555555555)
|
|
|
| //+------------------------------------------------------------------+
|
| //| |
|
| //+------------------------------------------------------------------+
|
| // Defines especificos para avanzar
|
| //--- Se usa solo luego de un cor ini aqui peuden ir " [ { t\f\n (1-9\-) ]
|
| #define TSN_JSON_NEXT_COR_INI \
|
| while(true) \
|
| { \
|
| const uchar _c = m_raw[(*m_pos)];\
|
| if(_c < 33) \
|
| { \
|
| (*m_pos)++; \
|
| continue; \
|
| } \
|
| m_next = g_table_json_tokens[_c];\
|
| if(((1 << m_next) & TSN_JSON_F_VAL_COR) == 0)\
|
| { \
|
| *m_last_err= TSN_JSON_ERR_MALFORDMED_JSON; \
|
| return false; \
|
| }\
|
| break; \
|
| }
|
|
|
| //--- Luego de una coma en array
|
| // Luego de una , y KEY siempre siempre valor
|
| #define TSN_JSON_NEXT_VALUE_COMM_KEY \
|
| while(true) \
|
| { \
|
| const uchar _c = m_raw[(*m_pos)];\
|
| if(_c < 33) \
|
| { \
|
| (*m_pos)++; \
|
| continue; \
|
| } \
|
| m_next = g_table_json_tokens[_c];\
|
| if(((1 << m_next) & TSN_JSON_F_ALL_I_VAL) == 0)\
|
| { \
|
| *m_last_err= TSN_JSON_ERR_MALFORDMED_JSON; \
|
| return false; \
|
| }\
|
| break; \
|
| }
|
|
|
| #define JSONPARSERBYLEO_FULL_NEXT \
|
| (*m_pos) = m_index[sp++]; \
|
| m_next = g_table_json_tokens[m_raw[(*m_pos)]];\
|
| if(((1 << m_next) & m_stak_curr_state) == 0)\
|
| {\
|
| *m_last_err = TSN_JSON_ERR_MALFORDMED_JSON;\
|
| return false;\
|
| }
|
|
|
| //--- macro para parsear numeros
|
| #define JSONPARSERBYLEO_PARSE_NUMBER(mask) \
|
| int64_t v = 0;\
|
| uchar ch = m_raw[(*m_pos)] ^ '0';\
|
| while(true) \
|
| { \
|
| v = (v << 3) + (v << 1) + ch; \
|
| (*m_pos)++; \
|
| ch = m_raw[(*m_pos)] ^ '0'; \
|
| if(ch < 10) \
|
| continue; \
|
| else \
|
| if(ch == 30 || (ch | 0x20) == 117) \
|
| { \
|
| double val = double(v); \
|
| if(ch == 30) \
|
| { \
|
| (*m_pos)++; \
|
| int64_t frac_int = 0; \
|
| int fract_digits = 0; \
|
| while(true) \
|
| { \
|
| const uchar c = m_raw[(*m_pos)] ^ '0'; \
|
| if(c > 9) \
|
| break; \
|
| frac_int = (frac_int << 3) + (frac_int << 1) + c; \
|
| fract_digits++; \
|
| (*m_pos)++; \
|
| } \
|
| val += frac_int * g_Exp10[fract_digits]; \
|
| } \
|
| if((m_raw[(*m_pos)] | 0x20) == 'e') \
|
| { \
|
| (*m_pos)++; \
|
| bool exp_sign = true; \
|
| uchar _c = m_raw[(*m_pos)]; \
|
| if(_c == '-') \
|
| { \
|
| exp_sign = false; \
|
| (*m_pos)++; \
|
| } \
|
| else \
|
| if(_c == '+') \
|
| { \
|
| (*m_pos)++; \
|
| } \
|
| _c = m_raw[(*m_pos)] ^ '0'; \
|
| int exp_val = 0; \
|
| while(true) \
|
| { \
|
| exp_val = (exp_val << 3) + (exp_val << 1) + _c; \
|
| (*m_pos)++; \
|
| _c = m_raw[(*m_pos)] ^ '0'; \
|
| if(_c > 9) \
|
| break; \
|
| } \
|
| val *= (exp_sign) ? g_Pow10[exp_val] : g_Exp10[exp_val]; \
|
| } \
|
| TsnBitInterprete bit; \
|
| bit.double_value = val; \
|
| bit.long_value ^= (mask & (1LL << 63)); \
|
| m_cinta[(*m_cinta_pos)++] = JSON_VTYPE_REAL; \
|
| m_cinta[(*m_cinta_pos)++] = bit.long_value; \
|
| break; \
|
| } \
|
| else \
|
| { \
|
| m_cinta[(*m_cinta_pos)++] = JSON_VTYPE_INTEGER; \
|
| m_cinta[(*m_cinta_pos)++] = (v ^ mask) - mask; \
|
| break; \
|
| } \
|
| }
|
|
|
| //+------------------------------------------------------------------+
|
| //| |
|
| //+------------------------------------------------------------------+
|
| extern "C" __declspec(dllexport)
|
| // array ya allocado tambein raw solo hace falta rellenar
|
| bool __stdcall JsonParserResolve(const uint8_t * m_raw, const int len, int* m_last_err, int* m_cinta_pos,
|
| int* m_pos, const int m_offset, int64_t * m_cinta, int* m_index);
|
| //+------------------------------------------------------------------+
|
