mirror of
https://github.com/FirebirdSQL/firebird.git
synced 2025-02-01 02:43:02 +01:00
136 lines
4.2 KiB
C++
136 lines
4.2 KiB
C++
//____________________________________________________________
|
|
//
|
|
// PROGRAM: JRD Access Method
|
|
// MODULE: jrdmet.cpp
|
|
// DESCRIPTION: Non-database meta data for internal JRD stuff
|
|
//
|
|
// The contents of this file are subject to the Interbase 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.Inprise.com/IPL.html
|
|
//
|
|
// Software distributed under the License is distributed on an
|
|
// "AS IS" basis, 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 Inprise Corporation
|
|
// and its predecessors. Portions created by Inprise Corporation are
|
|
// Copyright (C) Inprise Corporation.
|
|
//
|
|
// All Rights Reserved.
|
|
// Contributor(s): ______________________________________.
|
|
// TMN (Mike Nordell) 11.APR.2001 - Reduce compiler warnings
|
|
// There however is still a bunch of constness errors in this file
|
|
//
|
|
//
|
|
//____________________________________________________________
|
|
//
|
|
// $Id: jrdmet.cpp,v 1.13 2003-11-08 16:31:39 brodsom Exp $
|
|
//
|
|
|
|
#include "firebird.h"
|
|
#include "../jrd/y_ref.h"
|
|
#include "../jrd/ibase.h"
|
|
#include "../jrd/common.h"
|
|
#include "../jrd/ods.h"
|
|
|
|
#include "../gpre/gpre.h"
|
|
#include "../jrd/constants.h"
|
|
#define GPRE
|
|
#include "../jrd/ini.h"
|
|
#undef GPRE
|
|
#include "../gpre/hsh_proto.h"
|
|
#include "../gpre/jrdme_proto.h"
|
|
#include "../gpre/msc_proto.h"
|
|
|
|
|
|
//____________________________________________________________
|
|
//
|
|
// Initialize in memory meta data.
|
|
//
|
|
|
|
void JRDMET_init( DBB db)
|
|
{
|
|
SYM symbol;
|
|
|
|
const UCHAR* relfld = relfields;
|
|
|
|
while (relfld[RFLD_R_NAME]) {
|
|
GPRE_REL relation = (GPRE_REL) MSC_alloc(REL_LEN);
|
|
relation->rel_database = db;
|
|
relation->rel_next = db->dbb_relations;
|
|
relation->rel_id = relfld[RFLD_R_ID];
|
|
db->dbb_relations = relation;
|
|
relation->rel_symbol = symbol = (SYM) MSC_alloc(SYM_LEN);
|
|
symbol->sym_type = SYM_relation;
|
|
symbol->sym_object = (GPRE_CTX) relation;
|
|
|
|
symbol->sym_string = names[relfld[RFLD_R_NAME]];
|
|
HSH_insert(symbol);
|
|
|
|
const UCHAR* fld = relfld + RFLD_RPT;
|
|
for (int n = 0; fld[RFLD_F_NAME]; ++n, fld += RFLD_F_LENGTH)
|
|
{
|
|
const gfld* gfield = (fld[RFLD_F_UPD_MINOR]) ?
|
|
&gfields[fld[RFLD_F_UPD_ID]] :
|
|
&gfields[fld[RFLD_F_ID]];
|
|
GPRE_FLD field = (GPRE_FLD) MSC_alloc(FLD_LEN);
|
|
relation->rel_fields = field;
|
|
field->fld_relation = relation;
|
|
field->fld_next = relation->rel_fields;
|
|
field->fld_id = n;
|
|
field->fld_length = gfield->gfld_length;
|
|
field->fld_dtype = gfield->gfld_dtype;
|
|
field->fld_sub_type = gfield->gfld_sub_type;
|
|
if (field->fld_dtype == dtype_varying ||
|
|
field->fld_dtype == dtype_text) {
|
|
field->fld_dtype = dtype_cstring;
|
|
field->fld_flags |= FLD_text;
|
|
++field->fld_length;
|
|
if (gfield->gfld_sub_type == dsc_text_type_metadata) {
|
|
field->fld_flags |= FLD_charset;
|
|
field->fld_charset_id = CS_METADATA;
|
|
field->fld_collate_id = COLLATE_NONE;
|
|
field->fld_ttype = ttype_metadata;
|
|
}
|
|
else {
|
|
field->fld_flags |= FLD_charset;
|
|
field->fld_charset_id = CS_NONE;
|
|
field->fld_collate_id = COLLATE_NONE;
|
|
field->fld_ttype = ttype_none;
|
|
}
|
|
}
|
|
else if (field->fld_dtype == dtype_blob) {
|
|
field->fld_dtype = dtype_blob;
|
|
field->fld_flags |= FLD_blob;
|
|
if (gfield->gfld_sub_type == BLOB_text)
|
|
field->fld_charset_id = CS_METADATA;
|
|
}
|
|
|
|
field->fld_symbol = symbol = (SYM) MSC_alloc(SYM_LEN);
|
|
symbol->sym_type = SYM_field;
|
|
symbol->sym_object = (GPRE_CTX) field;
|
|
symbol->sym_string = names[fld[RFLD_F_NAME]];
|
|
HSH_insert(symbol);
|
|
|
|
field->fld_global = symbol = (SYM) MSC_alloc(SYM_LEN);
|
|
symbol->sym_type = SYM_field;
|
|
symbol->sym_object = (GPRE_CTX) field;
|
|
symbol->sym_string = names[gfield->gfld_name];
|
|
}
|
|
relfld = fld + 1;
|
|
}
|
|
|
|
for (const RTYP* rtype = types; rtype->rtyp_name; rtype++) {
|
|
TYP type = (TYP) MSC_alloc(TYP_LEN);
|
|
type->typ_symbol = symbol = (SYM) MSC_alloc(SYM_LEN);
|
|
type->typ_value = rtype->rtyp_value;
|
|
symbol->sym_type = SYM_type;
|
|
symbol->sym_object = (GPRE_CTX) type;
|
|
symbol->sym_string = rtype->rtyp_name;
|
|
HSH_insert(symbol);
|
|
}
|
|
}
|
|
|