Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

test .zip archives #513

Draft
wants to merge 17 commits into
base: master
Choose a base branch
from
Draft

test .zip archives #513

wants to merge 17 commits into from

Conversation

rjbs
Copy link
Collaborator

@rjbs rjbs commented May 12, 2024

This is blocked by a new Module-Faker, which is kinda waiting on miyagawa/Archive-Any-Create#3

Also, this is really just one commit on top of #510

Also, this exposes that ->untar sets PERL_MAJOR_VERSION but zip archives never have it set. Other discrepancies may show up, too.

rjbs added 17 commits May 11, 2024 15:23
The previous method for checking this was generic, which is nice, but
sort of verbose to use.  Worse, though, I don't think it was reliable.
That code, ->file_updated_ok and ->file_not_updated_ok, worked by
keeping a cache of file stats -- but it didn't precompute those stats,
it computed them on demand.  So given this program:

  $pause = PAUSE::TestPause->new;

  do_stuff();
  my $r1 = $pause->test_reindex;
  do_other_stuff();
  $pause->file_updated_ok("A");
  my $r2 = $pause->test_reindex;
  do_more_stuff();
  my $r3 = $pause->test_reindex;

Calling `->file_updated_ok("A")` at the end would test since the
previous call.  Calling `->file_updated_ok("B")` at the end would test
starting from nothing.

In reality, we only use this method for tracking 02packages, so I've
added specific tracking of that file, with the check put onto the Result
object, considering only what changed in the `test_reindex` call that
created that Result.
...and add methods to check or print them.
(Specificaly: it is perl-like, not unauthorized real perl.)
That is: a new relase of perl-5, even if it contains a higher version of
some dual-life package, should not replace the old package in the index,
if it comes from a non-perl distribution.
This will not work until Module-Faker with chmod 0644-ing of files is
released.
@rjbs rjbs marked this pull request as draft May 12, 2024 01:27
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Labels
None yet
Projects
None yet
Development

Successfully merging this pull request may close these issues.

None yet

1 participant