view: implement optional address obfuscation

This is lightly-tested and seems to work.  I'm still
hesitant to support this, but the alternative of receiving death
threats for displaying unobfuscated addresses seems to
be not worth it.

1 files changed, 11 insertions, 0 deletions

diff --git a/lib/PublicInbox/Config.pm b/lib/PublicInbox/Config.pm
index 323f8a1a..0597a527 100644
--- a/lib/PublicInbox/Config.pm
+++ b/lib/PublicInbox/Config.pm
@@ -140,6 +140,17 @@ sub _fill {
                 my $v = $self->{"$pfx.$k"};
                 $rv->{$k} = $v if defined $v;
         }
+        foreach my $k (qw(obfuscate)) {
+                my $v = $self->{"$pfx.$k"};
+                defined $v or next;
+                if ($v =~ /\A(?:false|no|off|0)\z/) {
+                        $rv->{$k} = 0;
+                } elsif ($v =~ /\A(?:true|yes|on|1)\z/) {
+                        $rv->{$k} = 1;
+                } else {
+                        warn "Ignoring $pfx.$k=$v in config, not boolean\n";
+                }
+        }
 
         # TODO: more arrays, we should support multi-value for
         # more things to encourage decentralization