grahamc/hydra2 - Change SAIUFDP3EFXENSB3XS4OKXNOTGLCYGPW3QNHCXASXBDEEDGYRWUAC

hydra: make sure viewing logs works when logs are bz2'd

Created by Rob Vermaas on August 10, 2010

SAIUFDP3EFXENSB3XS4OKXNOTGLCYGPW3QNHCXASXBDEEDGYRWUAC

Dependencies

In channels

main

Change contents

Insertion in src/lib/Hydra/Controller/Build.pm at line 108 [5.1]
[4.334]
[5.1997]
```
    my $fallbackpath = -f $path ? $path : "$path.bz2";
```

Replacement in src/lib/Hydra/Controller/Build.pm at line 111 [5.1]

B:BD[5.1998] → [6.0:70]

    notFound($c, "Log file $path no longer exists.") unless -f $path;

[5.1998]

[3.198]

    notFound($c, "Log file $path no longer exists.") unless -f $fallbackpath;
    $path = $fallbackpath;
    my $pipestart = ($path =~ /.bz2$/ ? "cat $path | bzip2 -d" : "cat $path") ;

Replacement in src/lib/Hydra/Controller/Build.pm at line 118 [5.1]

B:BD[4.384] → [4.384:465]

        my $pipeline = ($path =~ /.bz2$/ ? "cat $path | bzip2 -d" : "cat $path")

[4.384]

[4.465]

        my $pipeline = $pipestart

Replacement in src/lib/Hydra/Controller/Build.pm at line 127 [5.1]

B:BD[4.759] → [4.759:797]

        $c->serve_static_file($path);

[4.759]

[4.797]

        $c->stash->{'plain'} = { data => (scalar `$pipestart`) || " " };
        $c->forward('Hydra::View::Plain');

Replacement in src/lib/Hydra/Controller/Build.pm at line 132 [5.1]

B:BD[7.49] → [2.0:79]

        $c->stash->{'plain'} = { data => (scalar `tail -n 50 $path`) || " " };

[7.49]

[7.119]

        $c->stash->{'plain'} = { data => (scalar `$pipestart | tail -n 50`) || " " };