- add ldp filtering

lib/SLUB/LZA/TA/Archivematica/Elasticsearch/PrepareQuery.pm

@@ -51,6 +51,27 @@ sub prepare_aip_query ($opt) {
             }
         }
     }
+    if (exists $opt->{only_ldp_saxon}) {
+        push @must, {
+            "match_phrase" => {
+                "transferMetadata.bim:bag-info_dict.bim:LDP-funder.keyword" => 'LDP: Sachsen'
+            }
+        }
+    }
+    if (exists $opt->{only_ldp}) {
+        push @must, {
+            "exists" => {
+                field => "transferMetadata.bim:bag-info_dict.bim:LDP-funder"
+            }
+        }
+    }
+    if (exists $opt->{no_ldp}) {
+        push @must_not, {
+            "exists" => {
+                field => "transferMetadata.bim:bag-info_dict.bim:LDP-funder"
+            }
+        }
+    }
     if (exists $opt->{descriptive}) {
         #https://opster.com/guides/elasticsearch/search-apis/elasticsearch-match-multi-match-and-match-phrase-queries/#Multi-match-query
         push @should, {

lib/SLUB/LZA/TA/Command/search.pm

@@ -76,6 +76,12 @@ sub opt_spec {
                 [ 'only-new|only-first-ingest', 'only if AIP is first ingest' ],
         ] } ],
         [ 'workflow|w=s' => 'LZA internal workflow name'],
+        [ 'ldpmode' => hidden => {
+            one_of => [
+                [ 'only-ldp-saxon', 'only if AIP is LDP Saxon funded' ],
+                [ 'only-ldp', 'only if AIP is LDP funded' ],
+                [ 'no-ldp', 'only if AIP is not LDP funded' ],
+            ] } ],
         [],
         [ 'with-creationdate' => 'also returns AIP creation date' ],
         [ 'with-external-description' => 'also returns AIP external-description'],