winemac: Implement the Mac "Window" menu.
[wine] / dlls / atl80 / atl80.c
1 /*
2  * Copyright 2012 Stefan Leichter
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 #define COBJMACROS
20
21 #include "atlbase.h"
22
23 #include "wine/debug.h"
24 #include "wine/unicode.h"
25
26 WINE_DEFAULT_DEBUG_CHANNEL(atl);
27
28 /***********************************************************************
29  *           AtlRegisterTypeLib         [atl80.18]
30  */
31 HRESULT WINAPI AtlComModuleRegisterServer(_ATL_COM_MODULE *mod, BOOL bRegTypeLib, const CLSID *clsid)
32 {
33     const struct _ATL_CATMAP_ENTRY *catmap;
34     _ATL_OBJMAP_ENTRY **iter;
35     HRESULT hres;
36
37     TRACE("(%p %x %s)\n", mod, bRegTypeLib, debugstr_guid(clsid));
38
39     for(iter = mod->m_ppAutoObjMapFirst; iter < mod->m_ppAutoObjMapLast; iter++) {
40         if(!*iter || (clsid && !IsEqualCLSID((*iter)->pclsid, clsid)))
41             continue;
42
43         TRACE("Registering clsid %s\n", debugstr_guid((*iter)->pclsid));
44         hres = (*iter)->pfnUpdateRegistry(TRUE);
45         if(FAILED(hres))
46             return hres;
47
48         catmap = (*iter)->pfnGetCategoryMap();
49         if(catmap) {
50             hres = AtlRegisterClassCategoriesHelper((*iter)->pclsid, catmap, TRUE);
51             if(FAILED(hres))
52                 return hres;
53         }
54     }
55
56     if(bRegTypeLib) {
57         hres = AtlRegisterTypeLib(mod->m_hInstTypeLib, NULL);
58         if(FAILED(hres))
59             return hres;
60     }
61
62     return S_OK;
63 }
64
65 /***********************************************************************
66  *           AtlRegisterTypeLib         [atl80.19]
67  */
68 HRESULT WINAPI AtlRegisterTypeLib(HINSTANCE inst, const WCHAR *index)
69 {
70     ITypeLib *typelib;
71     BSTR path;
72     HRESULT hres;
73
74     TRACE("(%p %s)\n", inst, debugstr_w(index));
75
76     hres = AtlLoadTypeLib(inst, index, &path, &typelib);
77     if(FAILED(hres))
78         return hres;
79
80     hres = RegisterTypeLib(typelib, path, NULL); /* FIXME: pass help directory */
81     ITypeLib_Release(typelib);
82     SysFreeString(path);
83     return hres;
84 }
85
86 /***********************************************************************
87  *           AtlGetVersion              [atl80.@]
88  */
89 DWORD WINAPI AtlGetVersion(void *pReserved)
90 {
91    return _ATL_VER;
92 }