dll/win32/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 #include <stdarg.h>
  20 #include <stdio.h>
  21
  22 #define COBJMACROS
  23
  24 #include "windef.h"
  25 #include "winbase.h"
  26 #include "winerror.h"
  27 #include "winuser.h"
  28 #include "wine/atlbase.h"
  29
  30 #include "wine/debug.h"
  31 #include "wine/unicode.h"
  32
  33 WINE_DEFAULT_DEBUG_CHANNEL(atl);
  34
  35 /***********************************************************************
  36  *           AtlRegisterTypeLib         [atl80.18]
  37  */
  38 HRESULT WINAPI AtlComModuleRegisterServer(_ATL_COM_MODULE *mod, BOOL bRegTypeLib, const CLSID *clsid)
  39 {
  40     const struct _ATL_CATMAP_ENTRY *catmap;
  41     _ATL_OBJMAP_ENTRY **iter;
  42     HRESULT hres;
  43
  44     TRACE("(%p %x %s)\n", mod, bRegTypeLib, debugstr_guid(clsid));
  45
  46     for(iter = mod->m_ppAutoObjMapFirst; iter < mod->m_ppAutoObjMapLast; iter++) {
  47         if(!*iter || (clsid && !IsEqualCLSID((*iter)->pclsid, clsid)))
  48             continue;
  49
  50         TRACE("Registering clsid %s\n", debugstr_guid((*iter)->pclsid));
  51         hres = (*iter)->pfnUpdateRegistry(TRUE);
  52         if(FAILED(hres))
  53             return hres;
  54
  55         catmap = (*iter)->pfnGetCategoryMap();
  56         if(catmap) {
  57             hres = AtlRegisterClassCategoriesHelper((*iter)->pclsid, catmap, TRUE);
  58             if(FAILED(hres))
  59                 return hres;
  60         }
  61     }
  62
  63     if(bRegTypeLib) {
  64         hres = AtlRegisterTypeLib(mod->m_hInstTypeLib, NULL);
  65         if(FAILED(hres))
  66             return hres;
  67     }
  68
  69     return S_OK;
  70 }