The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
 / 
Test-Smoke-1.82
River stage zero No dependents
5 ++
/ Test::Smoke::App::RepostFromArchive

NAME

Test::Smoke::App::RepostFromArchive - The tsrepostjsn.pl application.

SYNOPSIS

Interactive:

   $ tsrepostjsn.pl -c smokecurrent
    Show the last 10 reports:
      1 jsn7a29e8d2c80588346422b4b6b936e6f8b56a3af4.jsn (2022-09-04 05:16:49 +0200)
      2 jsn69bc7167fa24b1e8d3f810ce465d84bdddf413f6.jsn (2022-09-03 05:15:11 +0200)
      3 jsncd55125d69f5f698ef7cbdd650cda7d2e59fc388.jsn (2022-09-02 05:14:42 +0200)
      4 jsn0c33882a943825845dde164b60900bf224b131cc.jsn (2022-09-01 05:15:05 +0200)
      5 jsnb885e42dc2078e29df142cfcefaa86725199d15b.jsn (2022-08-31 05:15:16 +0200)
      6 jsne772cf349a3609ba583f441d10e1e92c5e338377.jsn (2022-08-30 05:15:01 +0200)
      7 jsnf603e191e0bea582034a16f05909a56bcc05a564.jsn (2022-08-29 05:15:14 +0200)
      8 jsn51634b463845a03d4f22b9d23f6c5e2fb98af9c8.jsn (2022-08-28 05:15:47 +0200)
      9 jsn305697f3995f7ddfba2e200c5deb2e274e1136c0.jsn (2022-08-27 05:15:34 +0200)
     10 jsn18fa8a6f818cbe2838cfe9b1bfa0c5d9c311930c.jsn (2022-08-26 05:15:41 +0200)
   Type the numbers (with white space inbetween): 1 2 3

Or direct:

    $ tsrepostjsn.pl -c smokecurrent --sha 7a29e8d2c8058 --sha 69bc7167fa2 --sha cd55125d69f5f698ef7cbdd6

OPTIONS

  --max-reports <cnt>     Number of reports to choose from (10)

  --sha <commit-sha>      Commit SHA for the smoke (repeat for more reports)

  --jsonreport <filename> The actual json-file to re-post

Override the config:

  --adir <dir>         Archive directory
  --smokedb_url <url>  Where to POST to for CoreSmokeDB
  --poster <poster>    Use another poster

DESCRIPTION

Test::Smoke::App::RepostFromArchive->new()

Creates a new attribute poster of class Test::Smoke::Poster.

$reposter->run()

Get a list of jsn<commit-sha>.jsn filenames from the adir archive directory an try to send them to the report server at smokedb_url again.

$reposter->pick_reports()

First checks for reports passed on the command line with --sha <commit-sha>. If none were passed it fetches the latest reports --max-reports from the archive directory adir and lets you pick 1 or more.

Returns

A list of filenames representing the json files from the archive.

COPYRIGHT

© 2002-2022, Abe Timmerman <abeltje@cpan.org> All rights reserved.

With contributions from Jarkko Hietaniemi, Merijn Brand, Campo Weijerman, Alan Burlison, Allen Smith, Alain Barbet, Dominic Dunlop, Rich Rauenzahn, David Cantrell.

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

See:

This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.