Source code of Windows XP (NT5)
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

591 lines
19 KiB

//+---------------------------------------------------------------------------
//
// Microsoft Windows
// Copyright (C) Microsoft Corporation, 1996-1999.
//
// File: langreg.hxx
//
// Contents: Macros for Self-registration of Word Breakers and Stemmers
//
// Functions: Macros to create DllRegisterServer, DllUnregisterServer
//
// History: 05-Jan-99 AlanW Created from filtreg.hxx
//
//----------------------------------------------------------------------------
#pragma once
#include <olectl.h>
//
// Structure to define language resource class
//
struct SLangClassEntry
{
WCHAR const * pwszClassId;
WCHAR const * pwszClassIdDescription;
WCHAR const * pwszDLL;
WCHAR const * pwszThreadingModel;
};
struct SLangRegistry
{
WCHAR const * pwszLangName;
LONG lcid;
SLangClassEntry WordBreaker;
SLangClassEntry Stemmer;
};
//
// Sample use of the structures
//
//
// SLangClassEntry const NeutralWordBreaker =
// { L"{369647e0-17b0-11ce-9950-00aa004bbb1f}",
// L"Neutral Word Breaker",
// L"query.dll",
// L"both" };
//
// SLangRegistry const English_US_LangRes =
// { L"English_US", 1033,
// { L"{59e09780-8099-101b-8df3-00000b65c3b5}",
// L"English_US Word Breaker",
// L"infosoft.dll",
// L"both" },
// { L"{eeed4c20-7f1b-11ce-be57-00aa0051fe20}",
// L"English_US Stemmer",
// L"infosoft.dll",
// L"both" }
// };
//
//
// Function prototypes
//
inline long RegisterALanguageResource( SLangRegistry const & LangRes );
inline long RegisterALanguageClass( SLangClassEntry const & LangClass );
inline long UnRegisterALanguageResource( SLangRegistry const & LangRes );
inline long UnRegisterALanguageClass( SLangClassEntry const & LangClass );
//+---------------------------------------------------------------------------
//
// Function: BuildKeyValues, private
//
// Effects: Given array of key, value, key, value, ... adds the entries
// under CLSID as:
//
// Key1 : <NO NAME> Value1
// Key2 : <NO NAME> Value2
// :
// :
//
// Arguments: [awszKeyValues] -- Keys and values
// [cKeyValues] -- Number of entries in array. Must be even.
//
// Returns: ERROR_SUCCESS on success
//
// History: 05-Jan-97 KyleP Created
//
// Notes: The *value* entries can be null, signifying no value at a
// given level.
//
//----------------------------------------------------------------------------
inline long BuildKeyValues( WCHAR const * const * awszKeyValues, unsigned cKeyValues )
{
WCHAR wcTemp[MAX_PATH];
wcscpy( wcTemp, L"CLSID" );
long dwError;
HKEY hKey = (HKEY)INVALID_HANDLE_VALUE;
unsigned i = 0;
do
{
if ( INVALID_HANDLE_VALUE != hKey )
{
RegCloseKey( hKey );
hKey = (HKEY)INVALID_HANDLE_VALUE;
}
wcscat( wcTemp, L"\\" );
wcscat( wcTemp, awszKeyValues[i] );
DWORD dwDisposition;
dwError = RegCreateKeyExW( HKEY_CLASSES_ROOT, // Root
wcTemp, // Sub key
0, // Reserved
0, // Class
0, // Flags
KEY_ALL_ACCESS, // Access
0, // Security
&hKey, // Handle
&dwDisposition ); // Disposition
if ( ERROR_SUCCESS != dwError )
break;
i++;
if ( 0 != awszKeyValues[i] )
dwError = RegSetValueExW( hKey, // Key
0, // Name
0, // Reserved
REG_SZ, // Type
(BYTE *)awszKeyValues[i], // Value
(1 + wcslen(awszKeyValues[i]) ) * sizeof(WCHAR) );
if ( ERROR_SUCCESS != dwError )
break;
i++;
}
while ( i < cKeyValues );
if ( (HKEY)INVALID_HANDLE_VALUE != hKey )
RegCloseKey( hKey );
return dwError;
}
//+---------------------------------------------------------------------------
//
// Function: AddThreadingModel
//
// Synopsis: Adds the threading model value to the CLSID\GUID\InProcServer32
// key
//
// Arguments: [wszClsId] - ClassId of the inproc server.
// [wszThreadingModel] -- 0 (for single threaded) or one of
// Apartment, Free, or Both
//
// History: 3-07-97 srikants Created
//
//----------------------------------------------------------------------------
inline long AddThreadingModel( WCHAR const * wszClsId,
WCHAR const * wszThreadingModel )
{
WCHAR wcTemp[MAX_PATH];
wcscpy( wcTemp, L"CLSID" );
wcscat( wcTemp, L"\\" );
wcscat( wcTemp, wszClsId );
wcscat( wcTemp, L"\\" );
wcscat( wcTemp, L"InprocServer32" );
long dwError;
HKEY hKey = (HKEY)INVALID_HANDLE_VALUE;
unsigned i = 0;
dwError = RegOpenKeyExW( HKEY_CLASSES_ROOT, // Root
wcTemp, // Sub key
0, // Reserved
KEY_ALL_ACCESS, // Access
&hKey ); // Handle
if ( ERROR_SUCCESS != dwError )
return dwError;
if ( 0 != wszThreadingModel )
dwError = RegSetValueExW( hKey, // Key
L"ThreadingModel", // Name
0, // Reserved
REG_SZ, // Type
(BYTE *) wszThreadingModel, // Value
(wcslen(wszThreadingModel) + 1) * sizeof WCHAR );
else
RegDeleteValueW( hKey, // Key
L"ThreadingModel" ); // Name
if ( (HKEY)INVALID_HANDLE_VALUE != hKey )
RegCloseKey( hKey );
return dwError;
}
//+---------------------------------------------------------------------------
//
// Function: DestroyKeyValues, private
//
// Effects: Given array of key, value, key, value from BuildKeyValues,
// removes the keys.
//
// Arguments: [awszKeyValues] -- Keys and values
// [cKeyValues] -- Number of entries in array. Must be even.
//
// Returns: ERROR_SUCCESS on success
//
// History: 05-Jan-97 KyleP Created
//
//----------------------------------------------------------------------------
inline long DestroyKeyValues( WCHAR const * const * awszKeyValues, int cKeyValues )
{
WCHAR wcTemp[MAX_PATH];
//
// Build path to deepest component
//
wcscpy( wcTemp, L"CLSID" );
int i = 0;
do
{
wcscat( wcTemp, L"\\" );
wcscat( wcTemp, awszKeyValues[i] );
i += 2;
} while ( i < cKeyValues );
//
// Remove components in reverse order
//
long dwError;
HKEY hKey = (HKEY)INVALID_HANDLE_VALUE;
unsigned cc = wcslen( wcTemp );
for ( i -= 2; i >= 0; i -= 2 )
{
dwError = RegOpenKeyExW( HKEY_CLASSES_ROOT, // Root
wcTemp, // Sub key
0, // Reserved
KEY_ALL_ACCESS, // Access
&hKey ); // Handle
if ( ERROR_SUCCESS != dwError )
break;
//
// Delete subkey, if there is one.
//
if ( i+2 < cKeyValues )
dwError = RegDeleteKeyW( hKey, awszKeyValues[i+2] );
if ( ERROR_SUCCESS != dwError )
break;
//
// Close key and truncate string to next component.
//
if ( INVALID_HANDLE_VALUE != hKey )
{
RegCloseKey( hKey );
hKey = (HKEY)INVALID_HANDLE_VALUE;
}
cc -= wcslen( awszKeyValues[i] );
cc --;
wcTemp[cc] = 0;
}
//
// Remove the final top key
//
if ( ERROR_SUCCESS == dwError )
{
do
{
dwError = RegOpenKeyExW( HKEY_CLASSES_ROOT, // Root
wcTemp, // Sub key -- "CLSID"
0, // Reserved
KEY_ALL_ACCESS, // Access
&hKey ); // Handle
if ( ERROR_SUCCESS != dwError )
break;
//
// Delete subkey
//
dwError = RegDeleteKeyW( hKey, awszKeyValues[0] );
} while ( FALSE );
}
return dwError;
}
//+---------------------------------------------------------------------------
//
// Function: RegisterALanguageResource, private
//
// Synopsis: Registers a language resource.
//
// Arguments: [LangRes] -- Language resource description
//
// Returns: ERROR_SUCCESS on success
//
// History: 05-Jan-99 AlanW Created
//
//----------------------------------------------------------------------------
inline long RegisterALanguageResource( SLangRegistry const & LangRes )
{
WCHAR wcTemp[MAX_PATH];
long dwError;
HKEY hKey = (HKEY)INVALID_HANDLE_VALUE;
wcscpy( wcTemp, L"System\\CurrentControlSet\\Control\\ContentIndex\\Language\\" );
wcscat( wcTemp, LangRes.pwszLangName );
do
{
DWORD dwDisposition;
DWORD dwType;
DWORD dwSize;
dwError = RegCreateKeyExW( HKEY_LOCAL_MACHINE, // Root
wcTemp, // Sub key
0, // Reserved
0, // Class
0, // Flags
KEY_ALL_ACCESS, // Access
0, // Security
&hKey, // Handle
&dwDisposition ); // Disposition
if ( ERROR_SUCCESS != dwError )
break;
//
// Write the locale ID
//
dwError = RegSetValueExW( hKey, // Key
L"Locale", // Name
0, // Reserved
REG_DWORD, // Type
(BYTE *)&LangRes.lcid, // Value
sizeof DWORD );
if ( ERROR_SUCCESS != dwError )
break;
//
// Create the word breaker class description
//
if (LangRes.WordBreaker.pwszClassId != 0)
{
dwError = RegisterALanguageClass( LangRes.WordBreaker );
if ( ERROR_SUCCESS != dwError )
break;
dwError = RegSetValueExW( hKey, // Key
L"WBreakerClass", // Name
0, // Reserved
REG_SZ, // Type
(BYTE *)LangRes.WordBreaker.pwszClassId, // Value
(1 + wcslen(LangRes.WordBreaker.pwszClassId) ) * sizeof(WCHAR) );
if ( ERROR_SUCCESS != dwError )
break;
}
//
// Create the stemmer class description
//
if (LangRes.Stemmer.pwszClassId != 0)
{
dwError = RegisterALanguageClass( LangRes.Stemmer );
if ( ERROR_SUCCESS != dwError )
break;
dwError = RegSetValueExW( hKey, // Key
L"StemmerClass", // Name
0, // Reserved
REG_SZ, // Type
(BYTE *)LangRes.Stemmer.pwszClassId, // Value
(1 + wcslen(LangRes.Stemmer.pwszClassId) ) * sizeof(WCHAR) );
if ( ERROR_SUCCESS != dwError )
break;
}
} while( FALSE );
if ( (HKEY)INVALID_HANDLE_VALUE != hKey )
{
RegCloseKey( hKey );
hKey = (HKEY)INVALID_HANDLE_VALUE;
}
return dwError;
}
//+---------------------------------------------------------------------------
//
// Function: UnRegisterALanguageResource, private
//
// Synopsis: Unregisters a language resource.
//
// Arguments: [LangRes] -- Language resource description
//
// Returns: ERROR_SUCCESS on success
//
// History: 05-Jan-99 AlanW Created
//
//----------------------------------------------------------------------------
inline long UnRegisterALanguageResource( SLangRegistry const & LangRes )
{
WCHAR wcTemp[MAX_PATH];
wcscpy( wcTemp, L"System\\CurrentControlSet\\Control\\ContentIndex\\Language\\" );
wcscat( wcTemp, LangRes.pwszLangName );
HKEY hKey = (HKEY)INVALID_HANDLE_VALUE;
long dwError = RegOpenKeyExW( HKEY_LOCAL_MACHINE, // Root
wcTemp, // Sub key
0, // Reserved
KEY_ALL_ACCESS, // Access
&hKey ); // Handle
//
// Delete the word breaker class description
//
if (LangRes.WordBreaker.pwszClassId != 0)
{
dwError = UnRegisterALanguageClass( LangRes.WordBreaker );
if (hKey != INVALID_HANDLE_VALUE)
dwError = RegDeleteValueW( hKey, // Key
L"WBreakerClass" ); // Name
}
//
// Create the stemmer class description
//
if (LangRes.Stemmer.pwszClassId != 0)
{
dwError = UnRegisterALanguageClass( LangRes.Stemmer );
if (hKey != INVALID_HANDLE_VALUE)
dwError = RegDeleteValueW( hKey, // Key
L"StemmerClass" ); // Name
}
if (hKey != INVALID_HANDLE_VALUE)
{
DWORD dwNumofKeys = 0;
DWORD dwNumofValues = 0;
dwError = RegQueryInfoKeyW( hKey, // Hkey
0, // Buffer for class string
0, // Size of class string buffer
0, // reserved
&dwNumofKeys,// number of subkeys
0, // longest subkey name length
0, // longest class string length
&dwNumofValues,// number of value entries
0, // longest value name length
0, // longest value data length
0, // security descriptor length
0 ); // last write time);
if ( ERROR_SUCCESS == dwError )
{
if ( (dwNumofValues == 1) && (dwNumofKeys==0) )
{
//
// There is only one value and no sub-keys under this key,
// Delete the Locale value and then the sub-key for this Lang
// if that succeeded.
//
RegDeleteValueW( hKey, // Key
L"Locale" ); // Name
dwError = RegQueryInfoKeyW( hKey, // Hkey
0, // class string
0, // Size of class string
0, // reserved
&dwNumofKeys,
0, // max subkey name len
0, // max class string len
&dwNumofValues,
0, // max value name len
0, // max value data len
0, // security desc len
0 ); // last write time);
}
}
RegCloseKey( hKey );
if ( ERROR_SUCCESS == dwError &&
(0 == dwNumofValues) &&
(0 == dwNumofKeys) )
dwError = RegDeleteKeyW( HKEY_LOCAL_MACHINE, // Root
wcTemp ); // Sub key
}
return dwError;
}
//+---------------------------------------------------------------------------
//
// Function: RegisterALanguageClass, private
//
// Synopsis: Registers a language resource classID in registry
//
// Arguments: [LangClass] -- IWordBreaker or IStemmer description
//
// Returns: ERROR_SUCCESS on success
//
// History: 05-Jan-99 AlanW Created
//
//----------------------------------------------------------------------------
inline long RegisterALanguageClass( SLangClassEntry const & LangClass )
{
WCHAR const * aKeyValues[4] = { LangClass.pwszClassId,
LangClass.pwszClassIdDescription,
L"InprocServer32",
LangClass.pwszDLL };
long retVal = BuildKeyValues( aKeyValues, sizeof(aKeyValues)/sizeof(aKeyValues[0]) );
if ( ERROR_SUCCESS == retVal )
retVal = AddThreadingModel( LangClass.pwszClassId, LangClass.pwszThreadingModel );
return retVal;
}
//+---------------------------------------------------------------------------
//
// Function: UnRegisterALanguageClass, private
//
// Synopsis: Unregisters a language resource classID
//
// Arguments: [LangClass] -- IWordBreaker or IStemmer description
//
// Returns: ERROR_SUCCESS on success
//
// History: 05-Jan-99 AlanW Created
//
//----------------------------------------------------------------------------
inline long UnRegisterALanguageClass( SLangClassEntry const & LangClass )
{
WCHAR const * aKeyValues[4] = { LangClass.pwszClassId,
LangClass.pwszClassIdDescription,
L"InprocServer32",
LangClass.pwszDLL };
return DestroyKeyValues( aKeyValues, sizeof(aKeyValues)/sizeof(aKeyValues[0]) );
}