diff options
| author | Eric Wong <e@80x24.org> | 2021-03-27 11:45:51 +0000 |
|---|---|---|
| committer | Eric Wong <e@80x24.org> | 2021-03-27 20:21:07 +0000 |
| commit | aca6555ed4696ba1f24296a63afa7450a5afde2a (patch) | |
| tree | e8399eb412ee83e8adba71156346d1856f977e83 /t | |
| parent | 7c6aa5d7504c6bcc48cd45b9e9109a4e7fa16357 (diff) | |
| download | public-inbox-aca6555ed4696ba1f24296a63afa7450a5afde2a.tar.gz | |
This implements blob reconstruction via SolverGit, emulating the functionality of /$INBOX/$OID/s/ endpoint in PublicInbox::WWW. It uses the current working tree as a coderepo, and accepts any number of --git-dir=$PATH args. Remote externals are not yet supported. v2: use absolute path for git repos
Diffstat (limited to 't')
| -rw-r--r-- | t/lei-import.t | 2 | ||||
| -rw-r--r-- | t/solver_git.t | 14 |
2 files changed, 15 insertions, 1 deletions
diff --git a/t/lei-import.t b/t/lei-import.t index fa40ad01..33ce490d 100644 --- a/t/lei-import.t +++ b/t/lei-import.t @@ -54,6 +54,8 @@ is($res->[0]->{'m'}, 'x@y', 'got expected message'); is($res->[0]->{kw}, undef, 'Status ignored for eml'); lei_ok(qw(q -f mboxrd m:x@y)); unlike($lei_out, qr/^Status:/, 'no Status: in imported message'); +lei_ok('blob', $res->[0]->{blob}); +is($lei_out, "From: a\@b\nMessage-ID: <x\@y>\n", 'got blob back'); $eml->header_set('Message-ID', '<v@y>'); diff --git a/t/solver_git.t b/t/solver_git.t index 99ffb9e3..22714ae5 100644 --- a/t/solver_git.t +++ b/t/solver_git.t @@ -6,6 +6,7 @@ use v5.10.1; use PublicInbox::TestCommon; use Cwd qw(abs_path); require_git(2.6); +use Digest::SHA qw(sha1_hex); use PublicInbox::Spawn qw(popen_rd); require_mods(qw(DBD::SQLite Search::Xapian Plack::Util)); my $git_dir = xqx([qw(git rev-parse --git-dir)], undef, {2 => \(my $null)}); @@ -27,6 +28,18 @@ my $ibx = create_inbox 'v2', version => 2, }; my $v1_0_0_tag = 'cb7c42b1e15577ed2215356a2bf925aef59cdd8d'; my $v1_0_0_tag_short = substr($v1_0_0_tag, 0, 16); +my $expect = '69df7d565d49fbaaeb0a067910f03dc22cd52bd0'; + +test_lei({tmpdir => $tmpdir}, sub { + lei_ok('blob', '69df7d5', '-I', $ibx->{inboxdir}); + is(sha1_hex("blob ".length($lei_out)."\0".$lei_out), + $expect, 'blob contents output'); + + # fallbacks + lei_ok('blob', $v1_0_0_tag, '-I', $ibx->{inboxdir}); + lei_ok('blob', $v1_0_0_tag_short, '-I', $ibx->{inboxdir}); +}); + my $git = PublicInbox::Git->new($git_dir); $ibx->{-repo_objs} = [ $git ]; my $res; @@ -38,7 +51,6 @@ $solver->solve($psgi_env, $log, '69df7d5', {}); ok($res, 'solved a blob!'); my $wt_git = $res->[0]; is(ref($wt_git), 'PublicInbox::Git', 'got a git object for the blob'); -my $expect = '69df7d565d49fbaaeb0a067910f03dc22cd52bd0'; is($res->[1], $expect, 'resolved blob to unabbreviated identifier'); is($res->[2], 'blob', 'type specified'); is($res->[3], 4405, 'size returned'); |