Adding upstream version 4:7.4.7.upstream/4%7.4.7upstream

Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>

1 files changed, 198 insertions, 0 deletions

diff --git a/basic/source/runtime/ddectrl.cxx b/basic/source/runtime/ddectrl.cxx
new file mode 100644
index 000000000..bb2c4c554
--- /dev/null
+++ b/basic/source/runtime/ddectrl.cxx
@@ -0,0 +1,198 @@
+/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
+/*
+ * This file is part of the LibreOffice project.
+ *
+ * This Source Code Form is subject to the terms of the Mozilla Public
+ * License, v. 2.0. If a copy of the MPL was not distributed with this
+ * file, You can obtain one at http://mozilla.org/MPL/2.0/.
+ *
+ * This file incorporates work covered by the following license notice:
+ *
+ *   Licensed to the Apache Software Foundation (ASF) under one or more
+ *   contributor license agreements. See the NOTICE file distributed
+ *   with this work for additional information regarding copyright
+ *   ownership. The ASF licenses this file to you under the Apache
+ *   License, Version 2.0 (the "License"); you may not use this file
+ *   except in compliance with the License. You may obtain a copy of
+ *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
+ */
+
+#include <vcl/errcode.hxx>
+#include <svl/svdde.hxx>
+#include "ddectrl.hxx"
+#include <basic/sberrors.hxx>
+
+#define DDE_FIRSTERR    0x4000
+#define DDE_LASTERR     0x4011
+
+const ErrCode nDdeErrMap[] =
+{
+    /* DMLERR_ADVACKTIMEOUT       */  ErrCode(0x4000), ERRCODE_BASIC_DDE_TIMEOUT,
+    /* DMLERR_BUSY                */  ErrCode(0x4001), ERRCODE_BASIC_DDE_BUSY,
+    /* DMLERR_DATAACKTIMEOUT      */  ErrCode(0x4002), ERRCODE_BASIC_DDE_TIMEOUT,
+    /* DMLERR_DLL_NOT_INITIALIZED */  ErrCode(0x4003), ERRCODE_BASIC_DDE_ERROR,
+    /* DMLERR_DLL_USAGE           */  ErrCode(0x4004), ERRCODE_BASIC_DDE_ERROR,
+    /* DMLERR_EXECACKTIMEOUT      */  ErrCode(0x4005), ERRCODE_BASIC_DDE_TIMEOUT,
+    /* DMLERR_INVALIDPARAMETER    */  ErrCode(0x4006), ERRCODE_BASIC_DDE_ERROR,
+    /* DMLERR_LOW_MEMORY          */  ErrCode(0x4007), ERRCODE_BASIC_DDE_ERROR,
+    /* DMLERR_MEMORY_ERROR        */  ErrCode(0x4008), ERRCODE_BASIC_DDE_ERROR,
+    /* DMLERR_NOTPROCESSED        */  ErrCode(0x4009), ERRCODE_BASIC_DDE_NOTPROCESSED,
+    /* DMLERR_NO_CONV_ESTABLISHED */  ErrCode(0x400a), ERRCODE_BASIC_DDE_NO_CHANNEL,
+    /* DMLERR_POKEACKTIMEOUT      */  ErrCode(0x400b), ERRCODE_BASIC_DDE_TIMEOUT,
+    /* DMLERR_POSTMSG_FAILED      */  ErrCode(0x400c), ERRCODE_BASIC_DDE_QUEUE_OVERFLOW,
+    /* DMLERR_REENTRANCY          */  ErrCode(0x400d), ERRCODE_BASIC_DDE_ERROR,
+    /* DMLERR_SERVER_DIED         */  ErrCode(0x400e), ERRCODE_BASIC_DDE_PARTNER_QUIT,
+    /* DMLERR_SYS_ERROR           */  ErrCode(0x400f), ERRCODE_BASIC_DDE_ERROR,
+    /* DMLERR_UNADVACKTIMEOUT     */  ErrCode(0x4010), ERRCODE_BASIC_DDE_TIMEOUT,
+    /* DMLERR_UNFOUND_QUEUE_ID    */  ErrCode(0x4011), ERRCODE_BASIC_DDE_NO_CHANNEL
+};
+
+ErrCode SbiDdeControl::GetLastErr( const DdeConnection* pConv )
+{
+    if( !pConv )
+    {
+        return ERRCODE_NONE;
+    }
+    tools::Long nErr = pConv->GetError();
+    if( !nErr )
+    {
+        return ERRCODE_NONE;
+    }
+    if( nErr < DDE_FIRSTERR || nErr > DDE_LASTERR )
+    {
+        return ERRCODE_BASIC_DDE_ERROR;
+    }
+    return nDdeErrMap[ 2 * (nErr - DDE_FIRSTERR) + 1 ];
+}
+
+IMPL_LINK( SbiDdeControl, Data, const DdeData*, pData, void )
+{
+    aData = OUString::createFromAscii( static_cast<const char*>(pData->getData()) );
+}
+
+SbiDdeControl::SbiDdeControl()
+{
+}
+
+SbiDdeControl::~SbiDdeControl()
+{
+    TerminateAll();
+}
+
+size_t SbiDdeControl::GetFreeChannel()
+{
+    size_t nChannel = 0;
+    size_t nListSize = aConvList.size();
+
+    for (; nChannel < nListSize; ++nChannel)
+    {
+        if (!aConvList[nChannel])
+        {
+            return nChannel+1;
+        }
+    }
+
+    aConvList.push_back(nullptr);
+    return nChannel+1;
+}
+
+ErrCode SbiDdeControl::Initiate( const OUString& rService, const OUString& rTopic,
+                                 size_t& rnHandle )
+{
+    ErrCode nErr;
+    auto pConv = std::make_unique<DdeConnection> ( rService, rTopic );
+    nErr = GetLastErr( pConv.get() );
+    if( nErr )
+    {
+        rnHandle = 0;
+    }
+    else
+    {
+        size_t nChannel = GetFreeChannel();
+        aConvList[nChannel-1] = std::move(pConv);
+        rnHandle = nChannel;
+    }
+    return ERRCODE_NONE;
+}
+
+ErrCode SbiDdeControl::Terminate( size_t nChannel )
+{
+    if (!nChannel || nChannel > aConvList.size())
+    {
+        return ERRCODE_BASIC_DDE_NO_CHANNEL;
+    }
+    DdeConnection* pConv = aConvList[nChannel-1].get();
+
+    if( !pConv )
+    {
+        return ERRCODE_BASIC_DDE_NO_CHANNEL;
+    }
+    aConvList[nChannel-1].reset();
+
+    return ERRCODE_NONE;
+}
+
+ErrCode SbiDdeControl::TerminateAll()
+{
+    aConvList.clear();
+    return ERRCODE_NONE;
+}
+
+ErrCode SbiDdeControl::Request( size_t nChannel, const OUString& rItem, OUString& rResult )
+{
+    if (!nChannel || nChannel > aConvList.size())
+    {
+        return ERRCODE_BASIC_DDE_NO_CHANNEL;
+    }
+
+    DdeConnection* pConv = aConvList[nChannel-1].get();
+
+    if( !pConv )
+    {
+        return ERRCODE_BASIC_DDE_NO_CHANNEL;
+    }
+
+    DdeRequest aRequest( *pConv, rItem, 30000 );
+    aRequest.SetDataHdl( LINK( this, SbiDdeControl, Data ) );
+    aRequest.Execute();
+    rResult = aData;
+    return GetLastErr( pConv );
+}
+
+ErrCode SbiDdeControl::Execute( size_t nChannel, const OUString& rCommand )
+{
+    if (!nChannel || nChannel > aConvList.size())
+    {
+        return ERRCODE_BASIC_DDE_NO_CHANNEL;
+    }
+
+    DdeConnection* pConv = aConvList[nChannel-1].get();
+
+    if( !pConv )
+    {
+        return ERRCODE_BASIC_DDE_NO_CHANNEL;
+    }
+    DdeExecute aRequest( *pConv, rCommand, 30000 );
+    aRequest.Execute();
+    return GetLastErr( pConv );
+}
+
+ErrCode SbiDdeControl::Poke( size_t nChannel, const OUString& rItem, const OUString& rData )
+{
+    if (!nChannel || nChannel > aConvList.size())
+    {
+        return ERRCODE_BASIC_DDE_NO_CHANNEL;
+    }
+    DdeConnection* pConv = aConvList[nChannel-1].get();
+
+    if( !pConv )
+    {
+        return ERRCODE_BASIC_DDE_NO_CHANNEL;
+    }
+    DdePoke aRequest( *pConv, rItem, DdeData(rData), 30000 );
+    aRequest.Execute();
+    return GetLastErr( pConv );
+}
+
+
+/* vim:set shiftwidth=4 softtabstop=4 expandtab: */