//+------------------------------------------------------------------+
//|                                                   JsonPathVM.mqh |
//|                                  Copyright 2026, Niquel Mendoza. |
//|                                             https://www.mql5.com |
//+------------------------------------------------------------------+
#property copyright "Copyright 2026, Niquel Mendoza."
#property link      "https://www.mql5.com"
#property strict

#ifndef JSONPARSERBYLEO_SRC_JSONPATHVM_MQH
#define JSONPARSERBYLEO_SRC_JSONPATHVM_MQH

//+------------------------------------------------------------------+
//| Include                                                          |
//+------------------------------------------------------------------+
//--- maquinaria base
#include <TSN\\BSFL\\Query.mqh>
//--- backend
#include "JsonParser.mqh"
//--- utils
#include <TSN\\BSFL\\Utils.mqh>

//+------------------------------------------------------------------+
//| Implementancion de makekeyhash para la VM                        |
//+------------------------------------------------------------------+
namespace TSN
{
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
static bool CJsonParser::MakeKeyHashFNV1A64(const uchar &in[], int& i, int len, ulong& hash)
 {
//---
  hash = 14695981039346656037ULL;
  for(;; i++) // nota aqui el " se nos garantiza pero igual en uncidoe hay que vertiicar el len
   {
    //---
    const uchar ch = in[i];
    if(ch == '\\')
     {
      const uchar next = g_tsn_table_json_unescape_table[in[++i]];
      switch(next)
       {
        case TSN_TABLE_UNESCAPE_UNICODE:
         {
          if(i + 4 >= len)
            return false;

          //---
          DOMBASEULTIS_MAKESTRING_CODE(code, i)

          //--- Vefificamos low\high surrogate
          if(code >= 0xD800 && code <= 0xDBFF)
           {
            if(i + 6 < len && in[i + 1] == '\\' && in[i + 2] == 'u')
             {
              int j = i + 2;
              DOMBASEULTIS_MAKESTRING_CODE(low, j)
              //---
              if(low >= 0xDC00 && low <= 0xDFFF)
               {
                DOMBASEULTIS_MKH_ITER(code)
                DOMBASEULTIS_MKH_ITER(low)
                i = j;
                break;
               }
             }
            //---
            // if(sizeof(TStrict) == JSONUNESCAPE_STRICT)
            // return def;
            DOMBASEULTIS_MKH_ITER(0xFFFD)
           }
          else
            if(code >= 0xDC00 && code <= 0xDFFF)
             {
              //if(sizeof(TStrict) == JSONUNESCAPE_STRICT)
              //return def;
              DOMBASEULTIS_MKH_ITER(0xFFFD)
             }
            else
             {
              DOMBASEULTIS_MKH_ITER(code)
             }
          break;
         }
        case TSN_TABLE_UNESCAPE_INVALID:
          return false;
        default:
          DOMBASEULTIS_MKH_ITER(next)
          break;
       }
      continue;
     }
    if(ch == '"')
     {
      i++; // lo dejamos luego del "
      return true;
     }

    //---
    DOMBASEULTIS_MKH_ITER(ch)
   }
  return true;
 }

//---
}
#endif // JSONPARSERBYLEO_SRC_JSONPATHVM_MQH