645 lines
18 KiB
C
645 lines
18 KiB
C
/*++
|
|
|
|
Copyright (c) 1991-2000, Microsoft Corporation All rights reserved.
|
|
|
|
Module Name:
|
|
|
|
init.c
|
|
|
|
Abstract:
|
|
|
|
This file contains the initialization code for the NLS APIs.
|
|
|
|
External Routines found in this file:
|
|
NlsDllInitialize
|
|
|
|
Revision History:
|
|
|
|
05-31-91 JulieB Created.
|
|
|
|
--*/
|
|
|
|
|
|
|
|
//
|
|
// Include Files.
|
|
//
|
|
|
|
#include "nls.h"
|
|
#include "stdio.h"
|
|
|
|
|
|
|
|
//
|
|
// Global Variables.
|
|
//
|
|
|
|
HANDLE hModule; // handle to module
|
|
RTL_CRITICAL_SECTION gcsTblPtrs; // critical section for tbl ptrs
|
|
|
|
UINT gAnsiCodePage; // Ansi code page value
|
|
UINT gOemCodePage; // OEM code page value
|
|
UINT gMacCodePage; // MAC code page value
|
|
LCID gSystemLocale; // system locale value
|
|
LANGID gSystemInstallLang; // system's original install language
|
|
PLOC_HASH gpSysLocHashN; // ptr to system loc hash node
|
|
PLOC_HASH gpInvLocHashN; // ptr to invariant loc hash node
|
|
PCP_HASH gpACPHashN; // ptr to ACP hash node
|
|
PCP_HASH gpOEMCPHashN; // ptr to OEMCP hash node
|
|
PCP_HASH gpMACCPHashN; // ptr to MACCP hash node
|
|
|
|
HANDLE hCodePageKey; // handle to System\Nls\CodePage key
|
|
HANDLE hLocaleKey; // handle to System\Nls\Locale key
|
|
HANDLE hAltSortsKey; // handle to Locale\Alternate Sorts key
|
|
HANDLE hLangGroupsKey; // handle to System\Nls\Language Groups key
|
|
PNLS_USER_INFO pNlsUserInfo; // ptr to the user info cache
|
|
|
|
RTL_CRITICAL_SECTION gcsNlsProcessCache; // critical section for nls process cache
|
|
|
|
|
|
|
|
|
|
//
|
|
// Forward Declarations.
|
|
//
|
|
|
|
ULONG
|
|
NlsServerInitialize(void);
|
|
|
|
ULONG
|
|
NlsProcessInitialize(void);
|
|
|
|
void
|
|
InitKoreanWeights(void);
|
|
|
|
|
|
|
|
|
|
|
|
//-------------------------------------------------------------------------//
|
|
// EXTERNAL ROUTINES //
|
|
//-------------------------------------------------------------------------//
|
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////
|
|
//
|
|
// NlsDllInitialize
|
|
//
|
|
// DLL Entry initialization procedure for NLSAPI. This is called by
|
|
// the base dll initialization.
|
|
//
|
|
// 05-31-91 JulieB Created.
|
|
////////////////////////////////////////////////////////////////////////////
|
|
|
|
BOOLEAN NlsDllInitialize(
|
|
IN PVOID hMod,
|
|
ULONG Reason,
|
|
IN PBASE_STATIC_SERVER_DATA pBaseStaticServerData)
|
|
{
|
|
|
|
if (Reason == DLL_PROCESS_ATTACH)
|
|
{
|
|
ULONG rc;
|
|
|
|
//
|
|
// Save module handle for use later.
|
|
//
|
|
hModule = (HANDLE)hMod;
|
|
|
|
//
|
|
// Initialize the cached user info pointer.
|
|
//
|
|
pNlsUserInfo = &(pBaseStaticServerData->NlsUserInfo);
|
|
|
|
//
|
|
// Process attaching, so initialize tables.
|
|
//
|
|
rc = NlsServerInitialize();
|
|
if (rc)
|
|
{
|
|
KdPrint(("NLSAPI: Could NOT initialize Server - %lx.\n", rc));
|
|
return (FALSE);
|
|
}
|
|
|
|
rc = NlsProcessInitialize();
|
|
if (rc)
|
|
{
|
|
KdPrint(("NLSAPI: Could NOT initialize Process - %lx.\n", rc));
|
|
return (FALSE);
|
|
}
|
|
}
|
|
|
|
//
|
|
// Return success.
|
|
//
|
|
return (TRUE);
|
|
}
|
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////
|
|
//
|
|
// NlsThreadCleanup
|
|
//
|
|
// Cleanup for thread resources when it terminates.
|
|
//
|
|
// 03-30-99 SamerA Created.
|
|
////////////////////////////////////////////////////////////////////////////
|
|
|
|
BOOLEAN NlsThreadCleanup(void)
|
|
{
|
|
if (NtCurrentTeb()->NlsCache)
|
|
{
|
|
CLOSE_REG_KEY( ((PNLS_LOCAL_CACHE)NtCurrentTeb()->NlsCache)->CurrentUserKeyHandle );
|
|
RtlFreeHeap( RtlProcessHeap(),
|
|
0,
|
|
NtCurrentTeb()->NlsCache
|
|
);
|
|
}
|
|
|
|
return (TRUE);
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
//-------------------------------------------------------------------------//
|
|
// INTERNAL ROUTINES //
|
|
//-------------------------------------------------------------------------//
|
|
|
|
////////////////////////////////////////////////////////////////////////////
|
|
//
|
|
// NlsServerInitialize
|
|
//
|
|
// Server initialization procedure for NLSAPI. This is the ONE-TIME
|
|
// initialization code for the NLSAPI DLL. It simply does the calls
|
|
// to NtCreateSection for the code pages that are currently found in the
|
|
// system.
|
|
//
|
|
// 05-31-91 JulieB Created.
|
|
////////////////////////////////////////////////////////////////////////////
|
|
|
|
ULONG NlsServerInitialize(void)
|
|
{
|
|
HANDLE hSec = (HANDLE)0; // section handle
|
|
ULONG rc = 0L; // return code
|
|
|
|
#ifndef DOSWIN32
|
|
PIMAGE_NT_HEADERS NtHeaders;
|
|
|
|
//
|
|
// This is to avoid being initialized again when NTSD dynlinks to
|
|
// a server to get at its debugger extensions.
|
|
//
|
|
NtHeaders = RtlImageNtHeader(NtCurrentPeb()->ImageBaseAddress);
|
|
if (NtHeaders &&
|
|
(NtHeaders->OptionalHeader.Subsystem != IMAGE_SUBSYSTEM_NATIVE))
|
|
{
|
|
return (NO_ERROR);
|
|
}
|
|
#endif
|
|
|
|
//
|
|
// MultiUser NT (Hydra). SesssionId = 0 is the console CSRSS.
|
|
// If this is NOT the first server process, then just return success,
|
|
// since we only want to create the object directories once.
|
|
//
|
|
if (NtCurrentPeb()->SessionId != 0)
|
|
{
|
|
return (NO_ERROR);
|
|
}
|
|
|
|
//
|
|
// Create the NLS object directory.
|
|
//
|
|
// Must create a separate directory off the root in order to have
|
|
// CreateSection access on the fly.
|
|
//
|
|
if (rc = CreateNlsObjectDirectory())
|
|
{
|
|
return (rc);
|
|
}
|
|
|
|
//
|
|
// The ACP, OEMCP, and Default Language files are already created
|
|
// at boot time. The pointers to the files are stored in the PEB.
|
|
//
|
|
// Create the section for the following data files:
|
|
// UNICODE
|
|
// LOCALE
|
|
// CTYPE
|
|
// SORTKEY
|
|
// SORT TABLES
|
|
//
|
|
// All other data files will have the sections created only as they
|
|
// are needed.
|
|
//
|
|
if ((!NT_SUCCESS(rc = CsrBasepNlsCreateSection( NLS_CREATE_SECTION_UNICODE, 0, &hSec))) ||
|
|
(!NT_SUCCESS(rc = CsrBasepNlsCreateSection( NLS_CREATE_SECTION_LOCALE, 0, &hSec))) ||
|
|
(!NT_SUCCESS(rc = CsrBasepNlsCreateSection( NLS_CREATE_SECTION_CTYPE, 0, &hSec))) ||
|
|
(!NT_SUCCESS(rc = CsrBasepNlsCreateSection( NLS_CREATE_SECTION_SORTKEY, 0, &hSec))) ||
|
|
(!NT_SUCCESS(rc = CsrBasepNlsCreateSection( NLS_CREATE_SECTION_SORTTBLS, 0, &hSec))))
|
|
{
|
|
return (rc);
|
|
}
|
|
|
|
//
|
|
// Return success.
|
|
//
|
|
return (NO_ERROR);
|
|
}
|
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////
|
|
//
|
|
// NlsProcessInitialize
|
|
//
|
|
// Process initialization procedure for NLS API. This routine sets up all
|
|
// of the tables so that they are accessable from the current process. If
|
|
// it is unable to allocate the appropriate memory or memory map the
|
|
// appropriate files, an error is returned.
|
|
//
|
|
// 05-31-91 JulieB Created.
|
|
////////////////////////////////////////////////////////////////////////////
|
|
|
|
ULONG NlsProcessInitialize(void)
|
|
{
|
|
ULONG rc = 0L; // return code
|
|
LPWORD pBaseAddr; // ptr to base address of section
|
|
LCID UserLocale; // user locale id
|
|
PLOC_HASH pUserLocHashN; // ptr to user locale hash node
|
|
|
|
//
|
|
// Initialize the critical section that protects the NLS cache for
|
|
// this process.
|
|
//
|
|
if ((rc = RtlInitializeCriticalSection(&gcsNlsProcessCache)) != ERROR_SUCCESS)
|
|
{
|
|
return (rc);
|
|
}
|
|
|
|
//
|
|
// Initialize the table pointers critical section.
|
|
// Enter the critical section to set up the tables.
|
|
//
|
|
if ((rc = RtlInitializeCriticalSectionAndSpinCount(&gcsTblPtrs, 4000)) != ERROR_SUCCESS)
|
|
{
|
|
return (rc);
|
|
}
|
|
RtlEnterCriticalSection(&gcsTblPtrs);
|
|
|
|
//
|
|
// Allocate initial tables.
|
|
//
|
|
if (rc = AllocTables())
|
|
{
|
|
KdPrint(("AllocTables failed, rc %lx\n", rc));
|
|
RtlLeaveCriticalSection(&gcsTblPtrs);
|
|
return (rc);
|
|
}
|
|
|
|
//
|
|
// Initialize the handles to the various registry keys to NULL.
|
|
//
|
|
hCodePageKey = NULL;
|
|
hLocaleKey = NULL;
|
|
hAltSortsKey = NULL;
|
|
hLangGroupsKey = NULL;
|
|
|
|
//
|
|
// Get the ANSI code page value.
|
|
// Create the hash node for the ACP.
|
|
// Insert the hash node into the global CP hash table.
|
|
//
|
|
// At this point, the ACP table has already been mapped into
|
|
// the process, so get the pointer from the PEB.
|
|
//
|
|
pBaseAddr = NtCurrentPeb()->AnsiCodePageData;
|
|
gAnsiCodePage = ((PCP_TABLE)(pBaseAddr + CP_HEADER))->CodePage;
|
|
if (rc = MakeCPHashNode( gAnsiCodePage,
|
|
pBaseAddr,
|
|
&gpACPHashN,
|
|
FALSE,
|
|
NULL ))
|
|
{
|
|
RtlLeaveCriticalSection(&gcsTblPtrs);
|
|
return (rc);
|
|
}
|
|
|
|
//
|
|
// Get the OEM code page value.
|
|
// Create the hash node for the OEMCP.
|
|
// Insert the hash node into the global CP hash table.
|
|
//
|
|
// At this point, the OEMCP table has already been mapped into
|
|
// the process, so get the pointer from the PEB.
|
|
//
|
|
pBaseAddr = NtCurrentPeb()->OemCodePageData;
|
|
gOemCodePage = ((PCP_TABLE)(pBaseAddr + CP_HEADER))->CodePage;
|
|
if (gOemCodePage != gAnsiCodePage)
|
|
{
|
|
//
|
|
// Oem code page is different than the Ansi code page, so
|
|
// need to create and store the new hash node.
|
|
//
|
|
if (rc = MakeCPHashNode( gOemCodePage,
|
|
pBaseAddr,
|
|
&gpOEMCPHashN,
|
|
FALSE,
|
|
NULL ))
|
|
{
|
|
RtlLeaveCriticalSection(&gcsTblPtrs);
|
|
return (rc);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
//
|
|
// Oem code page is the same as the Ansi code page, so set
|
|
// the oem cp hash node to be the same as the ansi cp hash node.
|
|
//
|
|
gpOEMCPHashN = gpACPHashN;
|
|
}
|
|
|
|
//
|
|
// Initialize the MAC code page values to 0.
|
|
// These values will be set the first time they are requested for use.
|
|
//
|
|
gMacCodePage = 0;
|
|
gpMACCPHashN = NULL;
|
|
|
|
//
|
|
// Open and Map a View of the Section for UNICODE.NLS.
|
|
// Save the pointers to the table information in the table ptrs
|
|
// structure.
|
|
//
|
|
if (rc = GetUnicodeFileInfo())
|
|
{
|
|
KdPrint(("GetUnicodeFileInfo failed, rc %lx\n", rc));
|
|
RtlLeaveCriticalSection(&gcsTblPtrs);
|
|
return (rc);
|
|
}
|
|
|
|
//
|
|
// Cache the system locale value.
|
|
//
|
|
rc = NtQueryDefaultLocale(FALSE, &gSystemLocale);
|
|
if (!NT_SUCCESS(rc))
|
|
{
|
|
RtlLeaveCriticalSection(&gcsTblPtrs);
|
|
return (rc);
|
|
}
|
|
|
|
//
|
|
// Store the user locale value.
|
|
//
|
|
UserLocale = pNlsUserInfo->UserLocaleId;
|
|
if (UserLocale == 0)
|
|
{
|
|
UserLocale = gSystemLocale;
|
|
}
|
|
|
|
//
|
|
// Initialize the system install language to zero. This will only
|
|
// be retrieved on an as need basis.
|
|
//
|
|
gSystemInstallLang = 0;
|
|
|
|
//
|
|
// Open and Map a View of the Section for LOCALE.NLS.
|
|
// Create and insert the hash node into the global Locale hash table
|
|
// for the system default locale.
|
|
//
|
|
if (rc = GetLocaleFileInfo( gSystemLocale,
|
|
&gpSysLocHashN,
|
|
TRUE ))
|
|
{
|
|
//
|
|
// Change the system locale to be the default (English).
|
|
//
|
|
if (GetLocaleFileInfo( MAKELCID(NLS_DEFAULT_LANGID, SORT_DEFAULT),
|
|
&gpSysLocHashN,
|
|
TRUE ))
|
|
{
|
|
KdPrint(("Couldn't do English\n"));
|
|
RtlLeaveCriticalSection(&gcsTblPtrs);
|
|
return (rc);
|
|
}
|
|
else
|
|
{
|
|
//
|
|
// Registry is corrupt, but allow the English default to
|
|
// work. Need to reset the system default.
|
|
//
|
|
gSystemLocale = MAKELCID(NLS_DEFAULT_LANGID, SORT_DEFAULT);
|
|
KdPrint(("NLSAPI: Registry is corrupt - Using Default Locale.\n"));
|
|
}
|
|
}
|
|
|
|
//
|
|
// If the user default locale is different from the system default
|
|
// locale, then create and insert the hash node into the global
|
|
// Locale hash table for the user default locale.
|
|
//
|
|
// NOTE: The System Default Locale Hash Node should be
|
|
// created before this call.
|
|
//
|
|
if (UserLocale != gSystemLocale)
|
|
{
|
|
if (rc = GetLocaleFileInfo( UserLocale,
|
|
&pUserLocHashN,
|
|
TRUE ))
|
|
{
|
|
//
|
|
// Change the user locale to be equal to the system default.
|
|
//
|
|
UserLocale = gSystemLocale;
|
|
KdPrint(("NLSAPI: Registry is corrupt - User Locale Now Equals System Locale.\n"));
|
|
}
|
|
}
|
|
|
|
//
|
|
// Create and insert the hash node into the global Locale hash
|
|
// table for the invariant locale.
|
|
//
|
|
if (rc = GetLocaleFileInfo( LOCALE_INVARIANT,
|
|
&gpInvLocHashN,
|
|
TRUE ))
|
|
{
|
|
KdPrint(("NLSAPI: Registry is corrupt - Invariant Locale Cannot Be Initialized.\n"));
|
|
}
|
|
|
|
//
|
|
// Open and Map a View of the Section for SORTKEY.NLS.
|
|
// Save the pointers to the semaphore dword and the default sortkey
|
|
// table in the table ptrs structure.
|
|
//
|
|
if (rc = GetDefaultSortkeyFileInfo())
|
|
{
|
|
KdPrint(("NLSAPI: Initialization, GetDefaultSortkeyFileInfo failed with rc %lx.\n", rc));
|
|
// RtlLeaveCriticalSection(&gcsTblPtrs);
|
|
// return (rc);
|
|
}
|
|
|
|
//
|
|
// Open and Map a View of the Section for SORTTBLS.NLS.
|
|
// Save the pointers to the sort table information in the
|
|
// table ptrs structure.
|
|
//
|
|
if (rc = GetDefaultSortTablesFileInfo())
|
|
{
|
|
RtlLeaveCriticalSection(&gcsTblPtrs);
|
|
return (rc);
|
|
}
|
|
|
|
//
|
|
// Get the language information portion of the system locale.
|
|
//
|
|
// NOTE: GetDefaultSortkeyFileInfo and GetDefaultSortTablesFileInfo
|
|
// should be called before this so that the default sorting
|
|
// tables are already initialized at the time of the call.
|
|
//
|
|
if (rc = GetLanguageFileInfo( gSystemLocale,
|
|
&gpSysLocHashN,
|
|
FALSE,
|
|
0 ))
|
|
{
|
|
RtlLeaveCriticalSection(&gcsTblPtrs);
|
|
return (rc);
|
|
}
|
|
|
|
//
|
|
// Get the language information portion of the invariant locale. We
|
|
// use the default locale (US English).
|
|
//
|
|
if (rc = GetLanguageFileInfo( MAKELCID(NLS_DEFAULT_LANGID, SORT_DEFAULT),
|
|
&gpInvLocHashN,
|
|
FALSE,
|
|
0 ))
|
|
{
|
|
RtlLeaveCriticalSection(&gcsTblPtrs);
|
|
return (rc);
|
|
}
|
|
|
|
//
|
|
// If the user default is different from the system default,
|
|
// get the language information portion of the user default locale.
|
|
//
|
|
// NOTE: GetDefaultSortkeyFileInfo and GetDefaultSortTablesFileInfo
|
|
// should be called before this so that the default sorting
|
|
// tables are already initialized at the time of the call.
|
|
//
|
|
if (gSystemLocale != UserLocale)
|
|
{
|
|
if (rc = MakeLangHashNode( UserLocale,
|
|
NULL,
|
|
&pUserLocHashN,
|
|
FALSE ))
|
|
{
|
|
RtlLeaveCriticalSection(&gcsTblPtrs);
|
|
return (rc);
|
|
}
|
|
}
|
|
|
|
//
|
|
// Initialize the Korean SMWeight values.
|
|
//
|
|
InitKoreanWeights();
|
|
|
|
//
|
|
// Leave the critical section.
|
|
//
|
|
RtlLeaveCriticalSection(&gcsTblPtrs);
|
|
|
|
//
|
|
// Return success.
|
|
//
|
|
return (NO_ERROR);
|
|
}
|
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////
|
|
//
|
|
// InitKoreanWeights
|
|
//
|
|
// Creates the SMWeight array with the IDEOGRAPH script member sorting
|
|
// before all other script members.
|
|
//
|
|
// NOTE: This function assumes we're in a critical section.
|
|
//
|
|
// 05-31-91 JulieB Created.
|
|
////////////////////////////////////////////////////////////////////////////
|
|
|
|
void InitKoreanWeights()
|
|
{
|
|
DWORD ctr; // loop counter
|
|
BYTE NewScript; // new script to store
|
|
LPBYTE pSMWeight = pTblPtrs->SMWeight; // ptr to script member weights
|
|
PMULTI_WT pMulti; // ptr to multi weight
|
|
|
|
|
|
//
|
|
// Set the 0 to FIRST_SCRIPT of script structure to its default
|
|
// value.
|
|
//
|
|
RtlZeroMemory(pSMWeight, NUM_SM);
|
|
for (ctr = 1; ctr < FIRST_SCRIPT; ctr++)
|
|
{
|
|
pSMWeight[ctr] = (BYTE)ctr;
|
|
}
|
|
|
|
//
|
|
// Save the order in the SMWeight array.
|
|
//
|
|
NewScript = FIRST_SCRIPT;
|
|
pSMWeight[IDEOGRAPH] = NewScript;
|
|
NewScript++;
|
|
|
|
//
|
|
// See if the script is part of a multiple weights script.
|
|
//
|
|
pMulti = pTblPtrs->pMultiWeight;
|
|
for (ctr = pTblPtrs->NumMultiWeight; ctr > 0; ctr--, pMulti++)
|
|
{
|
|
if (pMulti->FirstSM == IDEOGRAPH)
|
|
{
|
|
//
|
|
// Part of multiple weight, so must move entire range
|
|
// by setting each value in range to NewScript and
|
|
// then incrementing NewScript.
|
|
//
|
|
// NOTE: May use 'ctr' here since it ALWAYS breaks
|
|
// out of outer for loop.
|
|
//
|
|
for (ctr = 1; ctr < pMulti->NumSM; ctr++)
|
|
{
|
|
pSMWeight[IDEOGRAPH + ctr] = NewScript;
|
|
NewScript++;
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
|
|
//
|
|
// Must set each script member that has not yet been reset to its
|
|
// new order.
|
|
//
|
|
// The default ordering is to assign:
|
|
// Order = Script Member Value
|
|
//
|
|
// Therefore, can simply set each zero entry in order to the end
|
|
// of the array to the next 'NewScript' value.
|
|
//
|
|
for (ctr = FIRST_SCRIPT; ctr < NUM_SM; ctr++)
|
|
{
|
|
//
|
|
// If it's a zero value, set it to the next sorting order value.
|
|
//
|
|
if (pSMWeight[ctr] == 0)
|
|
{
|
|
pSMWeight[ctr] = NewScript;
|
|
NewScript++;
|
|
}
|
|
}
|
|
}
|