| 1 | /** | 
 
 
 
 
 | 2 | * This file has no copyright assigned and is placed in the Public Domain. | 
 
 
 
 
 | 3 | * This file is part of the mingw-w64 runtime package. | 
 
 
 
 
 | 4 | * No warranty is given; refer to the file DISCLAIMER.PD within this package. | 
 
 
 
 
 | 5 | */ | 
 
 
 
 
 | 6 | #ifndef _MSPCOLL_H_ | 
 
 
 
 
 | 7 | #define _MSPCOLL_H_ | 
 
 
 
 
 | 8 |  | 
 
 
 
 
 | 9 | template <class T> class CTapiIfCollection : public IDispatchImpl<ITCollection,&IID_ITCollection,&LIBID_TAPI3Lib>,public CComObjectRootEx<CComMultiThreadModelNoCS> | 
 
 
 
 
 | 10 | { | 
 
 
 
 
 | 11 | public: | 
 
 
 
 
 | 12 | typedef CTapiIfCollection<T> _CTapiCollectionBase; | 
 
 
 
 
 | 13 | BEGIN_COM_MAP(_CTapiCollectionBase) | 
 
 
 
 
 | 14 | COM_INTERFACE_ENTRY(IDispatch) | 
 
 
 
 
 | 15 | COM_INTERFACE_ENTRY(ITCollection) | 
 
 
 
 
 | 16 | END_COM_MAP() | 
 
 
 
 
 | 17 | private: | 
 
 
 
 
 | 18 | int m_nSize; | 
 
 
 
 
 | 19 | CComVariant *m_Var; | 
 
 
 
 
 | 20 |  | 
 
 
 
 
 | 21 | public: | 
 
 
 
 
 | 22 | CTapiIfCollection(void) : m_nSize(0),m_Var(NULL) { } | 
 
 
 
 
 | 23 | HRESULT WINAPI Initialize(DWORD dwSize,T *pBegin,T *pEnd) { | 
 
 
 
 
 | 24 | int i; | 
 
 
 
 
 | 25 | HRESULT hr; | 
 
 
 
 
 | 26 | T *iter; | 
 
 
 
 
 | 27 | LOG((MSP_TRACE,"CTapiCollection::Initialize - enter")); | 
 
 
 
 
 | 28 | m_nSize = dwSize; | 
 
 
 
 
 | 29 | m_Var = new CComVariant[m_nSize]; | 
 
 
 
 
 | 30 | if(!m_Var) return E_OUTOFMEMORY; | 
 
 
 
 
 | 31 | i = 0; | 
 
 
 
 
 | 32 | for(iter = pBegin;iter!=pEnd;iter++) { | 
 
 
 
 
 | 33 | IDispatch *pDisp = NULL; | 
 
 
 
 
 | 34 | hr = (*iter)->QueryInterface(IID_IDispatch,(void**)&pDisp); | 
 
 
 
 
 | 35 | if(hr!=S_OK) return hr; | 
 
 
 
 
 | 36 | CComVariant& var = m_Var[i]; | 
 
 
 
 
 | 37 | VariantInit(&var); | 
 
 
 
 
 | 38 | var.vt = VT_DISPATCH; | 
 
 
 
 
 | 39 | var.pdispVal = pDisp; | 
 
 
 
 
 | 40 | i++; | 
 
 
 
 
 | 41 | } | 
 
 
 
 
 | 42 | LOG((MSP_TRACE,"CTapiCollection::Initialize - exit")); | 
 
 
 
 
 | 43 | return S_OK; | 
 
 
 
 
 | 44 | } | 
 
 
 
 
 | 45 | void FinalRelease() { | 
 
 
 
 
 | 46 | LOG((MSP_TRACE,"CTapiCollection::FinalRelease - enter")); | 
 
 
 
 
 | 47 | delete [] m_Var; | 
 
 
 
 
 | 48 | LOG((MSP_TRACE,"CTapiCollection::FinalRelease - exit")); | 
 
 
 
 
 | 49 | } | 
 
 
 
 
 | 50 | STDMETHOD(get_Count)(__LONG32 *retval) { | 
 
 
 
 
 | 51 | HRESULT hr = S_OK; | 
 
 
 
 
 | 52 | LOG((MSP_TRACE,"CTapiCollection::get_Count - enter")); | 
 
 
 
 
 | 53 | try { | 
 
 
 
 
 | 54 | *retval = m_nSize; | 
 
 
 
 
 | 55 | } catch(...) { | 
 
 
 
 
 | 56 | hr = E_INVALIDARG; | 
 
 
 
 
 | 57 | } | 
 
 
 
 
 | 58 | LOG((MSP_TRACE,"CTapiCollection::get_Count - exit")); | 
 
 
 
 
 | 59 | return hr; | 
 
 
 
 
 | 60 | } | 
 
 
 
 
 | 61 | STDMETHOD(get_Item)(__LONG32 Index,VARIANT *retval) { | 
 
 
 
 
 | 62 | HRESULT hr = S_OK; | 
 
 
 
 
 | 63 | LOG((MSP_TRACE,"CTapiCollection::get_Item - enter")); | 
 
 
 
 
 | 64 | if(!retval) return E_POINTER; | 
 
 
 
 
 | 65 | try { | 
 
 
 
 
 | 66 | VariantInit(retval); | 
 
 
 
 
 | 67 | } catch(...) { | 
 
 
 
 
 | 68 | hr = E_INVALIDARG; | 
 
 
 
 
 | 69 | } | 
 
 
 
 
 | 70 | if(hr!=S_OK) return hr; | 
 
 
 
 
 | 71 | retval->vt = VT_UNKNOWN; | 
 
 
 
 
 | 72 | retval->punkVal = NULL; | 
 
 
 
 
 | 73 | if((Index < 1) || (Index > m_nSize)) return E_INVALIDARG; | 
 
 
 
 
 | 74 | hr = VariantCopy(retval,&m_Var[Index-1]); | 
 
 
 
 
 | 75 | if(FAILED(hr)) { | 
 
 
 
 
 | 76 | LOG((MSP_ERROR,"CTapiCollection::get_Item - VariantCopy failed. hr = %lx",hr)); | 
 
 
 
 
 | 77 | return hr; | 
 
 
 
 
 | 78 | } | 
 
 
 
 
 | 79 | LOG((MSP_TRACE,"CTapiCollection::get_Item - exit")); | 
 
 
 
 
 | 80 | return S_OK; | 
 
 
 
 
 | 81 | } | 
 
 
 
 
 | 82 | HRESULT WINAPI get__NewEnum(IUnknown **retval) { | 
 
 
 
 
 | 83 | HRESULT hr; | 
 
 
 
 
 | 84 | LOG((MSP_TRACE,"CTapiCollection::new__Enum - enter")); | 
 
 
 
 
 | 85 | if(!retval) return E_POINTER; | 
 
 
 
 
 | 86 | *retval = NULL; | 
 
 
 
 
 | 87 | typedef CComObject<CSafeComEnum<IEnumVARIANT,&IID_IEnumVARIANT,VARIANT,_Copy<VARIANT> > > enumvar; | 
 
 
 
 
 | 88 | enumvar *p; | 
 
 
 
 
 | 89 | hr = enumvar::CreateInstance(&p); | 
 
 
 
 
 | 90 | if(FAILED(hr)) return hr; | 
 
 
 
 
 | 91 | hr = p->Init(&m_Var[0],&m_Var[m_nSize],NULL,AtlFlagCopy); | 
 
 
 
 
 | 92 | if(SUCCEEDED(hr)) hr = p->QueryInterface(IID_IEnumVARIANT,(void**)retval); | 
 
 
 
 
 | 93 | if(FAILED(hr)) delete p; | 
 
 
 
 
 | 94 | LOG((MSP_TRACE,"CTapiCollection::new__Enum - exit")); | 
 
 
 
 
 | 95 | return hr; | 
 
 
 
 
 | 96 | } | 
 
 
 
 
 | 97 | }; | 
 
 
 
 
 | 98 |  | 
 
 
 
 
 | 99 | class CTapiBstrCollection : public CComObjectRootEx<CComMultiThreadModelNoCS>,public IDispatchImpl<ITCollection,&IID_ITCollection,&LIBID_TAPI3Lib>,public CMSPObjectSafetyImpl | 
 
 
 
 
 | 100 | { | 
 
 
 
 
 | 101 | public: | 
 
 
 
 
 | 102 | BEGIN_COM_MAP(CTapiBstrCollection) | 
 
 
 
 
 | 103 | COM_INTERFACE_ENTRY(IDispatch) | 
 
 
 
 
 | 104 | COM_INTERFACE_ENTRY(ITCollection) | 
 
 
 
 
 | 105 | COM_INTERFACE_ENTRY(IObjectSafety) | 
 
 
 
 
 | 106 | END_COM_MAP() | 
 
 
 
 
 | 107 | private: | 
 
 
 
 
 | 108 | DWORD m_dwSize; | 
 
 
 
 
 | 109 | CComVariant *m_Var; | 
 
 
 
 
 | 110 | public: | 
 
 
 
 
 | 111 | CTapiBstrCollection(void) : m_dwSize(0),m_Var(NULL) { } | 
 
 
 
 
 | 112 | HRESULT WINAPI Initialize(DWORD dwSize,BSTR *pBegin,BSTR *pEnd) { | 
 
 
 
 
 | 113 | BSTR *i; | 
 
 
 
 
 | 114 | DWORD dw = 0; | 
 
 
 
 
 | 115 | LOG((MSP_TRACE,"CTapiBstrCollection::Initialize - enter")); | 
 
 
 
 
 | 116 | m_dwSize = dwSize; | 
 
 
 
 
 | 117 | m_Var = new CComVariant[m_dwSize]; | 
 
 
 
 
 | 118 | if(!m_Var) return E_OUTOFMEMORY; | 
 
 
 
 
 | 119 | for(i = pBegin;i!=pEnd;i++) { | 
 
 
 
 
 | 120 | CComVariant& var = m_Var[dw]; | 
 
 
 
 
 | 121 | var.vt = VT_BSTR; | 
 
 
 
 
 | 122 | var.bstrVal = *i; | 
 
 
 
 
 | 123 | dw++; | 
 
 
 
 
 | 124 | } | 
 
 
 
 
 | 125 | LOG((MSP_TRACE,"CTapiBstrCollection::Initialize - exit")); | 
 
 
 
 
 | 126 | return S_OK; | 
 
 
 
 
 | 127 | } | 
 
 
 
 
 | 128 | STDMETHOD(get_Count)(__LONG32 *retval) { | 
 
 
 
 
 | 129 | HRESULT hr = S_OK; | 
 
 
 
 
 | 130 | LOG((MSP_TRACE,"CTapiBstrCollection::get_Count - enter")); | 
 
 
 
 
 | 131 | try { | 
 
 
 
 
 | 132 | *retval = m_dwSize; | 
 
 
 
 
 | 133 | } catch(...) { | 
 
 
 
 
 | 134 | hr = E_INVALIDARG; | 
 
 
 
 
 | 135 | } | 
 
 
 
 
 | 136 | LOG((MSP_TRACE,"CTapiBstrCollection::get_Count - exit")); | 
 
 
 
 
 | 137 | return hr; | 
 
 
 
 
 | 138 | } | 
 
 
 
 
 | 139 | STDMETHOD(get_Item)(__LONG32 Index,VARIANT *retval) { | 
 
 
 
 
 | 140 | HRESULT hr = S_OK; | 
 
 
 
 
 | 141 | LOG((MSP_TRACE,"CTapiBstrCollection::get_Item - enter")); | 
 
 
 
 
 | 142 | if(!retval) return E_POINTER; | 
 
 
 
 
 | 143 | try { | 
 
 
 
 
 | 144 | VariantInit(retval); | 
 
 
 
 
 | 145 | } catch(...) { | 
 
 
 
 
 | 146 | hr = E_INVALIDARG; | 
 
 
 
 
 | 147 | } | 
 
 
 
 
 | 148 | if(hr!=S_OK) return hr; | 
 
 
 
 
 | 149 | retval->vt = VT_BSTR; | 
 
 
 
 
 | 150 | retval->bstrVal = NULL; | 
 
 
 
 
 | 151 | if((Index < 1) || ((DWORD) Index > m_dwSize)) return E_INVALIDARG; | 
 
 
 
 
 | 152 | hr = VariantCopy(retval,&m_Var[Index-1]); | 
 
 
 
 
 | 153 | if(FAILED(hr)) { | 
 
 
 
 
 | 154 | LOG((MSP_ERROR,"CTapiBstrCollection::get_Item - VariantCopy failed. hr = %lx",hr)); | 
 
 
 
 
 | 155 | return hr; | 
 
 
 
 
 | 156 | } | 
 
 
 
 
 | 157 | LOG((MSP_TRACE,"CTapiBstrCollection::get_Item - exit")); | 
 
 
 
 
 | 158 | return S_OK; | 
 
 
 
 
 | 159 | } | 
 
 
 
 
 | 160 | HRESULT WINAPI get__NewEnum(IUnknown **retval) { | 
 
 
 
 
 | 161 | HRESULT hr; | 
 
 
 
 
 | 162 | LOG((MSP_TRACE,"CTapiBstrCollection::get__NumEnum - enter")); | 
 
 
 
 
 | 163 | if(!retval) return E_POINTER; | 
 
 
 
 
 | 164 | *retval = NULL; | 
 
 
 
 
 | 165 | typedef CComObject<CSafeComEnum<IEnumVARIANT,&IID_IEnumVARIANT,VARIANT,_Copy<VARIANT> > > enumvar; | 
 
 
 
 
 | 166 | enumvar *p = new enumvar; | 
 
 
 
 
 | 167 | if(!p) return E_OUTOFMEMORY; | 
 
 
 
 
 | 168 | hr = p->Init(&m_Var[0],&m_Var[m_dwSize],NULL,AtlFlagCopy); | 
 
 
 
 
 | 169 | if(SUCCEEDED(hr)) { | 
 
 
 
 
 | 170 | hr = p->QueryInterface(IID_IEnumVARIANT,(void**)retval); | 
 
 
 
 
 | 171 | } | 
 
 
 
 
 | 172 | if(FAILED(hr)) delete p; | 
 
 
 
 
 | 173 | LOG((MSP_TRACE,"CTapiBstrCollection::get__NewEnum - exit")); | 
 
 
 
 
 | 174 | return hr; | 
 
 
 
 
 | 175 | } | 
 
 
 
 
 | 176 | void FinalRelease() { | 
 
 
 
 
 | 177 | LOG((MSP_TRACE,"CTapiBstrCollection::FinalRelease() - enter")); | 
 
 
 
 
 | 178 | delete [] m_Var; | 
 
 
 
 
 | 179 | LOG((MSP_TRACE,"CTapiBstrCollection::FinalRelease() - exit")); | 
 
 
 
 
 | 180 | } | 
 
 
 
 
 | 181 | }; | 
 
 
 
 
 | 182 | #endif |