amirghadiri1987
77 lines
2.2 KiB
Plaintext
77 lines
2.2 KiB
Plaintext
/*
|
|
WebLicenceTest
|
|
Copyright 2021, Orchard Forex
|
|
https://www.orchardforex.com
|
|
*/
|
|
|
|
#include <Orchard/LicenceCheck/LicenceWebCheck.mqh>
|
|
|
|
input string InpProductName = "product1"; // Product name used in file name
|
|
input string InpProductKey = "key1"; // Secret product key
|
|
input int InpAccount = 123456; // Customer Account number
|
|
input bool InpTesting = false; // Is this a test
|
|
|
|
CLicenceWeb *licenceWeb;
|
|
|
|
void OnStart_() {
|
|
|
|
licenceWeb = new CLicenceWeb( InpProductName, InpProductKey, "", InpAccount );
|
|
licenceWeb.SetRegistration();
|
|
if ( !InpTesting ) {
|
|
Make();
|
|
}
|
|
else {
|
|
Test();
|
|
}
|
|
string data1;
|
|
licenceWeb.chekload1(data1);
|
|
|
|
Print("data1 ",data1);
|
|
delete licenceWeb;
|
|
}
|
|
|
|
void Make() {
|
|
|
|
// Just making up some data here
|
|
// You could use anything that works for you
|
|
// Account number, expiry time, grace expiry time
|
|
string data = licenceWeb.Hash( string( InpAccount ) ) + "\n" + licenceWeb.Hash( InpProductName ) + "\n" + TimeToString( TimeCurrent() + ( 86400 * 30 ) ) + "\n" +
|
|
TimeToString( TimeCurrent() + ( 86400 * 33 ) );
|
|
|
|
// Not necessary to do this, just for demonstration
|
|
string signature = licenceWeb.KeyGen( data );
|
|
Print( "The signature is " + signature );
|
|
|
|
// Create the file to ship to the customer
|
|
if ( !licenceWeb.FileGen( data ) ) {
|
|
Print( "Failed to create licence file" );
|
|
return;
|
|
}
|
|
|
|
Print( "Created licence file" );
|
|
}
|
|
|
|
void Test() {
|
|
|
|
Print( "Now testing licence" );
|
|
if ( !licenceWeb.Check() ) {
|
|
Print( "Oops, problem with the licence" );
|
|
return;
|
|
}
|
|
|
|
Print( "Valid Licence" );
|
|
string parts[];
|
|
string licenceData = licenceWeb.GetData();
|
|
StringSplit( licenceData, '\n', parts );
|
|
|
|
PrintFormat( "Account=%s, %s", parts[0], ( parts[0] == licenceWeb.Hash( string( InpAccount ) ) ) ? "correct" : "fail" );
|
|
|
|
PrintFormat( "Product=%s, %s", parts[1], ( parts[1] == licenceWeb.Hash( InpProductName ) ) ? "correct" : "fail" );
|
|
|
|
PrintFormat( "Expires at %s", parts[2] );
|
|
PrintFormat( "Grace expires at %s", parts[3] );
|
|
}
|
|
|
|
// bnH1yjYYpwp+dBDfzfvgUzmOGVhtv6hTHeYX7MwVhcQ=.lic
|
|
// bnH1yjYYpwp+dBDfzfvgUzmOGVhtv6hTHeYX7MwVhcQ=
|