/*

* Copyright (c) 2007-2009 Nokia Corporation and/or its subsidiary(-ies). 

* All rights reserved.

* This component and the accompanying materials are made available

* under the terms of "Eclipse Public License v1.0"

* which accompanies this distribution, and is available

* at the URL "http://www.eclipse.org/legal/epl-v10.html".

*

* Initial Contributors:

* Nokia Corporation - initial contribution.

*

* Contributors:

*

* Description:  ESMR policy implementation

*

*/

#include "emailtrace.h"

#include "cesmrmeetingrequestsender.h"

#include <cmrmailboxutils.h>

#include <coemain.h>

#include <f32file.h>

#include <calentry.h>

#include <caluser.h>

#include <utf.h>

#include "mesmrmeetingrequestentry.h"

#include "cesmrcalimportexporter.h"

#include "esmrentryhelper.h"

#include "esmrhelper.h"

#include "cesmrmailplaitextformatter.h"

// Unnamed namespace for local definitions

namespace {

const TInt KMRBufferSize = 16 * 1024;

_LIT8( KMethodRequest, "REQUEST" );

_LIT8( KMethodResponse, "RESPONSE" );

_LIT8( KMethodCancel, "CANCEL" );

_LIT8( KNewLine, "\n" );

//<cmail> remove hardcoded paths

//_LIT( KNCFileName, "c:\\temp\\mail.tmp" ); //codescanner::driveletters

_LIT( KNCFile, "temp\\mail.tmp" );

//</cmail>

_LIT8( KStart, "EHLO hello\n");

_LIT8( KEnd, ".\nQUIT\n" );

_LIT8( KMailFromStart, "MAIL FROM:<");

_LIT8( KRecipientTo, "RCPT TO:<");

_LIT8( KAddressEnd, ">\n");

_LIT8( KDataStart, "DATA\n" );

_LIT8( KTo, "To:");

// ======== LOCAL FUNCTIONS ========

// ---------------------------------------------------------------------------

// Constructs file for nc application. NC application can further

// send the file to recipients.

// ---------------------------------------------------------------------------

//

void StoreToFileL(

        MESMRMeetingRequestEntry& aEntry,

        CMRMailboxUtils& aMailboxUtils,

        const TDesC& aFreePlainText )

