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 #include "msxml2.h"
  31
  32 #include "wine/debug.h"
  33
  34 #include "msxml_private.h"
  35
  36 WINE_DEFAULT_DEBUG_CHANNEL(msxml);
  37
  38 HRESULT WINAPI DllCanUnloadNow(void)
  39 {
  40     FIXME("\n");
  41     return S_FALSE;
  42 }
  43
  44 BOOL WINAPI DllMain(HINSTANCE hInstDLL, DWORD fdwReason, LPVOID lpv)
  45 {
  46     switch(fdwReason)
  47     {
  48     case DLL_PROCESS_ATTACH:
  49 #ifdef HAVE_LIBXML2
  50         xmlInitParser();
  51 #endif
  52         DisableThreadLibraryCalls(hInstDLL);
  53         break;
  54     case DLL_PROCESS_DETACH:
  55 #ifdef HAVE_LIBXML2
  56         xmlCleanupParser();
  57 #endif
  58         break;
  59     }
  60     return TRUE;
  61 }
  62
  63 static HRESULT add_key_val( LPCSTR key, LPCSTR valname, LPCSTR value )
  64 {
  65     HKEY hkey;
  66
  67     if (RegCreateKeyA( HKEY_CLASSES_ROOT, key, &hkey ) != ERROR_SUCCESS) return E_FAIL;
  68     RegSetValueA( hkey, valname, REG_SZ, value, strlen( value ) + 1 );
  69     RegCloseKey( hkey );
  70     return S_OK;
  71 }
  72
  73 HRESULT WINAPI DllRegisterServer(void)
  74 {
  75     LONG r;
  76
  77     r = add_key_val( "CLSID\\{2933BF90-7B36-11D2-B20E-00C04F983E60}",
  78                      NULL,
  79                      "XML DOM Document" );
  80     r = add_key_val( "CLSID\\{2933BF90-7B36-11D2-B20E-00C04F983E60}\\InProcServer32",
  81                      NULL,
  82                      "msxml3.dll" );
  83     return r;
  84 }