package Lufi::Command::copyFilesToSwift;
use Mojo::Base 'Mojolicious::Command';
use File::Spec;
use Term::ProgressBar;

has description => 'Copy files from filesystem to Swift object storage';
has usage       => sub { shift->extract_usage };

sub run {
    my $c = shift;

    if ($c->app->config('swift')) {
        $c->app->check_swift_container();
        my @dirs = glob(File::Spec->catdir($c->app->config('upload_dir'), '*'));

        unless (scalar(@dirs)) {
            say sprintf('The configured upload_dir (%s) seems to be empty. Is `upload_dir` configured in lufi.conf?', $c->app->config('upload_dir'));
            exit 1;
        }
        say sprintf('%d folders to upload to Swift (can\'t say how many files, or the total size, sorry). This can take some time.', scalar(@dirs));
        print 'Do you want to continue? [Y/n] ';
        my $confirm = <STDIN>;

        if ($confirm =~ m/yes|y/i) {
            my $progress = Term::ProgressBar->new({ count => scalar(@dirs), ETA => 'linear', name => 'Copying to Swift'});
            for my $dir (@dirs) {
                my @files = glob(File::Spec->catfile($dir, '*'));
                for my $file (@files) {
                    my ($volume, $directories, $filename) = File::Spec->splitpath($file);
                    my @file_dirs = File::Spec->splitdir($directories);
                    my $short     = ($file_dirs[-1] ne '') ? $file_dirs[-1] : $file_dirs[-2];
                    my $path      = File::Spec->catfile($short, $filename);

                    open my $fh, '<', $file or die sprintf('Unable to open file %s: %s', $file, $!);

                    $c->app->swift->put_object(
                        container_name => $c->app->config('swift')->{container},
                        object_name    => $path,
                        content_length => -s $file,
                        content        => $fh
                    );
                    close $fh;
                }
                $progress->update();
            }
            say sprintf('The copy to Swift object storage has ended. You can test Lufi, then delete `%s` directory', $c->app->config('upload_dir'));
        } else {
            say 'You want to stop. No problem.';
        }
    } else {
        say 'You didn\'t configure `swift` in your config file. Exiting.';
        exit 1;
    }
}

=encoding utf8

=head1 NAME

Lufi::Command::copyFilesToSwift Copy files from filesystem to Swift object storage

=head1 SYNOPSIS

  Usage: script/lufi copyFilesToSwift

  This command needs you to:
    - set `upload_dir` in your config file (otherwise, it will use the default path, `files` to copy files from)
    - configure `swift` with correct informations in your config file

=cut

1;