MQLArticles/Utils/File/FolderOps/Test/TestEnc.mq5

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

//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
#include "..\\FolderEncrypt.mqh"
// incluimos PRNG random
#include <TSN\\Crypto\\URandomPRNG.mqh>
// Xoshiro256 para random
#include <TSN\\Random\\Xoshiro256.mqh>

//+------------------------------------------------------------------+
//| Script program start function                                    |
//+------------------------------------------------------------------+
void OnStart()
 {
//---
  const string folder_path = "MQLArticles\\File\\FolderOps\\Enc\\";
  ::FolderDelete(folder_path, FILE_COMMON); // Elimnamos si existe

//---
  struct File
   {
    string           path;
    string           content;
   };
  const File data[] =
   {
     {folder_path + "data_importante.txt", "contraseña: 123"},
     {folder_path + "data_importante.csv", "contraseña: kjsdbfjksd"},
     {folder_path + "data_importante.ini", "key=val"},
   };

//---
  const int t = ArraySize(data);
  for(int i = 0; i < t; i++)
   {
    ::ResetLastError();
    const int fh = FileOpen(data[i].path, FILE_TXT | FILE_WRITE | FILE_COMMON);
    if(fh == INVALID_HANDLE)
     {
      PrintFormat("Fallo al abrir el archivo = %s, ultimo error = %d", data[i].path, ::GetLastError());
      continue;
     }
    FileWrite(fh, data[i].content);
    FileClose(fh);
   }

//--- Random para el IV
  TSN::CURandomPRNG<Xoshiro256>::s_rand.Seed(1000);
// key 0 para reproducibilidad
  uchar key[CRYPTOBYLEO_FERNET_KEYBYTES];
  ArrayInitialize(key, 0);

//---
  TSN::CFernet fernet;
  fernet.Key(key);

//---
  TSN::CFolderOpsEncrypt folder_enc;
  folder_enc.AddLogFlags(LOG_ALL);

// Seteamos el encriptoadr y su random
  folder_enc.Fernet(&fernet);

// Steamos los inc
  folder_enc.SizeArrInclued(2);
  folder_enc.SetValIncluyed(0, "*.txt");
  folder_enc.SetValIncluyed(1, "*.csv");
// Encryptamos
  folder_enc.SetInitialPass();
// usamos el random URandomPRNG con bakcend de xho para el IV
  Print(folder_enc.EncryptFolder<TSN::CURandomPRNG<Xoshiro256>>(folder_path, true, true, TimeLocal(), ".enc"));
 }
//+------------------------------------------------------------------+