From 23c0a8a13502201d01354e9262fa30c45d56ddd7 Mon Sep 17 00:00:00 2001 From: "mkanat%bugzilla.org" <> Date: Sat, 26 May 2007 01:18:03 +0000 Subject: Bug 381640: abstract_schema hook is broken--it prevents modification of the extension's own tables Patch By Max Kanat-Alexander r=LpSolit, a=mkanat --- Bugzilla/DB/Schema.pm | 32 ++++++++++++++++++-------------- 1 file changed, 18 insertions(+), 14 deletions(-) (limited to 'Bugzilla') diff --git a/Bugzilla/DB/Schema.pm b/Bugzilla/DB/Schema.pm index e9205ba0b..35e786c51 100644 --- a/Bugzilla/DB/Schema.pm +++ b/Bugzilla/DB/Schema.pm @@ -1331,22 +1331,26 @@ sub _initialize { my $self = shift; my $abstract_schema = shift; - $abstract_schema ||= ABSTRACT_SCHEMA; - - # Let extensions add tables, but make sure they can't modify existing - # tables. If we don't lock/unlock keys, lock_value complains. - lock_keys(%$abstract_schema); - lock_value(%$abstract_schema, $_) foreach (keys %$abstract_schema); - unlock_keys(%$abstract_schema); - Bugzilla::Hook::process('db_schema-abstract_schema', - { schema => $abstract_schema }); - unlock_hash(%$abstract_schema); + if (!$abstract_schema) { + # While ABSTRACT_SCHEMA cannot be modified, $abstract_schema can be. + # So, we dclone it to prevent anything from mucking with the constant. + $abstract_schema = dclone(ABSTRACT_SCHEMA); + + # Let extensions add tables, but make sure they can't modify existing + # tables. If we don't lock/unlock keys, lock_value complains. + lock_keys(%$abstract_schema); + foreach my $table (keys %{ABSTRACT_SCHEMA()}) { + lock_value(%$abstract_schema, $table) + if exists $abstract_schema->{$table}; + } + unlock_keys(%$abstract_schema); + Bugzilla::Hook::process('db_schema-abstract_schema', + { schema => $abstract_schema }); + unlock_hash(%$abstract_schema); + } $self->{schema} = dclone($abstract_schema); - # While ABSTRACT_SCHEMA cannot be modified, - # $self->{abstract_schema} can be. So, we dclone it to prevent - # anything from mucking with the constant. - $self->{abstract_schema} = dclone($abstract_schema); + $self->{abstract_schema} = $abstract_schema; return $self; -- cgit v1.2.3-24-g4f1b