msvcrt: Implemented _ltoa_s.
[wine] / dlls / windowscodecs / propertybag.c
1 /*
2  * Copyright 2009 Vincent Povirk for CodeWeavers
3  *
4  * This library is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU Lesser General Public
6  * License as published by the Free Software Foundation; either
7  * version 2.1 of the License, or (at your option) any later version.
8  *
9  * This library is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12  * Lesser General Public License for more details.
13  *
14  * You should have received a copy of the GNU Lesser General Public
15  * License along with this library; if not, write to the Free Software
16  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
17  */
18
19 #include "config.h"
20
21 #include <stdarg.h>
22
23 #define COBJMACROS
24
25 #include "windef.h"
26 #include "winbase.h"
27 #include "objbase.h"
28 #include "wincodec.h"
29
30 #include "wincodecs_private.h"
31
32 #include "wine/debug.h"
33
34 WINE_DEFAULT_DEBUG_CHANNEL(wincodecs);
35
36 typedef struct PropertyBag {
37     const IPropertyBag2Vtbl *lpVtbl;
38     LONG ref;
39 } PropertyBag;
40
41 static HRESULT WINAPI PropertyBag_QueryInterface(IPropertyBag2 *iface, REFIID iid,
42     void **ppv)
43 {
44     PropertyBag *This = (PropertyBag*)iface;
45     TRACE("(%p,%s,%p)\n", iface, debugstr_guid(iid), ppv);
46
47     if (!ppv) return E_INVALIDARG;
48
49     if (IsEqualIID(&IID_IUnknown, iid) ||
50         IsEqualIID(&IID_IPropertyBag2, iid))
51     {
52         *ppv = This;
53     }
54     else
55     {
56         *ppv = NULL;
57         return E_NOINTERFACE;
58     }
59
60     IUnknown_AddRef((IUnknown*)*ppv);
61     return S_OK;
62 }
63
64 static ULONG WINAPI PropertyBag_AddRef(IPropertyBag2 *iface)
65 {
66     PropertyBag *This = (PropertyBag*)iface;
67     ULONG ref = InterlockedIncrement(&This->ref);
68
69     TRACE("(%p) refcount=%u\n", iface, ref);
70
71     return ref;
72 }
73
74 static ULONG WINAPI PropertyBag_Release(IPropertyBag2 *iface)
75 {
76     PropertyBag *This = (PropertyBag*)iface;
77     ULONG ref = InterlockedDecrement(&This->ref);
78
79     TRACE("(%p) refcount=%u\n", iface, ref);
80
81     if (ref == 0)
82     {
83         HeapFree(GetProcessHeap(), 0, This);
84     }
85
86     return ref;
87 }
88
89 static HRESULT WINAPI PropertyBag_Read(IPropertyBag2 *iface, ULONG cProperties,
90     PROPBAG2 *pPropBag, IErrorLog *pErrLog, VARIANT *pvarValue, HRESULT *phrError)
91 {
92     FIXME("(%p,%u,%p,%p,%p,%p): stub\n", iface, cProperties, pPropBag, pErrLog, pvarValue, phrError);
93     return E_NOTIMPL;
94 }
95
96 static HRESULT WINAPI PropertyBag_Write(IPropertyBag2 *iface, ULONG cProperties,
97     PROPBAG2 *pPropBag, VARIANT *pvarValue)
98 {
99     FIXME("(%p,%u,%p,%p): stub\n", iface, cProperties, pPropBag, pvarValue);
100     return E_NOTIMPL;
101 }
102
103 static HRESULT WINAPI PropertyBag_CountProperties(IPropertyBag2 *iface, ULONG *pcProperties)
104 {
105     FIXME("(%p,%p): stub\n", iface, pcProperties);
106     return E_NOTIMPL;
107 }
108
109 static HRESULT WINAPI PropertyBag_GetPropertyInfo(IPropertyBag2 *iface, ULONG iProperty,
110     ULONG cProperties, PROPBAG2 *pPropBag, ULONG *pcProperties)
111 {
112     FIXME("(%p,%u,%u,%p,%p): stub\n", iface, iProperty, cProperties, pPropBag, pcProperties);
113     return E_NOTIMPL;
114 }
115
116 static HRESULT WINAPI PropertyBag_LoadObject(IPropertyBag2 *iface, LPCOLESTR pstrName,
117     DWORD dwHint, IUnknown *pUnkObject, IErrorLog *pErrLog)
118 {
119     FIXME("(%p,%s,%u,%p,%p): stub\n", iface, debugstr_w(pstrName), dwHint, pUnkObject, pErrLog);
120     return E_NOTIMPL;
121 }
122
123 static const IPropertyBag2Vtbl PropertyBag_Vtbl = {
124     PropertyBag_QueryInterface,
125     PropertyBag_AddRef,
126     PropertyBag_Release,
127     PropertyBag_Read,
128     PropertyBag_Write,
129     PropertyBag_CountProperties,
130     PropertyBag_GetPropertyInfo,
131     PropertyBag_LoadObject
132 };
133
134 extern HRESULT CreatePropertyBag2(IPropertyBag2 **ppPropertyBag2)
135 {
136     PropertyBag *This;
137
138     This = HeapAlloc(GetProcessHeap(), 0, sizeof(PropertyBag));
139     if (!This) return E_OUTOFMEMORY;
140
141     This->lpVtbl = &PropertyBag_Vtbl;
142     This->ref = 1;
143
144     *ppPropertyBag2 = (IPropertyBag2*)This;
145
146     return S_OK;
147 }