MFC.cpp

/*
 * Copyright(c) Sophist Solutions, Inc. 1990-2026.  All rights reserved
 */
#include "Stroika/Frameworks/StroikaPreComp.h"
 
#include <climits>
 
#if qStroika_HasComponent_ATLMFC
 
#include <afxext.h>
 
#include <afxole.h>
 
#include "MFC.h"
 
#if qSupportDrawTextGetTextExtent
 
#include "Stroika/Frameworks/Led/SimpleTextImager.h"
#include "Stroika/Frameworks/Led/SimpleTextStore.h"
#include "Stroika/Frameworks/Led/WordWrappedTextImager.h"
 
#endif
 
using namespace Stroika::Foundation;
 
using namespace Stroika::Frameworks::Led;
using namespace Stroika::Frameworks::Led::Platform;
 
#if qStroika_Frameworks_Led_AssertsDefaultToMFCAsserts && qStroika_Foundation_Debug_AssertionsChecked
static class OneTimeLedMFCAssertionFunctionSetter {
public:
    static void MFCAssertionHandler (const char* fileName, int lineNum)
    {
        ::AfxAssertFailedLine (fileName, lineNum);
    }
    OneTimeLedMFCAssertionFunctionSetter ()
    {
        Led_SetAssertionHandler (MFCAssertionHandler);
    }
} sOneTimeLedMFCAssertionFunctionSetter;
#endif
 
CompileTimeFlagChecker_SOURCE (Stroika::Frameworks::Led::Platform, qStroika_Frameworks_Led_MFCRequiresCWndLeftmostBaseClass,
                               qStroika_Frameworks_Led_MFCRequiresCWndLeftmostBaseClass);
 
/*
 ********************************************************************************
 ******************** Led_MFCReaderDAndDFlavorPackage ***************************
 ********************************************************************************
 */
Led_MFCReaderDAndDFlavorPackage::Led_MFCReaderDAndDFlavorPackage (COleDataObject* dataObject)
    : ReaderFlavorPackage ()
    , fDataObject (dataObject)
{
    RequireNotNull (dataObject);
}
 
bool Led_MFCReaderDAndDFlavorPackage::GetFlavorAvailable (Led_ClipFormat clipFormat) const
{
    AssertNotNull (fDataObject);
    return fDataObject->IsDataAvailable (clipFormat);
}
 
size_t Led_MFCReaderDAndDFlavorPackage::GetFlavorSize (Led_ClipFormat clipFormat) const
{
    // is there some more efficient way todo this? - LGP 960410
    HGLOBAL hObj = fDataObject->GetGlobalData (clipFormat);
    if (hObj == NULL) {
        // Some D&D sources - e.g. "Character Map" application on WinXP - return NULL for GetGlobalData()
        // UNLESS you pass along the full FORMATC. No idea why... SPR#1146
        FORMATETC formatC;
        fDataObject->BeginEnumFormats ();
        while (fDataObject->GetNextFormat (&formatC)) {
            if (formatC.cfFormat == clipFormat) {
                hObj = fDataObject->GetGlobalData (clipFormat, &formatC);
            }
        }
    }
    if (hObj == NULL) {
        return 0;
    }
    size_t result = ::GlobalSize (hObj);
    ::GlobalFree (hObj);
    return result;
}
 
size_t Led_MFCReaderDAndDFlavorPackage::ReadFlavorData (Led_ClipFormat clipFormat, size_t bufSize, void* buf) const
{
    HGLOBAL hObj = fDataObject->GetGlobalData (clipFormat);
    if (hObj == NULL) {
        // Some D&D sources - e.g. "Character Map" application on WinXP - return NULL for GetGlobalData()
        // UNLESS you pass along the full FORMATC. No idea why... SPR#1146
        FORMATETC formatC;
        fDataObject->BeginEnumFormats ();
        while (fDataObject->GetNextFormat (&formatC)) {
            if (formatC.cfFormat == clipFormat) {
                hObj = fDataObject->GetGlobalData (clipFormat, &formatC);
            }
        }
    }
    size_t sizeCopied = 0;
    if (hObj != NULL) {
        size_t realSize = ::GlobalSize (hObj);
        sizeCopied      = min (realSize, bufSize);
        void* p         = ::GlobalLock (hObj);
        if (p != nullptr and sizeCopied != 0) {
            (void)::memcpy (buf, p, sizeCopied);
        }
        ::GlobalUnlock (hObj);
        ::GlobalFree (hObj);
    }
    Ensure (sizeCopied <= bufSize);
    return sizeCopied;
}
 
COleDataObject* Led_MFCReaderDAndDFlavorPackage::GetOleDataObject () const
{
    return fDataObject;
}
 
/*
 ********************************************************************************
 ******************** Led_MFCWriterDAndDFlavorPackage ***************************
 ********************************************************************************
 */
