dlls/qcap/dllsetup.c

   1 /*
   2  * DirectX DLL registration and unregistration
   3  *
   4  * Copyright (C) 2005 Rolf Kalbermatter
   5 *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20 #include "config.h"
  21
  22 #include <stdarg.h>
  23 #include <assert.h>
  24
  25 #define COBJMACROS
  26 #define NONAMELESSSTRUCT
  27 #define NONAMELESSUNION
  28
  29 #include "windef.h"
  30 #include "winbase.h"
  31 #include "winerror.h"
  32 #include "winreg.h"
  33 #include "objbase.h"
  34 #include "uuids.h"
  35
  36 #include "dllsetup.h"
  37
  38 #include "wine/unicode.h"
  39 #include "wine/debug.h"
  40
  41 WINE_DEFAULT_DEBUG_CHANNEL(qcap);
  42
  43 /*
  44  * defines and constants
  45  */
  46 #define MAX_KEY_LEN  260
  47
  48 static WCHAR const clsid_keyname[6] =
  49 {'C','L','S','I','D',0 };
  50 static WCHAR const ips32_keyname[15] =
  51 {'I','n','P','r','o','c','S','e','r','v','e','r','3','2',0};
  52 static WCHAR const tmodel_keyname[15] =
  53 {'T','h','r','e','a','d','i','n','g','M','o','d','e','l',0};
  54 static WCHAR const tmodel_both[] =
  55 {'B','o','t','h',0};
  56
  57 /*
  58  * Delete a key and all its subkeys
  59  */
  60 HRESULT DeleteEntireSubKey(HKEY hkey, LPWSTR strSubKey)
  61 {
  62     WCHAR buffer[MAX_KEY_LEN];
  63     DWORD dw = MAX_KEY_LEN;
  64     FILETIME ft;
  65     HKEY hk;
  66     LONG ret = RegOpenKeyExW(hkey, strSubKey, 0, MAXIMUM_ALLOWED, &hk);
  67
  68     if (ERROR_SUCCESS == ret)
  69     {
  70         /* Keep on enumerating the first key and deleting that */
  71         for( ; ; )
  72         {
  73             dw = MAX_KEY_LEN;
  74
  75             ret = RegEnumKeyExW(hk, 0, buffer, &dw, NULL, NULL, NULL, &ft);
  76
  77             if (ERROR_SUCCESS == ret)
  78                 DeleteEntireSubKey(hk, buffer);
  79             else
  80                 break;
  81         }
  82         RegCloseKey(hk);
  83         RegDeleteKeyW(hkey, strSubKey);
  84     }
  85     return NOERROR;
  86 }
  87
  88 /*
  89  * SetupRegisterClass()
  90  */
  91 static HRESULT SetupRegisterClass(HKEY clsid, LPCWSTR szCLSID,
  92                                   LPCWSTR szDescription,
  93                                   LPCWSTR szFileName,
  94                                   LPCWSTR szServerType,
  95                                   LPCWSTR szThreadingModel)
  96 {
  97     HKEY hkey, hsubkey;
  98     LONG ret = RegCreateKeyW(clsid, szCLSID, &hkey);
  99     if (ERROR_SUCCESS != ret)
 100         return HRESULT_FROM_WIN32(ret);
 101
 102     /* set description string */
 103     ret = RegSetValueW(hkey, NULL, REG_SZ, szDescription,
 104                        sizeof(WCHAR) * (lstrlenW(szDescription) + 1));
 105     if (ERROR_SUCCESS != ret)
 106         goto err_out;
 107
 108     /* create CLSID\\{"CLSID"}\\"ServerType" key, using key to CLSID\\{"CLSID"}
 109        passed back by last call to RegCreateKeyW(). */
 110     ret = RegCreateKeyW(hkey,  szServerType, &hsubkey);
 111     if (ERROR_SUCCESS != ret)
 112         goto err_out;
 113
 114     /* set server path */
 115     ret = RegSetValueW(hsubkey, NULL, REG_SZ, szFileName,
 116                        sizeof(WCHAR) * (lstrlenW(szFileName) + 1));
 117     if (ERROR_SUCCESS != ret)
 118         goto err_out;
 119
 120     /* set threading model */
 121     ret = RegSetValueExW(hsubkey, tmodel_keyname, 0L, REG_SZ,
 122                          (const BYTE*)szThreadingModel,
 123                          sizeof(WCHAR) * (lstrlenW(szThreadingModel) + 1));
 124 err_out:
 125     if (hsubkey)
 126         RegCloseKey(hsubkey);
 127     RegCloseKey(hkey);
 128     return HRESULT_FROM_WIN32(ret);
 129 }
 130
 131 /*
 132  * SetupRegisterFilter through IFilterMapper2
 133  */
 134 static HRESULT SetupRegisterFilter2(const AMOVIESETUP_FILTER * const pSetup,
 135                                     IFilterMapper2 * pIFM2, BOOL bRegister)
 136 {
 137     HRESULT hr;
 138
 139     if (NULL == pSetup)
 140         return S_FALSE;
 141
 142     /* unregister filter */
 143     hr = IFilterMapper2_UnregisterFilter(pIFM2, 0, 0, pSetup->clsID);
 144
 145     if (bRegister)
 146     {
 147         REGFILTER2 rf2;
 148         rf2.dwVersion = 1;
 149         rf2.dwMerit = pSetup->dwMerit;
 150         rf2.u.s.cPins = pSetup->nPins;
 151         rf2.u.s.rgPins = pSetup->lpPin;
 152
 153         /* register filter */
 154         hr = IFilterMapper2_RegisterFilter(pIFM2, pSetup->clsID,
 155                                            pSetup->strName, 0, 0, NULL, &rf2);
 156     }
 157     else
 158     {
 159         /* filter not found is ignored here,
 160            but there is no #define for 0x80070002  */
 161         if (HRESULT_FROM_WIN32(ERROR_FILE_NOT_FOUND) == hr)
 162             hr = NOERROR;
 163     }
 164     return hr;
 165 }
 166
 167 /*
 168  * SetupRegisterFilter through IFilterMapper
 169  */
 170 static HRESULT SetupRegisterFilter(const AMOVIESETUP_FILTER * const pSetup,
 171                                    IFilterMapper * pIFM, BOOL bRegister)
 172 {
 173     HRESULT hr;
 174
 175     if (NULL == pSetup)
 176         return S_FALSE;
 177
 178     /* unregister filter */
 179     hr = IFilterMapper_UnregisterFilter(pIFM, *pSetup->clsID);
 180
 181     if (bRegister)
 182     {
 183         /* register filter */
 184         hr = IFilterMapper_RegisterFilter(pIFM, *pSetup->clsID,
 185                                           pSetup->strName, pSetup->dwMerit);
 186         if (SUCCEEDED(hr))
 187         {
 188             const AMOVIESETUP_PIN *lpPin = pSetup->lpPin;
 189             const AMOVIESETUP_MEDIATYPE *lpType;
 190             UINT i, j;
 191
 192             for (i = 0; i < pSetup->nPins; i++, lpPin++)
 193             {
 194                 hr = IFilterMapper_RegisterPin(pIFM, *(pSetup->clsID),
 195                                                lpPin->strName,
 196                                                lpPin->bRendered,
 197                                                lpPin->bOutput,
 198                                                lpPin->bZero,
 199                                                lpPin->bMany,
 200                                                *(lpPin->clsConnectsToFilter),
 201                                                lpPin->strConnectsToPin);
 202
 203                 if (SUCCEEDED(hr))
 204                 {
 205                     lpType = lpPin->lpMediaType;
 206
 207                     /* and each pin's media types */
 208                     for (j = 0; j < lpPin->nMediaTypes; j++, lpType++)
 209                     {
 210                         hr = IFilterMapper_RegisterPinType(pIFM, *(pSetup->clsID),
 211                                                            lpPin->strName,
 212                                                            *(lpType->clsMajorType),
 213                                                            *(lpType->clsMinorType));
 214                         if (FAILED(hr)) break;
 215                     }
 216                     if (FAILED(hr)) break;
 217                 }
 218                 if (FAILED(hr)) break;
 219             }
 220         }
 221     }
 222     else
 223     {
 224         /* filter not registered is ignored here, there is no definition for 0x80070002  */
 225         if (HRESULT_FROM_WIN32(ERROR_FILE_NOT_FOUND) == hr)
 226            hr = NOERROR;
 227     }
 228     return hr;
 229 }
 230
 231 /*
 232  * RegisterAllClasses()
 233  */
 234 static HRESULT SetupRegisterAllClasses(const CFactoryTemplate * pList, int num,
 235                                        LPCWSTR szFileName, BOOL bRegister)
 236 {
 237     HRESULT hr = NOERROR;
 238     HKEY hkey;
 239     OLECHAR szCLSID[CHARS_IN_GUID];
 240     LONG i, ret = RegCreateKeyW(HKEY_CLASSES_ROOT, clsid_keyname, &hkey);
 241     if (ERROR_SUCCESS != ret)
 242         return HRESULT_FROM_WIN32(ret);
 243
 244     for (i = 0; i < num; i++, pList++)
 245     {
 246         /* (un)register CLSID and InprocServer32 */
 247         hr = StringFromGUID2(pList->m_ClsID, szCLSID, CHARS_IN_GUID);
 248         if (SUCCEEDED(hr))
 249         {
 250             if (bRegister )
 251                 hr = SetupRegisterClass(hkey, szCLSID,
 252                                         pList->m_Name, szFileName,
 253                                         ips32_keyname, tmodel_both);
 254             else
 255                 hr = DeleteEntireSubKey(hkey, szCLSID);
 256         }
 257     }
 258     RegCloseKey(hkey);
 259     return hr;
 260 }
 261
 262
 263 /****************************************************************************
 264  * SetupRegisterServers
 265  *
 266  * This function is table driven using the static members of the
 267  * CFactoryTemplate class defined in the Dll.
 268  *
 269  * It registers the Dll as the InprocServer32 for all the classes in
 270  * CFactoryTemplate
 271  *
 272  ****************************************************************************/
 273 HRESULT SetupRegisterServers(const CFactoryTemplate * pList, int num,
 274                              HINSTANCE hinst, BOOL bRegister)
 275 {
 276     HRESULT hr = NOERROR;
 277     WCHAR szFileName[MAX_PATH];
 278     IFilterMapper2 *pIFM2 = NULL;
 279     IFilterMapper *pIFM = NULL;
 280
 281     /* Win95 wouldn't support the Unicode version of this API!! */
 282     if (!GetModuleFileNameW(hinst, szFileName, MAX_PATH))
 283         return HRESULT_FROM_WIN32(GetLastError());
 284
 285     /* first register all server classes, just to make sure */
 286     if (bRegister)
 287         hr = SetupRegisterAllClasses(pList, num, szFileName, TRUE );
 288
 289     /* next, register/unregister all filters */
 290     if (SUCCEEDED(hr))
 291     {
 292         hr = CoInitialize(NULL);
 293
 294         TRACE("Getting IFilterMapper2\r\n");
 295         hr = CoCreateInstance(&CLSID_FilterMapper2, NULL, CLSCTX_INPROC_SERVER,
 296                               &IID_IFilterMapper2, (void **)&pIFM2);
 297         if (FAILED(hr))
 298         {
 299             TRACE("- trying IFilterMapper instead\r\n");
 300
 301             hr = CoCreateInstance(&CLSID_FilterMapper, NULL, CLSCTX_INPROC_SERVER,
 302                                   &IID_IFilterMapper, (void **)&pIFM);
 303         }
 304
 305         if (SUCCEEDED(hr))
 306         {
 307             int i;
 308
 309             /* scan through array of CFactoryTemplates registering all filters */
 310             for (i = 0; i < num; i++, pList++)
 311             {
 312                 if (NULL != pList->m_pAMovieSetup_Filter)
 313                 {
 314                     if (pIFM2)
 315                         hr = SetupRegisterFilter2(pList->m_pAMovieSetup_Filter,
 316                                                   pIFM2, bRegister);
 317                     else
 318                         hr = SetupRegisterFilter(pList->m_pAMovieSetup_Filter,
 319                                                  pIFM, bRegister);
 320                 }
 321
 322                 /* check final error for this pass and break loop if we failed */
 323                 if (FAILED(hr))
 324                     break;
 325             }
 326
 327             /* release interface */
 328             if (pIFM2)
 329                 IFilterMapper2_Release(pIFM2);
 330             else
 331                 IFilterMapper_Release(pIFM);
 332         }
 333
 334         /* and clear up */
 335         CoFreeUnusedLibraries();
 336         CoUninitialize();
 337     }
 338
 339     /* if unregistering, unregister all OLE servers */
 340     if (SUCCEEDED(hr) && !bRegister)
 341         hr = SetupRegisterAllClasses(pList, num, szFileName, FALSE);
 342     return hr;
 343 }
 344
 345 /****************************************************************************
 346  * SetupInitializeServers
 347  *
 348  * This function is table driven using the static members of the
 349  * CFactoryTemplate class defined in the Dll.
 350  *
 351  * It calls the intialize function for any class in CFactoryTemplate with
 352  * one defined.
 353  *
 354  ****************************************************************************/
 355 void SetupInitializeServers(const CFactoryTemplate * pList, int num,
 356                             BOOL bLoading)
 357 {
 358     int i;
 359
 360     for (i = 0; i < num; i++, pList++)
 361     {
 362         if (pList->m_lpfnInit)
 363             pList->m_lpfnInit(bLoading, pList->m_ClsID);
 364     }
 365 }