home *** CD-ROM | disk | FTP | other *** search
/ Tricks of the Windows Gam…ming Gurus (2nd Edition) / Disc2.iso / msdn_vcb / samples / vc98 / sdk / com / tutsamp / dllserve / dllserve.cpp < prev    next >
C/C++ Source or Header  |  1997-08-30  |  24KB  |  739 lines
  1. /*+==========================================================================
  2.   File:      DLLSERVE.CPP
  3.  
  4.   Summary:   Implementation file for a DLL COM Component server providing
  5.              several Car-related COM Components: Car, UtilityCar,
  6.              and CruiseCar.  Access to Class Factories is provided in
  7.              this module for each.  This server also supports self
  8.              registration and unregistration.  A special Utility COM
  9.              Component is also provided: CarSample.  Exposing an ISample
  10.              interface it supports utility operations on the DLL server
  11.              itself (eg, the server can be given a pointer to the Client's
  12.              trace Logging facility and can be told to show the server's
  13.              Aboutbox dialog).
  14.  
  15.              For a comprehensive tutorial code tour of DLLSERVE's
  16.              contents and offerings see the tutorial DLLSERVE.HTM file.
  17.              For more specific technical details on the internal workings
  18.              see the comments dispersed throughout the DLLSERVE source code.
  19.  
  20.   Classes:   none.
  21.  
  22.   Functions: DllMain, DllGetClassObject, DllCanUnloadNow, DllRegisterServer,
  23.              DllUnregisterServer.
  24.  
  25.   Origin:    9-11-95: atrent - Editor-inheritance from COMOBJ.CPP in
  26.                the COMOBJ Tutorial Code Sample.
  27.  
  28. ----------------------------------------------------------------------------
  29.   This file is part of the Microsoft COM Tutorial Code Samples.
  30.  
  31.   Copyright (C) Microsoft Corporation, 1997.  All rights reserved.
  32.  
  33.   This source code is intended only as a supplement to Microsoft
  34.   Development Tools and/or on-line documentation.  See these other
  35.   materials for detailed information regarding Microsoft code samples.
  36.  
  37.   THIS CODE AND INFORMATION IS PROVIDED "AS IS" WITHOUT WARRANTY OF ANY
  38.   KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE
  39.   IMPLIED WARRANTIES OF MERCHANTABILITY AND/OR FITNESS FOR A
  40.   PARTICULAR PURPOSE.
  41. ==========================================================================+*/
  42.  
  43. /*---------------------------------------------------------------------------
  44.   We include WINDOWS.H for all Win32 applications.
  45.   We include OLE2.H because we will be calling the COM/OLE Libraries.
  46.   We include INITGUID.H only once (here) in the entire DLL because we
  47.     will be defining GUIDs and want them as constants in the data segment.
  48.   We include APPUTIL.H because we will be building this DLL using
  49.     the convenient Virtual Window and Dialog classes and other
  50.     utility functions in the APPUTIL Library (ie, APPUTIL.LIB).
  51.   We include ICARS.H and CARGUIDS.H for the common car-related Interface
  52.     class, GUID, and CLSID specifications.
  53.   We include DLLSERVE.H because it has the main declerations of all the
  54.     car related interfaces and their GUIDs.  It also has the _DLLEXPORT_
  55.     controlled import and export specifications.
  56.   We include SERVER.H because it has the necessary internal class and
  57.     resource definitions for this DLL.
  58.   We include FACTORY.H because it has the necessary internal class factory
  59.     declarations for this DLL component server.
  60. ---------------------------------------------------------------------------*/
  61. #include <windows.h>
  62. #include <ole2.h>
  63. #include <initguid.h>
  64. #include <apputil.h>
  65. #include <icars.h>
  66. #include <carguids.h>
  67. #define _DLLEXPORT_
  68. #include "dllserve.h"
  69. #include "server.h"
  70. #include "factory.h"
  71.  
  72.  
  73. // Global variable definitions. Some Initialized in DllMain() below.
  74.  
  75. // We encapsulate the control of this COM server (eg, lock and object
  76. // counting) in a server control C++ object.  Here is it's pointer.
  77. CServer* g_pServer = NULL;
  78.  
  79. // Here is a pointer for use by the global Trace Message logging macros.
  80. // Set by the ISample::Init function call from an outside EXE client.
  81. CMsgLog* g_pMsgLog = NULL;
  82.  
  83.  
  84. /*F+F++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  85.   Function: UnicodeOk
  86.  
  87.   Summary:  Checks if the platform will handle unicode versions of
  88.             Win32 string API calls.
  89.  
  90.   Args:     void
  91.  
  92.   Returns:  BOOL
  93.               TRUE if unicode support; FALSE if not.
  94. ------------------------------------------------------------------------F-F*/
  95. BOOL UnicodeOk(void)
  96. {
  97.   BOOL bOk = TRUE;
  98.   TCHAR szUserName[MAX_STRING_LENGTH];
  99.   DWORD dwSize = MAX_STRING_LENGTH;
  100.  
  101.   if (!GetUserName(szUserName, &dwSize))
  102.     bOk = ERROR_CALL_NOT_IMPLEMENTED == GetLastError() ? FALSE : TRUE;
  103.  
  104.   return bOk;
  105. }
  106.  
  107.  
  108. /*F+F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F
  109.   Function: DllMain
  110.  
  111.   Summary:  Like WinMain is for an EXE application, this DllMain function
  112.             is the main entry point for this DLL.  It is called when the
  113.             DLL is loaded by a process, and when new threads are created
  114.             by a process that has already loaded this DLL.  DllMain is also
  115.             called when threads of a process that has loaded the DLL exit
  116.             cleanly and when the process itself unloads the DLL.
  117.  
  118.             If you want to use C runtime libraries, keep this function
  119.             named "DllMain" and you won't have to do anything special to
  120.             initialize the runtime libraries.
  121.  
  122.             When fdwReason == DLL_PROCESS_ATTACH, the return value is used
  123.             to determine if the DLL should remain loaded, or should be
  124.             immediately unloaded depending upon whether the DLL could be
  125.             initialized properly.  For all other values of fdwReason,
  126.             the return value is ignored.
  127.  
  128.   Args:     HINSTANCE hDLLInst,
  129.               Instance handle of the DLL.
  130.             DWORD fdwReason,
  131.               Process attach/detach or thread attach/detach.
  132.               Reason for calling.
  133.             LPVOID lpvReserved)
  134.               Reserved and not used.
  135.  
  136.   Returns:  BOOL,
  137.               Return value is used only when fdwReason == DLL_PROCESS_ATTACH.
  138.               TRUE  -  Used to signify that the DLL should remain loaded.
  139.               FALSE -  Used to signify that the DLL should be
  140.                 immediately unloaded.
  141. F---F---F---F---F---F---F---F---F---F---F---F---F---F---F---F---F---F---F-F*/
  142. BOOL WINAPI DllMain(
  143.               HINSTANCE hDllInst,
  144.               DWORD fdwReason,
  145.               LPVOID lpvReserved)
  146. {
  147.   BOOL bResult = TRUE;
  148.  
  149.   // Dispatch this main call based on the reason it was called.
  150.   switch (fdwReason)
  151.   {
  152.     case DLL_PROCESS_ATTACH:
  153.       // The DLL is being loaded for the first time by a given process.
  154.       // Perform per-process initialization here.  If the initialization
  155.       // is successful, return TRUE; if unsuccessful, return FALSE.
  156.       bResult = FALSE;
  157.       if (UnicodeOk())
  158.       {
  159.         // Instantiate the CServer utility class.
  160.         g_pServer = new CServer;
  161.         if (NULL != g_pServer)
  162.         {
  163.           // Remember the DLL Instance handle.
  164.           g_pServer->m_hDllInst = hDllInst;
  165.  
  166.           // Create a MsgBox object.
  167.           g_pServer->m_pMsgBox = new CMsgBox;
  168.           if (NULL != g_pServer->m_pMsgBox)
  169.             bResult = TRUE;
  170.         }
  171.       }
  172.       break;
  173.  
  174.     case DLL_PROCESS_DETACH:
  175.       // The DLL is being unloaded by a given process.  Do any
  176.       // per-process clean up here, such as undoing what was done in
  177.       // DLL_PROCESS_ATTACH.  The return value is ignored.
  178.       DELETE_POINTER(g_pServer->m_pMsgBox);
  179.       DELETE_POINTER(g_pServer);
  180.       break;
  181.  
  182.     case DLL_THREAD_ATTACH:
  183.       // A thread is being created in a process that has already loaded
  184.       // this DLL.  Perform any per-thread initialization here.  The
  185.       // return value is ignored.
  186.       break;
  187.  
  188.     case DLL_THREAD_DETACH:
  189.       // A thread is exiting cleanly in a process that has already
  190.       // loaded this DLL.  Perform any per-thread clean up here.  The
  191.       // return value is ignored.
  192.       break;
  193.  
  194.     default:
  195.       break;
  196.   }
  197.  
  198.   return (bResult);
  199. }
  200.  
  201.  
  202. /*F+F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F
  203.   Function: DllGetClassObject
  204.  
  205.   Summary:  The standard exported function that the COM service library
  206.             uses to obtain an object class of the class factory for a
  207.             specified component provided by this server DLL.
  208.  
  209.   Args:     REFCLSID rclsid,
  210.               [in] The CLSID of the requested Component.
  211.             REFIID riid,
  212.               [in] GUID of the requested interface on the Class Factory.
  213.             PPVOID ppv)
  214.               [out] Address of the caller's pointer variable that will
  215.               receive the requested interface pointer.
  216.  
  217.   Returns:  HRESULT
  218.               E_FAIL if requested component isn't supported.
  219.               E_OUTOFMEMORY if out of memory.
  220.               Error code out of the QueryInterface.
  221. F---F---F---F---F---F---F---F---F---F---F---F---F---F---F---F---F---F---F-F*/
  222. STDAPI DllGetClassObject(
  223.          REFCLSID rclsid,
  224.          REFIID riid,
  225.          PPVOID ppv)
  226. {
  227.   HRESULT hr = CLASS_E_CLASSNOTAVAILABLE;
  228.   IUnknown* pCob = NULL;
  229.  
  230.   if (CLSID_DllCar == rclsid)
  231.   {
  232.     LOG("S: DllGetClassObject: Requesting CFCar.");
  233.     hr = E_OUTOFMEMORY;
  234.     pCob = new CFCar(NULL, g_pServer);
  235.   }
  236.   else if (CLSID_DllUtilityCar == rclsid)
  237.   {
  238.     LOG("S: DllGetClassObject: Requesting CFUtilityCar.");
  239.     hr = E_OUTOFMEMORY;
  240.     pCob = new CFUtilityCar(NULL, g_pServer);
  241.   }
  242.   else if (CLSID_DllCruiseCar == rclsid)
  243.   {
  244.     LOG("S: DllGetClassObject: Requesting CFCruiseCar.");
  245.     hr = E_OUTOFMEMORY;
  246.     pCob = new CFCruiseCar(NULL, g_pServer);
  247.   }
  248.   else if (CLSID_DllCarSample == rclsid)
  249.   {
  250.     LOG("S: DllGetClassObject: Requesting CFCarSample.");
  251.     hr = E_OUTOFMEMORY;
  252.     pCob = new CFCarSample(NULL, g_pServer);
  253.   }
  254.  
  255.   if (NULL != pCob)
  256.   {
  257.     g_pServer->ObjectsUp();
  258.     hr = pCob->QueryInterface(riid, ppv);
  259.     if (FAILED(hr))
  260.     {
  261.       g_pServer->ObjectsDown();
  262.       DELETE_POINTER(pCob);
  263.     }
  264.   }
  265.  
  266.   return hr;
  267. }
  268.  
  269.  
  270. /*F+F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F
  271.   Function: DllCanUnloadNow
  272.  
  273.   Summary:  The standard exported function that the COM service library
  274.             uses to determine if this server DLL can be unloaded.
  275.  
  276.   Args:     void.
  277.  
  278.   Returns:  HRESULT
  279.               S_OK if this DLL server can be unloaded.
  280.               S_FALSE if this DLL can not be unloaded.
  281. F---F---F---F---F---F---F---F---F---F---F---F---F---F---F---F---F---F---F-F*/
  282. STDAPI DllCanUnloadNow(void)
  283. {
  284.   HRESULT hr;
  285.  
  286.   LOGF2("S: DllCanUnloadNow. cObjects=%i, cLocks=%i.", g_pServer->m_cObjects, g_pServer->m_cLocks);
  287.  
  288.   // We return S_OK of there are no longer any living objects AND
  289.   // there are no outstanding client locks on this server.
  290.   hr = (0L==g_pServer->m_cObjects && 0L==g_pServer->m_cLocks) ? S_OK : S_FALSE;
  291.  
  292.   return hr;
  293. }
  294.  
  295.  
  296. /*F+F++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  297.   Function: SetRegKeyValue
  298.  
  299.   Summary:  Internal utility function to set a Key, Subkey, and value
  300.             in the system Registry under HKEY_CLASSES_ROOT.
  301.  
  302.   Args:     LPTSTR pszKey,
  303.             LPTSTR pszSubkey,
  304.             LPTSTR pszValue)
  305.  
  306.   Returns:  BOOL
  307.               TRUE if success; FALSE if not.
  308. ------------------------------------------------------------------------F-F*/
  309. BOOL SetRegKeyValue(
  310.        LPTSTR pszKey,
  311.        LPTSTR pszSubkey,
  312.        LPTSTR pszValue)
  313. {
  314.   BOOL bOk = FALSE;
  315.   LONG ec;
  316.   HKEY hKey;
  317.   TCHAR szKey[MAX_STRING_LENGTH];
  318.  
  319.   lstrcpy(szKey, pszKey);
  320.  
  321.   if (NULL != pszSubkey)
  322.   {
  323.     lstrcat(szKey, TEXT("\\"));
  324.     lstrcat(szKey, pszSubkey);
  325.   }
  326.  
  327.   ec = RegCreateKeyEx(
  328.          HKEY_CLASSES_ROOT,
  329.          szKey,
  330.          0,
  331.          NULL,
  332.          REG_OPTION_NON_VOLATILE,
  333.          KEY_ALL_ACCESS,
  334.          NULL,
  335.          &hKey,
  336.          NULL);
  337.  
  338.   if (ERROR_SUCCESS == ec)
  339.   {
  340.     if (NULL != pszValue)
  341.     {
  342.       ec = RegSetValueEx(
  343.              hKey,
  344.              NULL,
  345.              0,
  346.              REG_SZ,
  347.              (BYTE *)pszValue,
  348.              (lstrlen(pszValue)+1)*sizeof(TCHAR));
  349.     }
  350.     if (ERROR_SUCCESS == ec)
  351.       bOk = TRUE;
  352.     RegCloseKey(hKey);
  353.   }
  354.  
  355.   return bOk;
  356. }
  357.  
  358.  
  359. /*F+F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F
  360.   Function: DllRegisterServer
  361.  
  362.   Summary:  The standard exported function that can be called to command
  363.             this DLL server to register itself in the system registry.
  364.  
  365.   Args:     void.
  366.  
  367.   Returns:  HRESULT
  368.               NOERROR
  369. F---F---F---F---F---F---F---F---F---F---F---F---F---F---F---F---F---F---F-F*/
  370. STDAPI DllRegisterServer(void)
  371. {
  372.   HRESULT  hr = NOERROR;
  373.   TCHAR    szID[GUID_SIZE+1];
  374.   TCHAR    szCLSID[GUID_SIZE+32];
  375.   TCHAR    szModulePath[MAX_PATH];
  376.  
  377.   // Obtain the path to this module's executable file for later use.
  378.   GetModuleFileName(
  379.     g_pServer->m_hDllInst,
  380.     szModulePath,
  381.     sizeof(szModulePath)/sizeof(TCHAR));
  382.  
  383.   /*-------------------------------------------------------------------------
  384.     Create registry entries for the DllCar Component.
  385.   -------------------------------------------------------------------------*/
  386.   // Create some base key strings.
  387.   StringFromGUID2(CLSID_DllCar, szID, GUID_SIZE);
  388.   lstrcpy(szCLSID, TEXT("CLSID\\"));
  389.   lstrcat(szCLSID, szID);
  390.  
  391.   // Create ProgID keys.
  392.   SetRegKeyValue(
  393.     TEXT("CTS.DllCar.1"),
  394.     NULL,
  395.     TEXT("DllCar Component - DLLSERVE Code Sample"));
  396.   SetRegKeyValue(
  397.     TEXT("CTS.DllCar.1"),
  398.     TEXT("CLSID"),
  399.     szID);
  400.  
  401.   // Create VersionIndependentProgID keys.
  402.   SetRegKeyValue(
  403.     TEXT("CTS.DllCar"),
  404.     NULL,
  405.     TEXT("DllCar Component - DLLSERVE Code Sample"));
  406.   SetRegKeyValue(
  407.     TEXT("CTS.DllCar"),
  408.     TEXT("CurVer"),
  409.     TEXT("CTS.DllCar.1"));
  410.   SetRegKeyValue(
  411.     TEXT("CTS.DllCar"),
  412.     TEXT("CLSID"),
  413.     szID);
  414.  
  415.   // Create entries under CLSID.
  416.   SetRegKeyValue(
  417.     szCLSID,
  418.     NULL,
  419.     TEXT("DllCar Component - DLLSERVE Code Sample"));
  420.   SetRegKeyValue(
  421.     szCLSID,
  422.     TEXT("ProgID"),
  423.     TEXT("CTS.DllCar.1"));
  424.   SetRegKeyValue(
  425.     szCLSID,
  426.     TEXT("VersionIndependentProgID"),
  427.     TEXT("CTS.DllCar"));
  428.   SetRegKeyValue(
  429.     szCLSID,
  430.     TEXT("NotInsertable"),
  431.     NULL);
  432.   SetRegKeyValue(
  433.     szCLSID,
  434.     TEXT("InprocServer32"),
  435.     szModulePath);
  436.  
  437.   /*-------------------------------------------------------------------------
  438.     Create registry entries for the DllUtilityCar Component.
  439.   -------------------------------------------------------------------------*/
  440.   // Create some base key strings.
  441.   StringFromGUID2(CLSID_DllUtilityCar, szID, GUID_SIZE);
  442.   lstrcpy(szCLSID, TEXT("CLSID\\"));
  443.   lstrcat(szCLSID, szID);
  444.  
  445.   // Create ProgID keys.
  446.   SetRegKeyValue(
  447.     TEXT("CTS.DllUtilityCar.1"),
  448.     NULL,
  449.     TEXT("DllUtilityCar Component - DLLSERVE Code Sample"));
  450.   SetRegKeyValue(
  451.     TEXT("CTS.DllUtilityCar.1"),
  452.     TEXT("CLSID"),
  453.     szID);
  454.  
  455.   // Create VersionIndependentProgID keys.
  456.   SetRegKeyValue(
  457.     TEXT("CTS.DllUtilityCar"),
  458.     NULL,
  459.     TEXT("DllUtilityCar Component - DLLSERVE Code Sample"));
  460.   SetRegKeyValue(
  461.     TEXT("CTS.DllUtilityCar"),
  462.     TEXT("CurVer"),
  463.     TEXT("CTS.DllUtilityCar.1"));
  464.   SetRegKeyValue(
  465.     TEXT("CTS.DllUtilityCar"),
  466.     TEXT("CLSID"),
  467.     szID);
  468.  
  469.   // Create entries under CLSID.
  470.   SetRegKeyValue(
  471.     szCLSID,
  472.     NULL,
  473.     TEXT("DllUtilityCar Component - DLLSERVE Code Sample"));
  474.   SetRegKeyValue(
  475.     szCLSID,
  476.     TEXT("ProgID"),
  477.     TEXT("CTS.DllUtilityCar.1"));
  478.   SetRegKeyValue(
  479.     szCLSID,
  480.     TEXT("VersionIndependentProgID"),
  481.     TEXT("CTS.DllUtilityCar"));
  482.   SetRegKeyValue(
  483.     szCLSID,
  484.     TEXT("NotInsertable"),
  485.     NULL);
  486.   SetRegKeyValue(
  487.     szCLSID,
  488.     TEXT("InprocServer32"),
  489.     szModulePath);
  490.  
  491.   /*-------------------------------------------------------------------------
  492.     Create registry entries for the DllCruiseCar Component.
  493.   -------------------------------------------------------------------------*/
  494.   // Create some base key strings.
  495.   StringFromGUID2(CLSID_DllCruiseCar, szID, GUID_SIZE);
  496.   lstrcpy(szCLSID, TEXT("CLSID\\"));
  497.   lstrcat(szCLSID, szID);
  498.  
  499.   // Create ProgID keys.
  500.   SetRegKeyValue(
  501.     TEXT("CTS.DllCruiseCar.1"),
  502.     NULL,
  503.     TEXT("DllCruiseCar Component - DLLSERVE Code Sample"));
  504.   SetRegKeyValue(
  505.     TEXT("CTS.DllCruiseCar.1"),
  506.     TEXT("CLSID"),
  507.     szID);
  508.  
  509.   // Create VersionIndependentProgID keys.
  510.   SetRegKeyValue(
  511.     TEXT("CTS.DllCruiseCar"),
  512.     NULL,
  513.     TEXT("DllCruiseCar Component - DLLSERVE Code Sample"));
  514.   SetRegKeyValue(
  515.     TEXT("CTS.DllCruiseCar"),
  516.     TEXT("CurVer"),
  517.     TEXT("CTS.DllCruiseCar.1"));
  518.   SetRegKeyValue(
  519.     TEXT("CTS.DllCruiseCar"),
  520.     TEXT("CLSID"),
  521.     szID);
  522.  
  523.   // Create entries under CLSID.
  524.   SetRegKeyValue(
  525.     szCLSID,
  526.     NULL,
  527.     TEXT("DllCruiseCar Component - DLLSERVE Code Sample"));
  528.   SetRegKeyValue(
  529.     szCLSID,
  530.     TEXT("ProgID"),
  531.     TEXT("CTS.DllCruiseCar.1"));
  532.   SetRegKeyValue(
  533.     szCLSID,
  534.     TEXT("VersionIndependentProgID"),
  535.     TEXT("CTS.DllCruiseCar"));
  536.   SetRegKeyValue(
  537.     szCLSID,
  538.     TEXT("NotInsertable"),
  539.     NULL);
  540.   SetRegKeyValue(
  541.     szCLSID,
  542.     TEXT("InprocServer32"),
  543.     szModulePath);
  544.  
  545.   /*-------------------------------------------------------------------------
  546.     Create registry entries for the DllCarSample Component.
  547.   -------------------------------------------------------------------------*/
  548.   // Create some base key strings.
  549.   StringFromGUID2(CLSID_DllCarSample, szID, GUID_SIZE);
  550.   lstrcpy(szCLSID, TEXT("CLSID\\"));
  551.   lstrcat(szCLSID, szID);
  552.  
  553.   // Create ProgID keys.
  554.   SetRegKeyValue(
  555.     TEXT("CTS.DllCarSample.1"),
  556.     NULL,
  557.     TEXT("DllCarSample Component - DLLSERVE Code Sample"));
  558.   SetRegKeyValue(
  559.     TEXT("CTS.DllCarSample.1"),
  560.     TEXT("CLSID"),
  561.     szID);
  562.  
  563.   // Create VersionIndependentProgID keys.
  564.   SetRegKeyValue(
  565.     TEXT("CTS.DllCarSample"),
  566.     NULL,
  567.     TEXT("DllCarSample Component - DLLSERVE Code Sample"));
  568.   SetRegKeyValue(
  569.     TEXT("CTS.DllCarSample"),
  570.     TEXT("CurVer"),
  571.     TEXT("CTS.DllCarSample.1"));
  572.   SetRegKeyValue(
  573.     TEXT("CTS.DllCarSample"),
  574.     TEXT("CLSID"),
  575.     szID);
  576.  
  577.   // Create entries under CLSID.
  578.   SetRegKeyValue(
  579.     szCLSID,
  580.     NULL,
  581.     TEXT("DllCarSample Component - DLLSERVE Code Sample"));
  582.   SetRegKeyValue(
  583.     szCLSID,
  584.     TEXT("ProgID"),
  585.     TEXT("CTS.DllCarSample.1"));
  586.   SetRegKeyValue(
  587.     szCLSID,
  588.     TEXT("VersionIndependentProgID"),
  589.     TEXT("CTS.DllCarSample"));
  590.   SetRegKeyValue(
  591.     szCLSID,
  592.     TEXT("NotInsertable"),
  593.     NULL);
  594.   SetRegKeyValue(
  595.     szCLSID,
  596.     TEXT("InprocServer32"),
  597.     szModulePath);
  598.  
  599.   return hr;
  600. }
  601.  
  602.  
  603. /*F+F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F+++F
  604.   Function: DllUnregisterServer
  605.  
  606.   Summary:  The standard exported function that can be called to command
  607.             this DLL server to unregister itself from the system Registry.
  608.  
  609.   Args:     void.
  610.  
  611.   Returns:  HRESULT
  612.               NOERROR
  613. F---F---F---F---F---F---F---F---F---F---F---F---F---F---F---F---F---F---F-F*/
  614. STDAPI DllUnregisterServer(void)
  615. {
  616.   HRESULT  hr = NOERROR;
  617.   TCHAR    szID[GUID_SIZE+1];
  618.   TCHAR    szCLSID[GUID_SIZE+32];
  619.   TCHAR    szTemp[MAX_PATH+GUID_SIZE];
  620.  
  621.   /*-------------------------------------------------------------------------
  622.     Delete registry entries for the DllCar Component.
  623.   -------------------------------------------------------------------------*/
  624.   //Create some base key strings.
  625.   StringFromGUID2(CLSID_DllCar, szID, GUID_SIZE);
  626.   lstrcpy(szCLSID, TEXT("CLSID\\"));
  627.   lstrcat(szCLSID, szID);
  628.  
  629.   RegDeleteKey(HKEY_CLASSES_ROOT, TEXT("CTS.DllCar\\CurVer"));
  630.   RegDeleteKey(HKEY_CLASSES_ROOT, TEXT("CTS.DllCar\\CLSID"));
  631.   RegDeleteKey(HKEY_CLASSES_ROOT, TEXT("CTS.DllCar"));
  632.  
  633.   RegDeleteKey(HKEY_CLASSES_ROOT, TEXT("CTS.DllCar.1\\CLSID"));
  634.   RegDeleteKey(HKEY_CLASSES_ROOT, TEXT("CTS.DllCar.1"));
  635.  
  636.   wsprintf(szTemp, TEXT("%s\\%s"), szCLSID, TEXT("ProgID"));
  637.   RegDeleteKey(HKEY_CLASSES_ROOT, szTemp);
  638.  
  639.   wsprintf(szTemp, TEXT("%s\\%s"), szCLSID, TEXT("VersionIndependentProgID"));
  640.   RegDeleteKey(HKEY_CLASSES_ROOT, szTemp);
  641.  
  642.   wsprintf(szTemp, TEXT("%s\\%s"), szCLSID, TEXT("NotInsertable"));
  643.   RegDeleteKey(HKEY_CLASSES_ROOT, szTemp);
  644.  
  645.   wsprintf(szTemp, TEXT("%s\\%s"), szCLSID, TEXT("InprocServer32"));
  646.   RegDeleteKey(HKEY_CLASSES_ROOT, szTemp);
  647.  
  648.   RegDeleteKey(HKEY_CLASSES_ROOT, szCLSID);
  649.  
  650.   /*-------------------------------------------------------------------------
  651.     Delete registry entries for the DllUtilityCar Component.
  652.   -------------------------------------------------------------------------*/
  653.   //Create some base key strings.
  654.   StringFromGUID2(CLSID_DllUtilityCar, szID, GUID_SIZE);
  655.   lstrcpy(szCLSID, TEXT("CLSID\\"));
  656.   lstrcat(szCLSID, szID);
  657.  
  658.   RegDeleteKey(HKEY_CLASSES_ROOT, TEXT("CTS.DllUtilityCar\\CurVer"));
  659.   RegDeleteKey(HKEY_CLASSES_ROOT, TEXT("CTS.DllUtilityCar\\CLSID"));
  660.   RegDeleteKey(HKEY_CLASSES_ROOT, TEXT("CTS.DllUtilityCar"));
  661.  
  662.   RegDeleteKey(HKEY_CLASSES_ROOT, TEXT("CTS.DllUtilityCar.1\\CLSID"));
  663.   RegDeleteKey(HKEY_CLASSES_ROOT, TEXT("CTS.DllUtilityCar.1"));
  664.  
  665.   wsprintf(szTemp, TEXT("%s\\%s"), szCLSID, TEXT("ProgID"));
  666.   RegDeleteKey(HKEY_CLASSES_ROOT, szTemp);
  667.  
  668.   wsprintf(szTemp, TEXT("%s\\%s"), szCLSID, TEXT("VersionIndependentProgID"));
  669.   RegDeleteKey(HKEY_CLASSES_ROOT, szTemp);
  670.  
  671.   wsprintf(szTemp, TEXT("%s\\%s"), szCLSID, TEXT("NotInsertable"));
  672.   RegDeleteKey(HKEY_CLASSES_ROOT, szTemp);
  673.  
  674.   wsprintf(szTemp, TEXT("%s\\%s"), szCLSID, TEXT("InprocServer32"));
  675.   RegDeleteKey(HKEY_CLASSES_ROOT, szTemp);
  676.  
  677.   RegDeleteKey(HKEY_CLASSES_ROOT, szCLSID);
  678.  
  679.   /*-------------------------------------------------------------------------
  680.     Delete registry entries for the DllCruiseCar Component.
  681.   -------------------------------------------------------------------------*/
  682.   //Create some base key strings.
  683.   StringFromGUID2(CLSID_DllCruiseCar, szID, GUID_SIZE);
  684.   lstrcpy(szCLSID, TEXT("CLSID\\"));
  685.   lstrcat(szCLSID, szID);
  686.  
  687.   RegDeleteKey(HKEY_CLASSES_ROOT, TEXT("CTS.DllCruiseCar\\CurVer"));
  688.   RegDeleteKey(HKEY_CLASSES_ROOT, TEXT("CTS.DllCruiseCar\\CLSID"));
  689.   RegDeleteKey(HKEY_CLASSES_ROOT, TEXT("CTS.DllCruiseCar"));
  690.  
  691.   RegDeleteKey(HKEY_CLASSES_ROOT, TEXT("CTS.DllCruiseCar.1\\CLSID"));
  692.   RegDeleteKey(HKEY_CLASSES_ROOT, TEXT("CTS.DllCruiseCar.1"));
  693.  
  694.   wsprintf(szTemp, TEXT("%s\\%s"), szCLSID, TEXT("ProgID"));
  695.   RegDeleteKey(HKEY_CLASSES_ROOT, szTemp);
  696.  
  697.   wsprintf(szTemp, TEXT("%s\\%s"), szCLSID, TEXT("VersionIndependentProgID"));
  698.   RegDeleteKey(HKEY_CLASSES_ROOT, szTemp);
  699.  
  700.   wsprintf(szTemp, TEXT("%s\\%s"), szCLSID, TEXT("NotInsertable"));
  701.   RegDeleteKey(HKEY_CLASSES_ROOT, szTemp);
  702.  
  703.   wsprintf(szTemp, TEXT("%s\\%s"), szCLSID, TEXT("InprocServer32"));
  704.   RegDeleteKey(HKEY_CLASSES_ROOT, szTemp);
  705.  
  706.   RegDeleteKey(HKEY_CLASSES_ROOT, szCLSID);
  707.  
  708.   /*-------------------------------------------------------------------------
  709.     Delete registry entries for the DllCarSample Component.
  710.   -------------------------------------------------------------------------*/
  711.   //Create some base key strings.
  712.   StringFromGUID2(CLSID_DllCarSample, szID, GUID_SIZE);
  713.   lstrcpy(szCLSID, TEXT("CLSID\\"));
  714.   lstrcat(szCLSID, szID);
  715.  
  716.   RegDeleteKey(HKEY_CLASSES_ROOT, TEXT("CTS.DllCarSample\\CurVer"));
  717.   RegDeleteKey(HKEY_CLASSES_ROOT, TEXT("CTS.DllCarSample\\CLSID"));
  718.   RegDeleteKey(HKEY_CLASSES_ROOT, TEXT("CTS.DllCarSample"));
  719.  
  720.   RegDeleteKey(HKEY_CLASSES_ROOT, TEXT("CTS.DllCarSample.1\\CLSID"));
  721.   RegDeleteKey(HKEY_CLASSES_ROOT, TEXT("CTS.DllCarSample.1"));
  722.  
  723.   wsprintf(szTemp, TEXT("%s\\%s"), szCLSID, TEXT("ProgID"));
  724.   RegDeleteKey(HKEY_CLASSES_ROOT, szTemp);
  725.  
  726.   wsprintf(szTemp, TEXT("%s\\%s"), szCLSID, TEXT("VersionIndependentProgID"));
  727.   RegDeleteKey(HKEY_CLASSES_ROOT, szTemp);
  728.  
  729.   wsprintf(szTemp, TEXT("%s\\%s"), szCLSID, TEXT("NotInsertable"));
  730.   RegDeleteKey(HKEY_CLASSES_ROOT, szTemp);
  731.  
  732.   wsprintf(szTemp, TEXT("%s\\%s"), szCLSID, TEXT("InprocServer32"));
  733.   RegDeleteKey(HKEY_CLASSES_ROOT, szTemp);
  734.  
  735.   RegDeleteKey(HKEY_CLASSES_ROOT, szCLSID);
  736.  
  737.   return hr;
  738. }
  739.