28 lines
963 B
Perl
Executable File
28 lines
963 B
Perl
Executable File
#!/usr/bin/perl
|
|
my $git_branch = `git rev-parse --abbrev-ref HEAD`;
|
|
my $git_commit_sha = `git rev-parse HEAD`;
|
|
my $main_branch = "main";
|
|
my $common_bucket = "badhouseplants-minio:/badhouseplants-net";
|
|
my $main_bucket = "badhouseplants-minio:/badhouseplants-net-main";
|
|
|
|
# --------------------------------------------------
|
|
# -- I'm doing all of it because I can't undestand
|
|
# -- how not to send 300Mb to the buildah context
|
|
# --------------------------------------------------
|
|
chop($git_branch);
|
|
chop($git_commit_sha);
|
|
|
|
print `cp -r . /tmp/$git_commit_sha` or die;
|
|
|
|
print "Getting the lfs data\n";
|
|
print `git -C /tmp/$git_commit_sha lfs pull` or die;
|
|
|
|
print "Creating a new hashed dir in the common bucket\n";
|
|
|
|
print `rclone copy /tmp/$git_commit_sha/static "$common_bucket/$git_commit_sha"` or die;
|
|
|
|
if ( $git_branch eq $main_branch) {
|
|
print "Syncing to the production bucket\n";
|
|
print `rclone sync "$common_bucket/$git_commit_sha" "$main_bucket/"` or die;
|
|
}
|