mirror of
https://github.com/FirebirdSQL/firebird.git
synced 2025-01-30 19:23:03 +01:00
443 lines
12 KiB
C++
443 lines
12 KiB
C++
/*
|
|
* PROGRAM: JRD International support
|
|
* MODULE: IntlManager.cpp
|
|
* DESCRIPTION: INTL Manager
|
|
*
|
|
* The contents of this file are subject to the Initial
|
|
* Developer's Public License Version 1.0 (the "License");
|
|
* you may not use this file except in compliance with the
|
|
* License. You may obtain a copy of the License at
|
|
* http://www.ibphoenix.com/main.nfs?a=ibphoenix&page=ibp_idpl.
|
|
*
|
|
* Software distributed under the License is distributed AS IS,
|
|
* WITHOUT WARRANTY OF ANY KIND, either express or implied.
|
|
* See the License for the specific language governing rights
|
|
* and limitations under the License.
|
|
*
|
|
* The Original Code was created by Adriano dos Santos Fernandes
|
|
* for the Firebird Open Source RDBMS project.
|
|
*
|
|
* Copyright (c) 2004 Adriano dos Santos Fernandes <adrianosf@uol.com.br>
|
|
* and all contributors signed below.
|
|
*
|
|
* All Rights Reserved.
|
|
* Contributor(s): ______________________________________.
|
|
*/
|
|
|
|
#include "firebird.h"
|
|
#include "../jrd/IntlManager.h"
|
|
#include "../jrd/os/mod_loader.h"
|
|
#include "../jrd/intlobj_new.h"
|
|
#include "../jrd/intl_proto.h"
|
|
#include "../common/config/config.h"
|
|
#include "../common/classes/GenericMap.h"
|
|
#include "../common/classes/objects_array.h"
|
|
#include "../common/classes/fb_string.h"
|
|
#include "../common/classes/init.h"
|
|
|
|
#include "../config/ConfigFile.h"
|
|
#include "../config/ConfObj.h"
|
|
#include "../config/ConfObject.h"
|
|
#include "../config/Element.h"
|
|
#include "../config/ScanDir.h"
|
|
#include "../config/AdminException.h"
|
|
#include "../vulcan/JString.h"
|
|
|
|
|
|
namespace Jrd {
|
|
|
|
using namespace Firebird;
|
|
|
|
|
|
struct ExternalInfo
|
|
{
|
|
ExternalInfo(const PathName& a_moduleName, const string& a_name, const string& a_configInfo)
|
|
: moduleName(a_moduleName),
|
|
name(a_name),
|
|
configInfo(a_configInfo)
|
|
{
|
|
}
|
|
|
|
ExternalInfo(MemoryPool& p, const ExternalInfo& externalInfo)
|
|
: moduleName(p, externalInfo.moduleName),
|
|
name(p, externalInfo.name),
|
|
configInfo(p, externalInfo.configInfo)
|
|
{
|
|
}
|
|
|
|
ExternalInfo()
|
|
{
|
|
}
|
|
|
|
PathName moduleName;
|
|
string name;
|
|
string configInfo;
|
|
};
|
|
|
|
|
|
static Firebird::InitInstance<GenericMap<Pair<Left<PathName, ModuleLoader::Module*> > > > modules;
|
|
static Firebird::InitInstance<GenericMap<Pair<Full<string, ExternalInfo> > > > charSetCollations;
|
|
|
|
|
|
bool IntlManager::initialize()
|
|
{
|
|
bool ok = true;
|
|
ObjectsArray<string> conflicts;
|
|
string builtinConfig;
|
|
|
|
Firebird::PathName intlPath;
|
|
PathUtils::concatPath(intlPath, Config::getRootDirectory(), "intl");
|
|
|
|
ScanDir dir(intlPath.c_str(), "*.conf");
|
|
|
|
try
|
|
{
|
|
while (dir.next())
|
|
{
|
|
ConfigFile configFile(dir.getFilePath(), 0);
|
|
|
|
ConfObj builtinModule(configFile.findObject("intl_module", "builtin"));
|
|
string s = getConfigInfo(builtinModule);
|
|
if (s.hasData())
|
|
builtinConfig = s;
|
|
|
|
for (Element* el = configFile.objects->children; el; el = el->sibling)
|
|
{
|
|
if (el->name == "charset")
|
|
{
|
|
string charSetName = el->getAttributeName(0);
|
|
PathName filename;
|
|
string configInfo;
|
|
|
|
Element* module = el->findChild("intl_module");
|
|
if (module)
|
|
{
|
|
JString moduleName(module->getAttributeName(0));
|
|
ConfObj objModule(configFile.findObject("intl_module", moduleName));
|
|
filename = objModule->getValue("filename", "");
|
|
configInfo = getConfigInfo(objModule);
|
|
|
|
if (!modules().exist(filename))
|
|
{
|
|
ModuleLoader::Module* mod =
|
|
ModuleLoader::loadModule(filename);
|
|
if (!mod)
|
|
{
|
|
ModuleLoader::doctorModuleExtention(filename);
|
|
mod = ModuleLoader::loadModule(filename);
|
|
}
|
|
if (mod)
|
|
{
|
|
// Negotiate version
|
|
pfn_INTL_version versionFunction;
|
|
USHORT version;
|
|
|
|
if (mod->findSymbol(STRINGIZE(INTL_VERSION_ENTRYPOINT), versionFunction))
|
|
{
|
|
version = INTL_VERSION_2;
|
|
versionFunction(&version);
|
|
}
|
|
else
|
|
version = INTL_VERSION_1;
|
|
|
|
if (version != INTL_VERSION_1 && version != INTL_VERSION_2)
|
|
{
|
|
string err_msg;
|
|
err_msg.printf("INTL module '%s' is of incompatible version number %d",
|
|
filename.c_str(), version);
|
|
gds__log(err_msg.c_str());
|
|
ok = false;
|
|
}
|
|
else
|
|
modules().put(filename, mod);
|
|
}
|
|
else
|
|
{
|
|
gds__log((string("Can't load INTL module '") +
|
|
filename.c_str() + "'").c_str());
|
|
ok = false;
|
|
}
|
|
}
|
|
}
|
|
|
|
for (Element* el2 = el->children; el2; el2 = el2->sibling)
|
|
{
|
|
if (el2->name == "collation")
|
|
{
|
|
string collationName = (const char*)el2->getAttributeName(0);
|
|
string charSetCollation = charSetName + ":" + collationName;
|
|
const char* externalName = (const char*)el2->getAttributeName(1);
|
|
|
|
if (!registerCharSetCollation(charSetCollation, filename,
|
|
(externalName ? externalName : collationName), configInfo))
|
|
{
|
|
conflicts.add(charSetCollation);
|
|
ok = false;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
catch (AdminException& ex)
|
|
{
|
|
gds__log((string("Error in INTL plugin config file '") + dir.getFilePath() + "': " + ex.getText()).c_str());
|
|
ok = false;
|
|
}
|
|
|
|
//// TODO: intlnames.h
|
|
registerCharSetCollation("NONE:NONE", "", "NONE", builtinConfig);
|
|
registerCharSetCollation("OCTETS:OCTETS", "", "OCTETS", builtinConfig);
|
|
registerCharSetCollation("ASCII:ASCII", "", "ASCII", builtinConfig);
|
|
registerCharSetCollation("UNICODE_FSS:UNICODE_FSS", "", "UNICODE_FSS", builtinConfig);
|
|
registerCharSetCollation("UTF8:UTF8", "", "UTF8", builtinConfig);
|
|
registerCharSetCollation("UTF8:UCS_BASIC", "", "UCS_BASIC", builtinConfig);
|
|
registerCharSetCollation("UTF8:UNICODE", "", "UNICODE", builtinConfig);
|
|
|
|
registerCharSetCollation("UTF16:UTF16", "", "UTF16", builtinConfig);
|
|
#ifdef FB_NEW_INTL_ALLOW_NOT_READY
|
|
registerCharSetCollation("UTF16:UCS_BASIC", "", "UCS_BASIC", builtinConfig);
|
|
registerCharSetCollation("UTF32:UTF32", "", "UTF32", builtinConfig);
|
|
registerCharSetCollation("UTF32:UCS_BASIC", "", "UCS_BASIC", builtinConfig);
|
|
#endif
|
|
|
|
for (ObjectsArray<string>::const_iterator name(conflicts.begin()); name != conflicts.end(); ++name)
|
|
charSetCollations().remove(*name);
|
|
|
|
return ok;
|
|
}
|
|
|
|
|
|
bool IntlManager::collationInstalled(const Firebird::string& collationName,
|
|
const Firebird::string& charSetName)
|
|
{
|
|
return charSetCollations().exist(charSetName + ":" + collationName);
|
|
}
|
|
|
|
|
|
bool IntlManager::lookupCharSet(const Firebird::string& charSetName, charset* cs)
|
|
{
|
|
ExternalInfo externalInfo;
|
|
|
|
if (charSetCollations().get(charSetName + ":" + charSetName, externalInfo))
|
|
{
|
|
pfn_INTL_lookup_charset lookupFunction = NULL;
|
|
|
|
if (externalInfo.moduleName.isEmpty())
|
|
lookupFunction = INTL_builtin_lookup_charset;
|
|
else
|
|
{
|
|
ModuleLoader::Module* module;
|
|
|
|
if (modules().get(externalInfo.moduleName, module) && module)
|
|
module->findSymbol(STRINGIZE(CHARSET_ENTRYPOINT), lookupFunction);
|
|
}
|
|
|
|
if (lookupFunction && (*lookupFunction)(cs, externalInfo.name.c_str(),
|
|
externalInfo.configInfo.c_str()))
|
|
{
|
|
return validateCharSet(charSetName, cs);
|
|
}
|
|
}
|
|
|
|
return false;
|
|
}
|
|
|
|
|
|
bool IntlManager::lookupCollation(const Firebird::string& collationName,
|
|
const Firebird::string& charSetName,
|
|
USHORT attributes, const UCHAR* specificAttributes,
|
|
ULONG specificAttributesLen, bool ignoreAttributes,
|
|
texttype* tt)
|
|
{
|
|
ExternalInfo charSetExternalInfo;
|
|
ExternalInfo collationExternalInfo;
|
|
|
|
if (charSetCollations().get(charSetName + ":" + charSetName, charSetExternalInfo) &&
|
|
charSetCollations().get(charSetName + ":" + collationName, collationExternalInfo))
|
|
{
|
|
pfn_INTL_lookup_texttype lookupFunction = NULL;
|
|
|
|
if (collationExternalInfo.moduleName.isEmpty())
|
|
lookupFunction = INTL_builtin_lookup_texttype;
|
|
else
|
|
{
|
|
ModuleLoader::Module* module;
|
|
|
|
if (modules().get(collationExternalInfo.moduleName, module) && module)
|
|
module->findSymbol(STRINGIZE(TEXTTYPE_ENTRYPOINT), lookupFunction);
|
|
}
|
|
|
|
if (lookupFunction &&
|
|
(*lookupFunction)(tt, collationExternalInfo.name.c_str(), charSetExternalInfo.name.c_str(),
|
|
attributes, specificAttributes, specificAttributesLen, ignoreAttributes,
|
|
collationExternalInfo.configInfo.c_str()))
|
|
{
|
|
return true;
|
|
}
|
|
}
|
|
|
|
return false;
|
|
}
|
|
|
|
|
|
bool IntlManager::setupCollationAttributes(
|
|
const Firebird::string& collationName, const Firebird::string& charSetName,
|
|
const Firebird::string& specificAttributes, Firebird::string& newSpecificAttributes)
|
|
{
|
|
ExternalInfo charSetExternalInfo;
|
|
ExternalInfo collationExternalInfo;
|
|
|
|
newSpecificAttributes = specificAttributes;
|
|
|
|
if (charSetCollations().get(charSetName + ":" + charSetName, charSetExternalInfo) &&
|
|
charSetCollations().get(charSetName + ":" + collationName, collationExternalInfo))
|
|
{
|
|
pfn_INTL_setup_attributes attributesFunction = NULL;
|
|
|
|
if (collationExternalInfo.moduleName.isEmpty())
|
|
attributesFunction = INTL_builtin_setup_attributes;
|
|
else
|
|
{
|
|
ModuleLoader::Module* module;
|
|
|
|
if (modules().get(collationExternalInfo.moduleName, module) && module)
|
|
module->findSymbol(STRINGIZE(INTL_SETUP_ATTRIBUTES_ENTRYPOINT), attributesFunction);
|
|
}
|
|
|
|
if (attributesFunction)
|
|
{
|
|
HalfStaticArray<UCHAR, BUFFER_MEDIUM> buffer;
|
|
|
|
// first try with the static buffer
|
|
ULONG len = (*attributesFunction)(collationExternalInfo.name.c_str(),
|
|
charSetExternalInfo.name.c_str(), collationExternalInfo.configInfo.c_str(),
|
|
specificAttributes.length(), (const UCHAR*) specificAttributes.begin(),
|
|
buffer.getCapacity(), buffer.begin());
|
|
|
|
if (len == INTL_BAD_STR_LENGTH)
|
|
{
|
|
// ask the right buffer size
|
|
len = (*attributesFunction)(collationExternalInfo.name.c_str(),
|
|
charSetExternalInfo.name.c_str(), collationExternalInfo.configInfo.c_str(),
|
|
specificAttributes.length(), (const UCHAR*) specificAttributes.begin(),
|
|
0, NULL);
|
|
|
|
if (len != INTL_BAD_STR_LENGTH)
|
|
{
|
|
// try again
|
|
len = (*attributesFunction)(collationExternalInfo.name.c_str(),
|
|
charSetExternalInfo.name.c_str(), collationExternalInfo.configInfo.c_str(),
|
|
specificAttributes.length(), (const UCHAR*) specificAttributes.begin(),
|
|
len, buffer.getBuffer(len));
|
|
}
|
|
}
|
|
|
|
if (len != INTL_BAD_STR_LENGTH)
|
|
newSpecificAttributes = string((const char*) buffer.begin(), len);
|
|
else
|
|
return false;
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
return false;
|
|
}
|
|
|
|
|
|
Firebird::string IntlManager::getConfigInfo(const ConfObj& confObj)
|
|
{
|
|
if (!confObj.hasObject())
|
|
return "";
|
|
|
|
string configInfo;
|
|
|
|
for (const Element* el = confObj->object->children; el; el = el->sibling)
|
|
{
|
|
string values;
|
|
|
|
for (int i = 0; el->getAttributeName(i); ++i)
|
|
{
|
|
if (i > 0)
|
|
values.append(" ");
|
|
|
|
values.append(el->getAttributeName(i));
|
|
}
|
|
|
|
if (configInfo.hasData())
|
|
configInfo.append(";");
|
|
configInfo.append(string(el->name.c_str()) + "=" + values);
|
|
}
|
|
|
|
return configInfo;
|
|
}
|
|
|
|
|
|
bool IntlManager::registerCharSetCollation(const Firebird::string& name, const Firebird::PathName& filename,
|
|
const Firebird::string& externalName, const Firebird::string& configInfo
|
|
)
|
|
{
|
|
ExternalInfo conflict;
|
|
|
|
if (charSetCollations().get(name, conflict))
|
|
{
|
|
gds__log((string("INTL plugin conflict: ") + name + " defined in " +
|
|
(conflict.moduleName.isEmpty() ? "<builtin>" : conflict.moduleName.c_str()) +
|
|
" and " + filename.c_str()).c_str());
|
|
return false;
|
|
}
|
|
|
|
charSetCollations().put(name, ExternalInfo(filename, externalName, configInfo));
|
|
return true;
|
|
}
|
|
|
|
|
|
bool IntlManager::validateCharSet(const Firebird::string& charSetName, charset* cs)
|
|
{
|
|
bool valid = true;
|
|
string s;
|
|
|
|
string unsupportedMsg;
|
|
unsupportedMsg.printf("Unsupported character set %s.", charSetName.c_str());
|
|
|
|
if (!(cs->charset_flags & CHARSET_ASCII_BASED))
|
|
{
|
|
valid = false;
|
|
s.printf("%s. Only ASCII-based character sets are supported yet.",
|
|
unsupportedMsg.c_str());
|
|
gds__log(s.c_str());
|
|
}
|
|
|
|
if (cs->charset_min_bytes_per_char != 1)
|
|
{
|
|
valid = false;
|
|
s.printf("%s. Wide character sets are not supported yet.",
|
|
unsupportedMsg.c_str());
|
|
gds__log(s.c_str());
|
|
}
|
|
|
|
/***
|
|
if (cs->charset_space_length != 1 || *cs->charset_space_character != ' ')
|
|
{
|
|
valid = false;
|
|
s.printf("%s. Only ASCII space is supported in charset_space_character yet.",
|
|
unsupportedMsg.c_str());
|
|
gds__log(s.c_str());
|
|
}
|
|
***/
|
|
if (cs->charset_space_length != 1)
|
|
{
|
|
valid = false;
|
|
s.printf("%s. Wide space is not supported yet.",
|
|
unsupportedMsg.c_str());
|
|
gds__log(s.c_str());
|
|
}
|
|
|
|
return valid;
|
|
}
|
|
|
|
|
|
} // namespace Jrd
|