From 1a8eb0a43c68e64b77fdd3c4ebd977a1ab88e71b Mon Sep 17 00:00:00 2001 From: Eric Wong Date: Fri, 23 Jun 2017 20:23:07 +0000 Subject: allow admins to configure non-obfuscated addresses/domains We will also treat all known list addresses as non-obfuscated. By setting publicinbox.noObfuscate in ~/.public-inbox/config, this will allow users to disable address obfuscation on a per-domain or per-address basis. --- t/config.t | 28 ++++++++++++++++++++++++++++ 1 file changed, 28 insertions(+) (limited to 't/config.t') diff --git a/t/config.t b/t/config.t index 437f1d14..353dac69 100644 --- a/t/config.t +++ b/t/config.t @@ -86,4 +86,32 @@ my $tmpdir = tempdir('pi-config-XXXXXX', TMPDIR => 1, CLEANUP => 1); is($ibx->{nntpserver}, 'news.alt.example.com','per-inbox NNTP server'); } +# no obfuscate domains +{ + my $pfx = "publicinbox.test"; + my $pfx2 = "publicinbox.foo"; + my %h = ( + "$pfx.address" => 'test@example.com', + "$pfx.mainrepo" => '/path/to/non/existent', + "$pfx2.address" => 'foo@example.com', + "$pfx2.mainrepo" => '/path/to/foo', + lc("publicinbox.noObfuscate") => + 'public-inbox.org @example.com z@EXAMPLE.com', + "$pfx.obfuscate" => 'true', # :< + ); + my %tmp = %h; + my $cfg = PublicInbox::Config->new(\%tmp); + my $ibx = $cfg->lookup_name('test'); + my $re = $ibx->{-no_obfuscate_re}; + like('meta@public-inbox.org', $re, + 'public-inbox.org address not to be obfuscated'); + like('t@example.com', $re, 'example.com address not to be obfuscated'); + unlike('t@example.comM', $re, 'example.comM address does not match'); + is_deeply($ibx->{-no_obfuscate}, { + 'test@example.com' => 1, + 'foo@example.com' => 1, + 'z@example.com' => 1, + }, 'known addresses populated'); +} + done_testing(); -- cgit v1.2.3-24-ge0c7