forked from nique_372/CryptoByLeo
64 lines
1.9 KiB
MQL5
64 lines
1.9 KiB
MQL5
|
//+------------------------------------------------------------------+
|
||
|
|
//| Use.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
|
||
|
|
|
||
|
|
//+------------------------------------------------------------------+
|
||
|
|
//| |
|
||
|
|
//+------------------------------------------------------------------+
|
||
|
|
#include "Main.mqh"
|
||
|
|
|
||
|
|
//+------------------------------------------------------------------+
|
||
|
|
//| Script program start function |
|
||
|
|
//+------------------------------------------------------------------+
|
||
|
|
void OnStart()
|
||
|
|
{
|
||
|
|
//---
|
||
|
|
uchar key[32] =
|
||
|
|
{
|
||
|
|
0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07,
|
||
|
|
0x08, 0x09, 0x0A, 0x0B, 0x0C, 0x0D, 0x0E, 0x0F,
|
||
|
|
0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x17,
|
||
|
|
0x18, 0x19, 0x1A, 0x1B, 0x1C, 0x1D, 0x1E, 0x1F
|
||
|
|
};
|
||
|
|
|
||
|
|
//---
|
||
|
|
uchar iv[16] =
|
||
|
|
{
|
||
|
|
0x6b, 0xc1, 0xbe, 0xe2, 0x2e, 0x40, 0x9f, 0x96,
|
||
|
|
0xe9, 0x3d, 0x7e, 0x11, 0x73, 0x93, 0x17, 0x2a
|
||
|
|
};
|
||
|
|
|
||
|
|
//---
|
||
|
|
uchar in[];
|
||
|
|
string v = "hola como estas";
|
||
|
|
StringToCharArray(v, in, 0, StringLen(v));
|
||
|
|
|
||
|
|
//--- Inicializamos AES-256
|
||
|
|
TSN::CAes ae;
|
||
|
|
ae.Method(TSN::AES_CRYPTH_256);
|
||
|
|
|
||
|
|
//---
|
||
|
|
if(!ae.Init(key, iv))
|
||
|
|
{
|
||
|
|
Print("Error al inicializar AES");
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
|
||
|
|
//---
|
||
|
|
const int t = TSN::CAes::PKCS7_CorrectPadding(in);
|
||
|
|
Print(t);
|
||
|
|
ae.CbcCifrado(in, t);
|
||
|
|
ArrayCopy(ae.m_iv, iv, 0, 0, AES_BLOCKLEN);
|
||
|
|
ae.CbcDescifra(in, t);
|
||
|
|
|
||
|
|
const int nt = TSN::CAes::PKCS7_QuitarPadding(in);
|
||
|
|
ArrayResize(in, nt);
|
||
|
|
Print(CharArrayToString(in));
|
||
|
|
}
|
||
|
|
//+------------------------------------------------------------------+
|