    {

    FUNC_LOG;

    HBufC8* mrBuffer = HBufC8::NewLC( KMRBufferSize );

    TPtr8 mrBufPtr( mrBuffer->Des() );

    CESMRMailPlainTextFormatter* mailPlainTextFormatter =

        CESMRMailPlainTextFormatter::NewLC( aMailboxUtils );

    mrBufPtr.Append(KStart);

    CCalEntry& entry = aEntry.Entry();

    CCalUser* sender = entry.PhoneOwnerL();

    if ( !sender )

        {

        User::Leave( KErrArgument);

        }

    mrBufPtr.Append( KMailFromStart );

    mrBufPtr.Append(

        ESMRHelper::AddressWithoutMailtoPrefix( sender->Address() ) );

    mrBufPtr.Append( KAddressEnd );

    if ( entry.MethodL() == CCalEntry::EMethodReply )

        {

        CCalUser* organizer = NULL;

        TRAP_IGNORE( organizer = entry.OrganizerL() );

        mrBufPtr.Append(KRecipientTo() );

        mrBufPtr.Append(

            ESMRHelper::AddressWithoutMailtoPrefix( organizer->Address() ) );

        mrBufPtr.Append(KAddressEnd());

        }

    else

        {

        RPointerArray<CCalAttendee>& attendees = entry.AttendeesL();

        TInt attendeeCount( attendees.Count() );

        for (TInt i(0); i < attendeeCount; ++i )

            {

            mrBufPtr.Append(KRecipientTo() );

            mrBufPtr.Append(

                ESMRHelper::AddressWithoutMailtoPrefix( attendees[i]->Address() ) );

            mrBufPtr.Append(KAddressEnd());

            }

        }

    mrBufPtr.Append( KDataStart );

    _LIT(KDateFormat,"%*E%,%D%*N %1 %2");

    _LIT( KDateStart, "Date: " );

    TTime time; time.UniversalTime();

    TDateTime dTime = time.DateTime();

    TBuf<30> dateString;

    time.FormatL(dateString, KDateFormat );

    mrBufPtr.Append( KDateStart );

    mrBufPtr.Append( dateString );

    _LIT8( KFormat, " %d %02d:%02d:%02d +0000\n" );

    mrBufPtr.AppendFormat( KFormat, dTime.Year(), dTime.Hour(), dTime.Minute(), dTime.Second() );

    if ( entry.MethodL() == CCalEntry::EMethodReply )

        {

        // Leavescan fix

        CCalUser* organizer = NULL;

        TRAP_IGNORE( organizer = entry.OrganizerL() );

        mrBufPtr.Append( KTo );

        mrBufPtr.Append(

            ESMRHelper::AddressWithoutMailtoPrefix( organizer->Address() ) );

        mrBufPtr.Append( KNewLine );

        }

    else

        {mrBufPtr.Append( KTo );

        RPointerArray<CCalAttendee>& attendees = entry.AttendeesL();

        TInt attendeeCount( attendees.Count() );

        for (TInt i(0); i < attendeeCount; ++i )

            {

            _LIT8( KComma, ",");

            _LIT8( KStart, "<");

            _LIT8( KEnd, "<");

            mrBufPtr.Append( KStart );

            mrBufPtr.Append(

                ESMRHelper::AddressWithoutMailtoPrefix( attendees[i]->Address() ) );

            mrBufPtr.Append( KEnd );

            mrBufPtr.Append( KComma );

            }

            mrBufPtr.Append( KNewLine );

        }

    _LIT8( KReplyTo, "Reply-To: ");

    mrBufPtr.Append( KReplyTo );

        mrBufPtr.Append(

        ESMRHelper::AddressWithoutMailtoPrefix( sender->Address() ) );

    mrBufPtr.Append( KNewLine );

    _LIT8( KFrom, "From: " );

    mrBufPtr.Append( KFrom );

    mrBufPtr.Append(

        ESMRHelper::AddressWithoutMailtoPrefix( sender->Address() ) );

    mrBufPtr.Append( KNewLine );

    _LIT8( KSubject, "Subject: " );

    mrBufPtr.Append( KSubject );

    HBufC8* subject = mailPlainTextFormatter->Subject8LC(aEntry);

    mrBufPtr.Append( *subject );

    CleanupStack::PopAndDestroy( subject );

    mrBufPtr.Append( KNewLine );

    _LIT8(KMimeVer, "MIME-Version: 1.0\n" );

    mrBufPtr.Append( KMimeVer );

    _LIT8( KMailContentType, "Content-Type: multipart/alternative;\n        boundary=\"EPOC32-cqFgWS+P6_g42_fH-ySFynWD'-TgP+tX+tHKMDhNp-fmZFHj\"\n" );

    mrBufPtr.Append( KMailContentType );

    _LIT8( XParams, "X-imss-version: 2.043\nX-imss-result: Passed\nX-imss-scores: Clean:45.41865 C:2 M:3 S:5 R:5\nX-imss-settings: Baseline:2 C:1 M:1 S:1 R:1 (0.1500 0.1500)\n\nThis is a MIME Message\n\n" );

    mrBufPtr.Append( XParams );

    _LIT8( KPlainBoundary, "--EPOC32-cqFgWS+P6_g42_fH-ySFynWD'-TgP+tX+tHKMDhNp-fmZFHj\nContent-Type: text/plain; charset=ISO-8859-1\nContent-Disposition: inline\nContent-Transfer-Encoding: quoted-printable\n\n" );

    mrBufPtr.Append( KPlainBoundary );

    HBufC8* bodyText = mailPlainTextFormatter->Body8LC( aEntry );

    mrBufPtr.Append( *bodyText );

    CleanupStack::PopAndDestroy( bodyText );

    if ( aFreePlainText.Length() )

        {

        _LIT8( KFreeTextSeparatorTxt, "------------------------------------------------------------------------\n" );

        mrBufPtr.Append( KFreeTextSeparatorTxt );

        HBufC8* freeTxt8 = CnvUtfConverter::ConvertFromUnicodeToUtf8L( aFreePlainText );

        mrBufPtr.Append( *freeTxt8 );

        mrBufPtr.Append( KNewLine );

        mrBufPtr.Append( KNewLine );

        delete freeTxt8;

        }

    _LIT( KMRBoundary, "--EPOC32-cqFgWS+P6_g42_fH-ySFynWD'-TgP+tX+tHKMDhNp-fmZFHj\nContent-Type: text/calendar;\n        method=");

    mrBufPtr.Append( KMRBoundary );

    if ( entry.MethodL() == CCalEntry::EMethodRequest )

        {

        mrBufPtr.Append( KMethodRequest );

        }

    else if ( entry.MethodL() == CCalEntry::EMethodCancel )

        {

        mrBufPtr.Append( KMethodCancel );

        }

    else

        {

        mrBufPtr.Append( KMethodResponse );

        }

    mrBufPtr.Append( KNewLine );

    _LIT( KMRBoundaryEnd, "        name=\"meeting.ics\"\nContent-Transfer-Encoding: 8bit\n\n" );

    mrBufPtr.Append( KMRBoundaryEnd );

    CESMRCalImportExporter* calExporter = CESMRCalImportExporter::NewLC();

    HBufC8* iCal = calExporter->ExportToICal8LC( entry );

    mrBufPtr.Append( *iCal );

    CleanupStack::PopAndDestroy( iCal );

    CleanupStack::PopAndDestroy(calExporter);

    mrBufPtr.Append( KNewLine );

    _LIT(KBoundaryEnd, "--EPOC32-cqFgWS+P6_g42_fH-ySFynWD'-TgP+tX+tHKMDhNp-fmZFHj--\n\n\n" );

    mrBufPtr.Append( KBoundaryEnd );

    mrBufPtr.Append( KEnd);

    RFile ncFile;

    RFs& fs = CCoeEnv::Static()->FsSession();

    //<cmail> remove hard coded paths

    //TInt err = fs.MkDirAll( KNCFileName() );

    TFileName fileName(KNCFile);

    User::LeaveIfError(ESMRHelper::CreateAndAppendPrivateDirToFileName(fileName));

    TInt err = ncFile.Replace( fs, fileName, EFileWrite );

    //</cmail>

    if (KErrAlreadyExists != err )

        {

        User::LeaveIfError( err );

        }

    CleanupClosePushL( ncFile );

    User::LeaveIfError( ncFile.Write(mrBufPtr) );

    CleanupStack::PopAndDestroy( &ncFile );

    // mrBuffer, mailPlainTextFormatter

    CleanupStack::PopAndDestroy( 2, mrBuffer );

    }

}  // namespace

