git.oblomov.eu Git - wine/blob - dlls/msxml3/main.c

   1 /*
   2  *    MSXML Class Factory
   3  *
   4  * Copyright 2002 Lionel Ulmer
   5  * Copyright 2005 Mike McCormack
   6  *
   7  * This library is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * This library is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public
  18  * License along with this library; if not, write to the Free Software
  19  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  20  */
  21
  22 #include "config.h"
  23
  24 #include <stdarg.h>
  25 #include "windef.h"
  26 #include "winbase.h"
  27 #include "winuser.h"
  28 #include "winreg.h"
  29 #include "ole2.h"
  30
  31 #include "wine/debug.h"
  32
  33 #include "msxml_private.h"
  34
  35 WINE_DEFAULT_DEBUG_CHANNEL(msxml);
  36
  37 HRESULT WINAPI DllCanUnloadNow(void)
  38 {
  39     FIXME("\n");
  40     return S_FALSE;
  41 }
  42
  43 BOOL WINAPI DllMain(HINSTANCE hInstDLL, DWORD fdwReason, LPVOID lpv)
  44 {
  45     switch(fdwReason)
  46     {
  47     case DLL_PROCESS_ATTACH:
  48 #ifdef HAVE_LIBXML2
  49         xmlInitParser();
  50 #endif
  51         DisableThreadLibraryCalls(hInstDLL);
  52         break;
  53     case DLL_PROCESS_DETACH:
  54 #ifdef HAVE_LIBXML2
  55         xmlCleanupParser();
  56 #endif
  57         break;
  58     }
  59     return TRUE;
  60 }
  61
  62 static HRESULT add_key_val( LPCSTR key, LPCSTR valname, LPCSTR value )
  63 {
  64     HKEY hkey;
  65
  66     if (RegCreateKeyA( HKEY_CLASSES_ROOT, key, &hkey ) != ERROR_SUCCESS) return E_FAIL;
  67     RegSetValueA( hkey, valname, REG_SZ, value, strlen( value ) + 1 );
  68     RegCloseKey( hkey );
  69     return S_OK;
  70 }
  71
  72 HRESULT WINAPI DllRegisterServer(void)
  73 {
  74     LONG r;
  75
  76     r = add_key_val( "CLSID\\{2933BF90-7B36-11D2-B20E-00C04F983E60}",
  77                      NULL,
  78                      "XML DOM Document" );
  79     r = add_key_val( "CLSID\\{2933BF90-7B36-11D2-B20E-00C04F983E60}\\InProcServer32",
  80                      NULL,
  81                      "msxml3.dll" );
  82     return r;
  83 }