1st

save-add-deduplicate.sh

@@ -0,0 +1,41 @@
+#!/usr/bin/perl -p
+# combine ipset save files setting max per a flat file of ipset per row in the form NAME MAX
+#
+#(c)2026 Corwin Brust <corwin@bru.st>
+# You may use this program under the terms of the GNU Public License version three (3) or, at your option, any later version of that license. (GPLv3+)
+#
+# Input is expected on stdin in the same format as output by ipset save
+#
+
+BEGIN {
+    my $SET_COUNTS = @ARGV
+	           ? shift
+		   : q(max-counts.txt);
+
+    open my$FH,q(<),$SET_COUNTS
+	or die $!;
+
+    while(<$FH>) {
+	chomp;
+	my($k,$v)=split;
+	$m{$k}=$v if $k and $v
+    }
+}
+
+if(/^create (\S+)/) {
+	if(exists $h{$1}) {
+		$_ = '';
+	} elsif(exists $m{$1}) {
+		$h{$1} = $1;
+		$n = $m{$1};
+		s/^(create (\S+).*?hashsize) \d+ (.*)$/$1 $n $3/
+	}
+	else {
+		$_ = ''; # skip create when no max defined
+	}
+}
+elsif(/^add (\S+)/)
+{
+	$_ = '' unless exists $m{$1};
+}
+