transactd 1.2.0 → 2.0.0

data/source/global/tdclatl/Flags.cpp

@@ -12,8 +12,8 @@
    GNU General Public License for more details.
 
    You should have received a copy of the GNU General Public License
-   along with this program; if not, write to the Free Software 
-   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  
+   along with this program; if not, write to the Free Software
+   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
    02111-1307, USA.
 =================================================================*/
 #include "stdafx.h"
@@ -23,37 +23,53 @@ STDMETHODIMP CFlags::get_Bits(short Index, VARIANT_BOOL* Value)
 {
     switch (Index)
     {
-    case 0: *Value = m_flags.bit0;
+    case 0:
+        *Value = m_flags->bit0;
         break;
-    case 1: *Value = m_flags.bit1;
+    case 1:
+        *Value = m_flags->bit1;
         break;
-    case 2: *Value = m_flags.bit2;
+    case 2:
+        *Value = m_flags->bit2;
         break;
-    case 3: *Value = m_flags.bit3;
+    case 3:
+        *Value = m_flags->bit3;
         break;
-    case 4: *Value = m_flags.bit4;
+    case 4:
+        *Value = m_flags->bit4;
         break;
-    case 5: *Value = m_flags.bit5;
+    case 5:
+        *Value = m_flags->bit5;
         break;
-    case 6: *Value = m_flags.bit6;
+    case 6:
+        *Value = m_flags->bit6;
         break;
-    case 7: *Value = m_flags.bit7;
+    case 7:
+        *Value = m_flags->bit7;
         break;
-    case 8: *Value = m_flags.bit8;
+    case 8:
+        *Value = m_flags->bit8;
         break;
-    case 9: *Value = m_flags.bit9;
+    case 9:
+        *Value = m_flags->bit9;
         break;
-    case 10: *Value = m_flags.bitA;
+    case 10:
+        *Value = m_flags->bitA;
         break;
-    case 11: *Value = m_flags.bitB;
+    case 11:
+        *Value = m_flags->bitB;
         break;
-    case 12: *Value = m_flags.bitC;
+    case 12:
+        *Value = m_flags->bitC;
         break;
-    case 13: *Value = m_flags.bitD;
+    case 13:
+        *Value = m_flags->bitD;
         break;
-    case 14: *Value = m_flags.bitE;
+    case 14:
+        *Value = m_flags->bitE;
         break;
-    case 15: *Value = m_flags.bitF;
+    case 15:
+        *Value = m_flags->bitF;
         break;
     }
     return S_OK;
@@ -63,37 +79,53 @@ STDMETHODIMP CFlags::put_Bits(short Index, VARIANT_BOOL Value)
 {
     switch (Index)
     {
-    case 0: m_flags.bit0 = Value;
+    case 0:
+        m_flags->bit0 = Value;
         break;
-    case 1: m_flags.bit1 = Value;
+    case 1:
+        m_flags->bit1 = Value;
         break;
-    case 2: m_flags.bit2 = Value;
+    case 2:
+        m_flags->bit2 = Value;
         break;
-    case 3: m_flags.bit3 = Value;
+    case 3:
+        m_flags->bit3 = Value;
         break;
-    case 4: m_flags.bit4 = Value;
+    case 4:
+        m_flags->bit4 = Value;
         break;
-    case 5: m_flags.bit5 = Value;
+    case 5:
+        m_flags->bit5 = Value;
         break;
-    case 6: m_flags.bit6 = Value;
+    case 6:
+        m_flags->bit6 = Value;
         break;
-    case 7: m_flags.bit7 = Value;
+    case 7:
+        m_flags->bit7 = Value;
         break;
-    case 8: m_flags.bit8 = Value;
+    case 8:
+        m_flags->bit8 = Value;
         break;
-    case 9: m_flags.bit9 = Value;
+    case 9:
+        m_flags->bit9 = Value;
         break;
-    case 10: m_flags.bitA = Value;
+    case 10:
+        m_flags->bitA = Value;
         break;
-    case 11: m_flags.bitB = Value;
+    case 11:
+        m_flags->bitB = Value;
         break;
-    case 12: m_flags.bitC = Value;
+    case 12:
+        m_flags->bitC = Value;
         break;
-    case 13: m_flags.bitD = Value;
+    case 13:
+        m_flags->bitD = Value;
         break;
-    case 14: m_flags.bitE = Value;
+    case 14:
+        m_flags->bitE = Value;
         break;
-    case 15: m_flags.bitF = Value;
+    case 15:
+        m_flags->bitF = Value;
         break;
     }
 
@@ -102,10 +134,16 @@ STDMETHODIMP CFlags::put_Bits(short Index, VARIANT_BOOL Value)
 
 STDMETHODIMP CFlags::All(unsigned short* Value)
 {
-    *Value = m_flags.all;
+    *Value = m_flags->all;
     return S_OK;
 }
 
-STDMETHODIMP CFlags::SetBit(short Index, VARIANT_BOOL Value) {return put_Bits(Index, Value);}
+STDMETHODIMP CFlags::SetBit(short Index, VARIANT_BOOL Value)
+{
+    return put_Bits(Index, Value);
+}
 
-STDMETHODIMP CFlags::GetBit(short Index, VARIANT_BOOL* Value) {return get_Bits(Index, Value);}
+STDMETHODIMP CFlags::GetBit(short Index, VARIANT_BOOL* Value)
+{
+    return get_Bits(Index, Value);
+}

data/source/global/tdclatl/Flags.h

@@ -13,8 +13,8 @@
    GNU General Public License for more details.
 
    You should have received a copy of the GNU General Public License
-   along with this program; if not, write to the Free Software 
-   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  
+   along with this program; if not, write to the Free Software
+   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
    02111-1307, USA.
 =================================================================*/
 #include "resource.h"
@@ -24,26 +24,28 @@
 
 using namespace ATL;
 
-class ATL_NO_VTABLE CFlags : public CComObjectRootEx<CComSingleThreadModel>, public CComCoClass<CFlags, &CLSID_Flags>,
-    public IDispatchImpl<IFlags, &IID_IFlags, &LIBID_transactd, /* wMajor = */ 1, /* wMinor = */ 0>
+class ATL_NO_VTABLE CFlags
+    : public CComObjectRootEx<CComSingleThreadModel>,
+      public CComCoClass<CFlags, &CLSID_Flags>,
+      public IDispatchImpl<IFlags, &IID_IFlags, &LIBID_transactd,
+                           /* wMajor = */ 1, /* wMinor = */ 0>
 {
 public:
     CFlags() {}
-    bzs::db::protocol::tdap::FLAGS m_flags;
+    bzs::db::protocol::tdap::FLAGS* m_flags;
 
-    BEGIN_COM_MAP(CFlags) 
-		COM_INTERFACE_ENTRY(IFlags) 
-		COM_INTERFACE_ENTRY(IDispatch) 
-	END_COM_MAP()
+    BEGIN_COM_MAP(CFlags)
+    COM_INTERFACE_ENTRY(IFlags)
+    COM_INTERFACE_ENTRY(IDispatch)
+    END_COM_MAP()
 
     DECLARE_PROTECT_FINAL_CONSTRUCT()
 
-    HRESULT FinalConstruct() {return S_OK;}
+    HRESULT FinalConstruct() { return S_OK; }
 
     void FinalRelease() {}
 
 public:
-
     STDMETHOD(get_Bits)(short Index, VARIANT_BOOL* Value);
     STDMETHOD(put_Bits)(short Index, VARIANT_BOOL Value);
 
@@ -51,5 +53,4 @@ public:
 
     STDMETHOD(GetBit)(short Index, VARIANT_BOOL* Value);
     STDMETHOD(SetBit)(short Index, VARIANT_BOOL Value);
-
 };

data/source/global/tdclatl/GroupQuery.cpp

@@ -0,0 +1,119 @@
+/*=================================================================
+   Copyright (C) 2014 BizStation Corp All rights reserved.
+
+   This program is free software; you can redistribute it and/or
+   modify it under the terms of the GNU General Public License
+   as published by the Free Software Foundation; either version 2
+   of the License, or (at your option) any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, write to the Free Software
+   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
+   02111-1307, USA.
+=================================================================*/
+#include "stdafx.h"
+#include "GroupQuery.h"
+#include "QueryBase.h"
+#include "RecordsetQuery.h"
+#include "FieldNames.h"
+
+using namespace bzs::db::protocol::tdap::client;
+
+void CGroupQuery::setResult(IGroupQuery** retVal)
+{
+    this->QueryInterface(IID_IGroupQuery, (void**)retVal);
+}
+
+STDMETHODIMP CGroupQuery::KeyField(BSTR Name0, BSTR Name1, BSTR Name2,
+                                   BSTR Name3, BSTR Name4, BSTR Name5,
+                                   BSTR Name6, BSTR Name7, BSTR Name8,
+                                   BSTR Name9, BSTR Name10,
+                                   IGroupQuery** retVal)
+{
+    if (Name0 && Name0[0])
+    {
+        if (!Name1 || !Name1[0])
+            m_gq.keyField(Name0);
+        else if (!Name2 || !Name2[0])
+            m_gq.keyField(Name0, Name1);
+        else if (!Name3 || !Name3[0])
+            m_gq.keyField(Name0, Name1, Name2);
+        else if (!Name4 || !Name4[0])
+            m_gq.keyField(Name0, Name1, Name2, Name3);
+        else if (!Name5 || !Name5[0])
+            m_gq.keyField(Name0, Name1, Name2, Name3, Name4);
+        else if (!Name6 || !Name6[0])
+            m_gq.keyField(Name0, Name1, Name2, Name3, Name4, Name5);
+        else if (!Name7 || !Name7[0])
+            m_gq.keyField(Name0, Name1, Name2, Name3, Name4, Name5, Name6);
+        else if (!Name8 || !Name8[0])
+            m_gq.keyField(Name0, Name1, Name2, Name3, Name4, Name5, Name6,
+                          Name7);
+        else if (!Name9 || !Name9[0])
+            m_gq.keyField(Name0, Name1, Name2, Name3, Name4, Name5, Name6,
+                          Name7, Name8);
+        else if (!Name10 || !Name10[0])
+            m_gq.keyField(Name0, Name1, Name2, Name3, Name4, Name5, Name6,
+                          Name7, Name8, Name9);
+        else
+            m_gq.keyField(Name0, Name1, Name2, Name3, Name4, Name5, Name6,
+                          Name7, Name8, Name9, Name10);
+    }
+    setResult(retVal);
+    return S_OK;
+}
+
+STDMETHODIMP CGroupQuery::AddFunction(eGroupFunc func, IFieldNames* targetNames,
+                                      BSTR resultName, VARIANT iq,
+                                      IGroupQuery** retVal)
+{
+
+    CFieldNames* fn = dynamic_cast<CFieldNames*>(targetNames);
+    if (!fn)
+        return Error("Invalid targetNames", IID_IGroupQuery);
+
+    boost::shared_ptr<groupFuncBase> f;
+    fieldNames* fns;
+    fns = fn->m_fnsPtr;
+
+    if (func == fsum)
+        f.reset(new sum(*fns, resultName));
+    else if (func == fmin)
+        f.reset(new min(*fns, resultName));
+    else if (func == fmax)
+        f.reset(new max(*fns, resultName));
+    else if (func == favg)
+        f.reset(new avg(*fns, resultName));
+    else if (func == fcount)
+    {
+        if (resultName[0])
+            f.reset(new count(resultName));
+        else
+            f.reset(new count(fns->getValue(0)));
+    }
+    if (iq.vt == VT_DISPATCH)
+    {
+        CRecordsetQuery* q = dynamic_cast<CRecordsetQuery*>(iq.pdispVal);
+        if (q)
+            *f = (q->m_qb);
+    }
+    else
+        f->reset();
+    m_funcs.push_back(f);
+    m_gq.addFunction(f.get());
+
+    setResult(retVal);
+    return S_OK;
+}
+
+STDMETHODIMP CGroupQuery::Reset(IGroupQuery** retVal)
+{
+    m_gq.reset();
+    setResult(retVal);
+    return S_OK;
+}

data/source/global/tdclatl/GroupQuery.h

@@ -0,0 +1,65 @@
+#pragma once
+/*=================================================================
+   Copyright (C) 2014 BizStation Corp All rights reserved.
+
+   This program is free software; you can redistribute it and/or
+   modify it under the terms of the GNU General Public License
+   as published by the Free Software Foundation; either version 2
+   of the License, or (at your option) any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, write to the Free Software
+   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
+   02111-1307, USA.
+=================================================================*/
+#include "resource.h"
+
+#include "tdclatl_i.h"
+#include <bzs/db/protocol/tdap/client/groupQuery.h>
+
+using namespace ATL;
+
+class ATL_NO_VTABLE CGroupQuery
+    : public CComObjectRootEx<CComSingleThreadModel>,
+      public CComCoClass<CGroupQuery, &CLSID_GroupQuery>,
+      public IDispatchImpl<IGroupQuery, &IID_IGroupQuery, &LIBID_transactd,
+                           /* wMajor = */ 1, /* wMinor = */ 0>
+{
+    void setResult(IGroupQuery** retVal);
+    std::vector<boost::shared_ptr<
+        bzs::db::protocol::tdap::client::groupFuncBase> > m_funcs;
+
+public:
+    bzs::db::protocol::tdap::client::groupQuery m_gq;
+    CGroupQuery() {}
+
+    DECLARE_REGISTRY_RESOURCEID(IDR_GROUPQUERY)
+
+    BEGIN_COM_MAP(CGroupQuery)
+    COM_INTERFACE_ENTRY(IGroupQuery)
+    COM_INTERFACE_ENTRY(IDispatch)
+    END_COM_MAP()
+
+    DECLARE_PROTECT_FINAL_CONSTRUCT()
+
+    HRESULT FinalConstruct() { return S_OK; }
+
+    void FinalRelease(){};
+
+public:
+    STDMETHOD(KeyField)(BSTR Name, BSTR Name1, BSTR Name2, BSTR Name3,
+                        BSTR Name4, BSTR Name5, BSTR Name6, BSTR Name7,
+                        BSTR Name8, BSTR Name9, BSTR Name10,
+                        IGroupQuery** retVal);
+    STDMETHOD(AddFunction)(eGroupFunc func, IFieldNames* targetNames,
+                           BSTR resultName, VARIANT q, IGroupQuery** retVal);
+
+    STDMETHOD(Reset)(IGroupQuery** retVal);
+};
+
+OBJECT_ENTRY_AUTO(__uuidof(GroupQuery), CGroupQuery)

data/source/global/tdclatl/KeyDef.cpp

@@ -12,8 +12,8 @@
    GNU General Public License for more details.
 
    You should have received a copy of the GNU General Public License
-   along with this program; if not, write to the Free Software 
-   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  
+   along with this program; if not, write to the Free Software
+   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
    02111-1307, USA.
 =================================================================*/
 #include "stdafx.h"
@@ -34,18 +34,19 @@ STDMETHODIMP CKeyDef::put_SegmentCount(unsigned char Value)
 
 STDMETHODIMP CKeyDef::Segments(short Index, IKeySegment** Value)
 {
-    CComObject<CKeySegment> *piObj;
+    CComObject<CKeySegment>* piObj;
     CComObject<CKeySegment>::CreateInstance(&piObj);
-	if (piObj)
-	{
-		piObj->m_tabledefPtr = m_tabledefPtr;
-		piObj->m_keyIndex = m_index;
-		piObj->m_index = Index;
-		IKeySegment* sg;
-		piObj->QueryInterface(IID_IKeySegment, (void**)&sg);
-		_ASSERTE(sg);
-		*Value = piObj;
-	}else
-		*Value = 0;
+    if (piObj)
+    {
+        piObj->m_tabledefPtr = m_tabledefPtr;
+        piObj->m_keyIndex = m_index;
+        piObj->m_index = Index;
+        IKeySegment* sg;
+        piObj->QueryInterface(IID_IKeySegment, (void**)&sg);
+        _ASSERTE(sg);
+        *Value = piObj;
+    }
+    else
+        *Value = 0;
     return S_OK;
 }

data/source/global/tdclatl/KeyDef.h

@@ -13,8 +13,8 @@
    GNU General Public License for more details.
 
    You should have received a copy of the GNU General Public License
-   along with this program; if not, write to the Free Software 
-   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  
+   along with this program; if not, write to the Free Software
+   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
    02111-1307, USA.
 =================================================================*/
 #include "resource.h"
@@ -24,32 +24,35 @@
 #include <bzs/db/protocol/tdap/client/dbDef.h>
 using namespace ATL;
 
-class ATL_NO_VTABLE CKeyDef : public CComObjectRootEx<CComSingleThreadModel>,
-    public CComCoClass<CKeyDef, &CLSID_KeyDef>,
-    public IDispatchImpl<IKeyDef, &IID_IKeyDef, &LIBID_transactd, /* wMajor = */ 1, /* wMinor = */ 0>
+class ATL_NO_VTABLE CKeyDef
+    : public CComObjectRootEx<CComSingleThreadModel>,
+      public CComCoClass<CKeyDef, &CLSID_KeyDef>,
+      public IDispatchImpl<IKeyDef, &IID_IKeyDef, &LIBID_transactd,
+                           /* wMajor = */ 1, /* wMinor = */ 0>
 {
-	bzs::db::protocol::tdap::keydef* keydef(){return &(*m_tabledefPtr)->keyDefs[m_index];}
+    bzs::db::protocol::tdap::keydef* keydef()
+    {
+        return &(*m_tabledefPtr)->keyDefs[m_index];
+    }
+
 public:
-    CKeyDef():m_tabledefPtr(NULL)  {}
-	bzs::db::protocol::tdap::tabledef** m_tabledefPtr;
-	short m_index;
+    CKeyDef() : m_tabledefPtr(NULL) {}
+    bzs::db::protocol::tdap::tabledef** m_tabledefPtr;
+    short m_index;
 
-    BEGIN_COM_MAP(CKeyDef) 
-		COM_INTERFACE_ENTRY(IKeyDef) 
-		COM_INTERFACE_ENTRY(IDispatch) 
-	END_COM_MAP()
+    BEGIN_COM_MAP(CKeyDef)
+    COM_INTERFACE_ENTRY(IKeyDef)
+    COM_INTERFACE_ENTRY(IDispatch)
+    END_COM_MAP()
 
     DECLARE_PROTECT_FINAL_CONSTRUCT()
 
-    HRESULT FinalConstruct() {return S_OK;}
+    HRESULT FinalConstruct() { return S_OK; }
 
     void FinalRelease() {}
 
 public:
-	
-
     STDMETHOD(get_SegmentCount)(unsigned char* Value);
     STDMETHOD(Segments)(short Index, IKeySegment** Value);
     STDMETHOD(put_SegmentCount)(unsigned char Value);
-
 };

data/source/global/tdclatl/KeySegment.cpp

@@ -12,8 +12,8 @@
    GNU General Public License for more details.
 
    You should have received a copy of the GNU General Public License
-   along with this program; if not, write to the Free Software 
-   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  
+   along with this program; if not, write to the Free Software
+   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
    02111-1307, USA.
 =================================================================*/
 #include "stdafx.h"
@@ -28,17 +28,18 @@ STDMETHODIMP CKeySegment::get_FieldNum(unsigned char* Value)
 
 STDMETHODIMP CKeySegment::get_Flags(IFlags** Value)
 {
-    CComObject<CFlags> *piObj;
+    CComObject<CFlags>* piObj;
     CComObject<CFlags>::CreateInstance(&piObj);
-	if (piObj)
-	{
-		piObj->m_flags = segment()->flags;
-		IFlags* fl;
-		piObj->QueryInterface(IID_IFlags, (void**)&fl);
-		_ASSERTE(fl);
-		*Value = piObj;
-	}else
-		*Value = 0;
+    if (piObj)
+    {
+        piObj->m_flags = &(segment()->flags);
+        IFlags* fl;
+        piObj->QueryInterface(IID_IFlags, (void**)&fl);
+        _ASSERTE(fl);
+        *Value = piObj;
+    }
+    else
+        *Value = 0;
     return S_OK;
 }