Attachment 162939 Details for Bug 33268 – Bug 33268: If rules exists add rules to preserve current behavior

[patch] Bug 33268: If rules exists add rules to preserve current behavior

Bug-33268-If-rules-exists-add-rules-to-preserve-cu.patch (text/plain), 2.24 KB, created by Victor Grousset/tuxayo on 2024-03-08 04:06:08 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: Victor Grousset/tuxayo

Created: 2024-03-08 04:06:08 UTC

Size: 2.24 KB

patch

obsolete

>From 2e00311986a98c618c4b822b88f68e03d2558743 Mon Sep 17 00:00:00 2001
>From: David Gustafsson <david.gustafsson@ub.gu.se>
>Date: Tue, 5 Mar 2024 16:47:29 +0100
>Subject: [PATCH] Bug 33268: If rules exists add rules to preserve current
> behavior
>
>Signed-off-by: Victor Grousset/tuxayo <victor@tuxayo.net>
>---
> ...preserve_current_overlay_rules_behavior.pl | 32 +++++++++++++++++++
> 1 file changed, 32 insertions(+)
> create mode 100755 installer/data/mysql/atomicupdate/bug_33268-add_rules_to_preserve_current_overlay_rules_behavior.pl
>
>diff --git a/installer/data/mysql/atomicupdate/bug_33268-add_rules_to_preserve_current_overlay_rules_behavior.pl b/installer/data/mysql/atomicupdate/bug_33268-add_rules_to_preserve_current_overlay_rules_behavior.pl
>new file mode 100755
>index 0000000000..88d4a9e334
>--- /dev/null
>+++ b/installer/data/mysql/atomicupdate/bug_33268-add_rules_to_preserve_current_overlay_rules_behavior.pl
>@@ -0,0 +1,32 @@
>+use Modern::Perl;
>+
>+return {
>+    bug_number  => "33268",
>+    description => "Add rules to preserve current marc record overlay rules behavior",
>+    up          => sub {
>+        my ($args) = @_;
>+        my ( $dbh, $out ) = @$args{qw(dbh out)};
>+
>+        # Insert filter wildcard rules equivalent to the default
>+        # fallback rule (overwrite) if wildcard rules exists for a module
>+        # and other tag wildcard rule not already defined for said module
>+
>+        my $query = q{
>+            SELECT DISTINCT `module`, `filter` FROM `marc_overlay_rules`
>+            WHERE
>+                `filter` <> "*" AND
>+                `module` IN (SELECT `module` FROM `marc_overlay_rules` WHERE `filter` = "*") AND
>+                `filter` NOT IN (SELECT `filter` FROM `marc_overlay_rules` WHERE `tag` = "*")
>+        };
>+        my @results = $dbh->selectall_array( $query );
>+        for my $result ( @results ) {
>+            my ($module, $filter) = @{$result};
>+            $query = q{
>+                INSERT INTO `marc_overlay_rules`(`tag`, `module`, `filter`, `add`, `append`, `remove`, `delete`)
>+                VALUES(?, ?, ?, ?, ?, ?, ?)
>+            };
>+            $dbh->do($query, undef, '*', $module, $filter, 1, 1, 1, 1);
>+        }
>+        say $out "Added record overlay rules to preserve current behavior";
>+    },
>+};
>-- 
>2.44.0

Actions: View | Diff | Splinter Review

Attachments on bug 33268: 158956 | 159004 | 159058 | 159160 | 159161 | 159518 | 159519 | 160017 | 160018 | 162764 | 162766 | 162767 | 162785 | 162786 | 162796 | 162797 | 162798 | 162799 | 162800 | 162801 | 162802 | 162803 | 162804 | 162805 | 162936 | 162937 | 162938 | 162939 | 162940