Led_MFCWriterDAndDFlavorPackage::Led_MFCWriterDAndDFlavorPackage (COleDataSource* dataObject)
    : WriterFlavorPackage ()
    , fDataObject (dataObject)
{
    RequireNotNull (dataObject);
}
 
void Led_MFCWriterDAndDFlavorPackage::AddFlavorData (Led_ClipFormat clipFormat, size_t bufSize, const void* buf)
{
    HGLOBAL dataHandle = ::GlobalAlloc (GMEM_DDESHARE, bufSize);
    Execution::ThrowIfNull (dataHandle);
    char* lockedMem = (char*)::GlobalLock (dataHandle);
    AssertNotNull (lockedMem);
    (void)::memcpy (lockedMem, buf, bufSize);
    ::GlobalUnlock (lockedMem);
    fDataObject->CacheGlobalData (clipFormat, dataHandle);
 
    // Note we needn't delete 'dataHandle' cuz puts the handle into a
    // stgMedium, and on desctuction of ole data source, it calls stgfree(or some such)
    // which appears to delte the global handle...
    // LGP 960412
}
 
COleDataSource* Led_MFCWriterDAndDFlavorPackage::GetOleDataSource () const
{
    return fDataObject;
}
 
/*
 ********************************************************************************
 ***************************** MFC_CommandNumberMapping *************************
 ********************************************************************************
 */
MFC_CommandNumberMapping::MFC_CommandNumberMapping ()
{
    AddAssociation (ID_EDIT_UNDO, TextInteractor::kUndo_CmdID);
    AddAssociation (ID_EDIT_REDO, TextInteractor::kRedo_CmdID);
    AddAssociation (ID_EDIT_SELECT_ALL, TextInteractor::kSelectAll_CmdID);
    AddAssociation (ID_EDIT_CUT, TextInteractor::kCut_CmdID);
    AddAssociation (ID_EDIT_COPY, TextInteractor::kCopy_CmdID);
    AddAssociation (ID_EDIT_PASTE, TextInteractor::kPaste_CmdID);
    AddAssociation (ID_EDIT_CLEAR, TextInteractor::kClear_CmdID);
    AddAssociation (ID_EDIT_FIND, TextInteractor::kFind_CmdID);
}
 
/*
 ********************************************************************************
 ****************************** Led_MFC_TmpCmdUpdater ***************************
 ********************************************************************************
 */
Led_MFC_TmpCmdUpdater::CommandNumber Led_MFC_TmpCmdUpdater::GetCmdID () const
{
    return fCmdNum;
}
 
bool Led_MFC_TmpCmdUpdater::GetEnabled () const
{
    return fEnabled;
}
 
void Led_MFC_TmpCmdUpdater::SetEnabled (bool enabled)
{
    EnsureNotNull (fCmdUI);
    fCmdUI->Enable (enabled);
    fEnabled = enabled;
}
 
void Led_MFC_TmpCmdUpdater::SetChecked (bool checked)
{
    EnsureNotNull (fCmdUI);
    fCmdUI->SetCheck (checked);
}
 
void Led_MFC_TmpCmdUpdater::SetText (const Characters::SDKChar* text)
{
    EnsureNotNull (fCmdUI);
    fCmdUI->SetText (text);
}
 
#if qSupportDrawTextGetTextExtent
/*
@METHOD:        Led_GetTextExtent
@DESCRIPTION:   <p>Instantiate @'Led_GetTextExtent<WORDWRAPPEDTEXTIMAGER,SIMPLETEXTIMAGER,TEXTSTORE>.
        <p>See also @'qSupportDrawTextGetTextExtent',
    @'Led_DrawText',
    @'Led_GetTextExtent<WORDWRAPPEDTEXTIMAGER,SIMPLETEXTIMAGER,TEXTSTORE>'.</p>
*/
CSize Led_GetTextExtent (CDC* cdc, const Led_tString& text, CRect r, bool wordWrap)
{
    return Led_GetTextExtent<WordWrappedTextImager, SimpleTextImager, SimpleTextStore> (cdc, text, r, wordWrap);
}
 
/*
@METHOD:        Led_DrawText
@DESCRIPTION:   <p>Instantiate @'Led_DrawText<WORDWRAPPEDTEXTIMAGER,SIMPLETEXTIMAGER,TEXTSTORE>.</p>
        <p>See also @'qSupportDrawTextGetTextExtent',
    @'Led_GetTextExtent',
    @'Led_DrawText<WORDWRAPPEDTEXTIMAGER,SIMPLETEXTIMAGER,TEXTSTORE>'.</p>
*/
void Led_DrawText (CDC* cdc, const Led_tString& text, CRect r, bool wordWrap)
{
    Led_DrawText<WordWrappedTextImager, SimpleTextImager, SimpleTextStore> (cdc, text, r, wordWrap);
}
#endif
 
#endif