//+------------------------------------------------------------------+
//|                                                       BenAsm.mq5 |
//|                                  Copyright 2026, Niquel Mendoza. |
//|                                            https://www.mql5.com/ |
//+------------------------------------------------------------------+
#property copyright "Copyright 2026, Niquel Mendoza."
#property link      "https://www.mql5.com/"
#property version   "1.00"
#property strict

//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
#define JSONASM_VER
#define JSONBENCH_RUN_PARSE

//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
#include "Def.mqh"
#include "..\\..\\Src\\JsonNode.mqh"

//#define JSONBENCH_RUN_PARSE
#define LIBNAME "JsonParserByLeo-ASM"


//+------------------------------------------------------------------+
//| Script program start function                                    |
//+------------------------------------------------------------------+
void OnStart()
 {
//---
  TSN::CJsonParser parser;


//--- Parseo
#ifdef JSONBENCH_RUN_PARSE
  parser.Assing(g_json_data);
  parser.CorrectPadding();

  Sleep(500);

  ulong a  = GetMicrosecondCount();
  for(int i = 0; i < JSONBENCH_TOTAL_ITER_PARSE; i++)
   {
    parser.ParseAssembly();
   }
  ulong b = GetMicrosecondCount();

  Sleep(250);

  Print("@", (b - a));
//---
#else

//--- previa
  parser.Assing(g_json_test_access);
  parser.CorrectPadding();
  parser.Parse();
  TSN::CJsonNode root = parser.GetRoot();
  string keys[];
  const int n = root["wide_object"].GetKeys(keys);

//-- Random
  TSN::CRandom<Xoshiro256> xo;
  xo.Seed(JSONBENCH_ACCESO_XHOR_SEED);

// init
  double sump = 0.0, profit = 0.0;
  long tin = 0;

//--
  ulong a = GetMicrosecondCount();
  for(int i = 0; i < JSONBENCH_TOTAL_ITER_ACCESO; i++)
   {
    const string key = keys[xo.RandomInteger(0, n)];
    root["wide_object"][key];
   }
  ulong b = GetMicrosecondCount();

  Sleep(100);

  JSONBENCH_ACCES_CALL(JSONBENCH_TAGOP_ACCESO_WIDE)



  a = GetMicrosecondCount();
  for(int i = 0; i < JSONBENCH_TOTAL_ITER_ACCESO; i++)
   {
    root["deep_object"]["l1"]["l2"]["l3"]["l4"]["l5"]["l6"]["l7"]["l8"]["l9"]["l10"]["target"].ToString();
   }
  b = GetMicrosecondCount();

  Sleep(100);

  JSONBENCH_ACCES_CALL(JSONBENCH_TAGOP_ACCESO_DEEP)


  a = GetMicrosecondCount();
  for(int i = 0; i < JSONBENCH_TOTAL_ITER_ACCESO; i++)
   {
    const int index = xo.RandomInteger(0, 10000);
    tin += root["large_array"].AtHomegeneo(index).ToInt(0);
   }
  b = GetMicrosecondCount();

  Sleep(100);

  JSONBENCH_ACCES_CALL(JSONBENCH_TAGOP_ACCESO_LARGE_ARR)


  a = GetMicrosecondCount();

  for(int k = 0; k < 500; k++)
   {
    sump += root["array_of_objects"].At(k)["price"].ToDouble(0.0);
    profit += root["array_of_objects"].At(k)["profit"].ToDouble(0.0);
    tin += root["array_of_objects"].At(k)["tags"].Size();
   }

  b = GetMicrosecondCount();

  Sleep(100);

  JSONBENCH_ACCES_CALL(JSONBENCH_TAGOP_ACCESO_MIX)


//----
  PrintFormat("sump=%.2f profit=%.2f tin=%d ", sump, profit, tin);

//---
  JSONBENCH_FINISH

//---
#endif
 }
//+------------------------------------------------------------------+
/*
2026.09.18 14:06:00.416	BenAsm (EURUSD,H1)	@631854
2026.09.18 14:06:11.581	BenAsm (EURUSD,H1)	@632496
2026.09.18 14:06:15.597	BenAsm (EURUSD,H1)	@630396
2026.09.18 14:06:23.625	BenAsm (EURUSD,H1)	@631739


2026.08.28 10:35:51.839	BenAsm (EURUSD,H1)	[acceso-wide] Time: 141
2026.08.28 10:35:51.950	BenAsm (EURUSD,H1)	[acceso-deep] Time: 819
2026.08.28 10:35:52.062	BenAsm (EURUSD,H1)	[acceso-array-large] Time: 108
2026.08.28 10:35:52.173	BenAsm (EURUSD,H1)	[acceso-mixed-trading] Time: 2456
2026.08.28 10:35:52.173	BenAsm (EURUSD,H1)	sump=537.48 profit=-337.50 tin=4925578 
2026.08.28 10:35:55.436	BenAsm (EURUSD,H1)	[acceso-wide] Time: 140
2026.08.28 10:35:55.549	BenAsm (EURUSD,H1)	[acceso-deep] Time: 716
2026.08.28 10:35:55.661	BenAsm (EURUSD,H1)	[acceso-array-large] Time: 104
2026.08.28 10:35:55.772	BenAsm (EURUSD,H1)	[acceso-mixed-trading] Time: 1927
2026.08.28 10:35:55.772	BenAsm (EURUSD,H1)	sump=537.48 profit=-337.50 tin=4925578 
2026.08.28 10:35:59.433	BenAsm (EURUSD,H1)	[acceso-wide] Time: 140
2026.08.28 10:35:59.545	BenAsm (EURUSD,H1)	[acceso-deep] Time: 750
2026.08.28 10:35:59.655	BenAsm (EURUSD,H1)	[acceso-array-large] Time: 116
2026.08.28 10:35:59.767	BenAsm (EURUSD,H1)	[acceso-mixed-trading] Time: 1971
2026.08.28 10:35:59.767	BenAsm (EURUSD,H1)	sump=537.48 profit=-337.50 tin=4925578 


*/