// ======== MEMBER FUNCTIONS ========

// ---------------------------------------------------------------------------

// CESMRMeetingRequestSender::CESMRMeetingRequestSender

// ---------------------------------------------------------------------------

//

inline CESMRMeetingRequestSender::CESMRMeetingRequestSender(

        CMRMailboxUtils& aMailboxUtils) :

        iMailboxUtils( aMailboxUtils )

    {

    FUNC_LOG;

    //do nothing

    }

// ---------------------------------------------------------------------------

// CESMRMeetingRequestSender::~CESMRMeetingRequestSender

// ---------------------------------------------------------------------------

//

EXPORT_C CESMRMeetingRequestSender::~CESMRMeetingRequestSender()

    {

    FUNC_LOG;

    //do nothing

    }

// ---------------------------------------------------------------------------

// CESMRMeetingRequestSender::NewL

// ---------------------------------------------------------------------------

//

EXPORT_C CESMRMeetingRequestSender*

    CESMRMeetingRequestSender::NewL(

        CMRMailboxUtils& aMailboxUtils )

    {

    CESMRMeetingRequestSender* self =

        new (ELeave) CESMRMeetingRequestSender( aMailboxUtils );

    CleanupStack::PushL( self );

    self->ConstructL();

    CleanupStack::Pop( self );

    return self;

    }

// ---------------------------------------------------------------------------

// CESMRMeetingRequestSender::ConstructL

// ---------------------------------------------------------------------------

//

void CESMRMeetingRequestSender::ConstructL()

    {

    FUNC_LOG;

    //do nothing

    }

// ---------------------------------------------------------------------------

// CESMRMeetingRequestSender::CreateAndSendMeetingRequestL

// ---------------------------------------------------------------------------

//

void CESMRMeetingRequestSender::CreateAndSendMeetingRequestL(

                MESMRMeetingRequestEntry& aEntry )

    {

    FUNC_LOG;

    StoreToFileL( aEntry, iMailboxUtils, KNullDesC() );

    }

// ---------------------------------------------------------------------------

// CESMRMeetingRequestSender::CreateAndSendMeetingRequestL

// ---------------------------------------------------------------------------

//

void CESMRMeetingRequestSender::CreateAndSendMeetingRequestL(

                MESMRMeetingRequestEntry& aEntry,

                const TDesC& aFreePlainText )

    {

    FUNC_LOG;

    StoreToFileL( aEntry, iMailboxUtils, aFreePlainText );

    }