The version of Apache log4j used by SoundHelix.

[[ 🗃 ^aEp6o apache-log4j ]] :: [📥 Inbox] [📤 Outbox] [🐤 Followers] [🤝 Collaborators] [🛠 Commits]

Clone

HTTPS: git clone https://vervis.peers.community/repos/aEp6o

SSH: git clone USERNAME@vervis.peers.community:aEp6o

Branches

Tags

v1_2_1 :: src / java / org / apache / log4j / test /

drfa.pl


$|=1;

while($next = <test.*>) {

  print "Reading $next\n";
  check($next);  
}

print "Reading test\n";
checkResidual();

sub checkResidual() {
  open(F, "test");
  
  while(<F>) {
    if($_ =~ /(.*) \d\d:/) {
      $p = $1;
    } else {
      die "In [test] unexpected line: [$_]\n";
    }
    
    if($old && $old != $p) {
      die "Mismatch in [test] unexpected line: [$_]\n";
    } else {
      print "  $_";
    }
    $old = $p;
  }
}

sub check() {
  my ($filename)  = @_;
  
  open(F, $filename);
  $_ = $filename;
  $p = s/test.//;
  while(<F>) {
    if($_ =~ /$p/) {
      print "  $_";
    } else {
      die "In [$filename] unexpected line: [$_]\n";
    }
  }
}
[See repo JSON]