From 55e5f706991e787a1e8682f3daa31ed47ea11be6 Mon Sep 17 00:00:00 2001
From: "lpsolit%gmail.com" <>
Date: Wed, 22 Oct 2008 04:28:47 +0000
Subject: Bug 460922: [Oracle] Need to drop all the FKs before dropping tables
 - Patch by Xiaoou <xiaoou.wu@oracle.com> r/a=mkanat

---
 Bugzilla/DB/Oracle.pm | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)

(limited to 'Bugzilla')

diff --git a/Bugzilla/DB/Oracle.pm b/Bugzilla/DB/Oracle.pm
index 9399bf225..c8195d4a7 100644
--- a/Bugzilla/DB/Oracle.pm
+++ b/Bugzilla/DB/Oracle.pm
@@ -208,6 +208,24 @@ sub sql_in {
     return "( " . join(" OR ", @in_str) . " )";
 }
 
+sub bz_drop_table {
+     my ($self, $name) = @_;
+     my $table_exists = $self->bz_table_info($name);
+     if ($table_exists) {
+         $self->_bz_drop_fks($name);
+         $self->SUPER::bz_drop_table($name);
+     }
+}
+
+# Dropping all FKs for a specified table. 
+sub _bz_drop_fks {
+    my ($self, $table) = @_;
+    my @columns = $self->_bz_real_schema->get_table_columns($table);
+    foreach my $column (@columns) {
+        $self->bz_drop_fk($table, $column);
+    }
+}
+
 sub _fix_empty {
     my ($string) = @_;
     $string = '' if $string eq EMPTY_STRING;
-- 
cgit v1.2.3-24-g4f1b