119 lines
2.4 KiB
Plaintext
119 lines
2.4 KiB
Plaintext
/*
|
|
* Irresistible Gaming (c) 2018
|
|
* Developed by Slice
|
|
* Module: mailer.inc
|
|
* Purpose: mailer implementation in pawn
|
|
*/
|
|
#include <a_samp>
|
|
#include <a_http>
|
|
|
|
#if ( !defined MAILER_MAX_MAIL_SIZE )
|
|
#define MAILER_MAX_MAIL_SIZE (1024)
|
|
#endif
|
|
|
|
#define MAILING_URL "sfcnr.com"
|
|
#define MAILER_URL MAILING_URL#"/email/process"
|
|
#if ( !defined MAILER_URL )
|
|
#error Please define MAILER_URL before including the mailer include.
|
|
#endif
|
|
|
|
stock SendMail( const szReceiver[ ], const szReceiverName[ ], const szSubject[ ], const szMessage[ ] )
|
|
{
|
|
new
|
|
szBuffer[ MAILER_MAX_MAIL_SIZE ] = "t=",
|
|
iPos = strlen( szBuffer ),
|
|
iLength = strlen( szReceiver )
|
|
;
|
|
|
|
memcpy( szBuffer, szReceiver, iPos * 4, ( iLength + 1 ) * 4 );
|
|
|
|
StringURLEncode( szBuffer[ iPos ], 1024 - iPos );
|
|
|
|
strcat( szBuffer, "&n=" );
|
|
|
|
iPos = strlen( szBuffer );
|
|
iLength = strlen( szReceiverName );
|
|
|
|
memcpy( szBuffer, szReceiverName, iPos * 4, ( iLength + 1 ) * 4 );
|
|
|
|
StringURLEncode( szBuffer[ iPos ], 1024 - iPos );
|
|
|
|
strcat( szBuffer, "&s=" );
|
|
|
|
iPos = strlen( szBuffer );
|
|
iLength = strlen( szSubject );
|
|
|
|
memcpy( szBuffer, szSubject, iPos * 4, ( iLength + 1 ) * 4 );
|
|
|
|
StringURLEncode( szBuffer[ iPos ], 1024 - iPos );
|
|
|
|
strcat( szBuffer, "&m=" );
|
|
|
|
iPos = strlen( szBuffer );
|
|
iLength = strlen( szMessage );
|
|
|
|
memcpy( szBuffer, szMessage, iPos * 4, ( iLength + 1 ) * 4 );
|
|
|
|
StringURLEncode( szBuffer[ iPos ], 1024 - iPos );
|
|
|
|
// printf("Buffer %s", szBuffer);
|
|
HTTP( 0xD00D, HTTP_POST, MAILER_URL, szBuffer, "OnMailScriptResponse" );
|
|
}
|
|
|
|
forward OnMailScriptResponse( iIndex, iResponseCode, const szData[ ] );
|
|
public OnMailScriptResponse( iIndex, iResponseCode, const szData[ ] )
|
|
{
|
|
if ( szData[ 0 ] )
|
|
print( "Mailer script has failed" );
|
|
}
|
|
|
|
stock StringURLEncode( szString[ ], iSize = sizeof( szString ) )
|
|
{
|
|
for ( new i = 0, l = strlen( szString ); i < l; i++ )
|
|
{
|
|
switch ( szString[ i ] )
|
|
{
|
|
case '!', '(', ')', '\'', '*',
|
|
'0' .. '9',
|
|
'A' .. 'Z',
|
|
'a' .. 'z':
|
|
{
|
|
continue;
|
|
}
|
|
|
|
case ' ':
|
|
{
|
|
szString[ i ] = '+';
|
|
|
|
continue;
|
|
}
|
|
}
|
|
|
|
new
|
|
s_szHex[ 8 ]
|
|
;
|
|
|
|
if ( i + 3 >= iSize )
|
|
{
|
|
szString[ i ] = EOS;
|
|
|
|
break;
|
|
}
|
|
|
|
if ( l + 3 >= iSize )
|
|
szString[ iSize - 3 ] = EOS;
|
|
|
|
format( s_szHex, sizeof( s_szHex ), "%02h", szString[ i ] );
|
|
|
|
szString[ i ] = '%';
|
|
|
|
strins( szString, s_szHex, i + 1, iSize );
|
|
|
|
l += 2;
|
|
i += 2;
|
|
|
|
if ( l > iSize - 1 )
|
|
l = iSize - 1;
|
|
}
|
|
}
|