# frozen_string_literal: true

require "spec_helper"

describe BagIt::Bag do
  describe "BagIt Manifests" do
    before do
      @sandbox = Sandbox.new

      # make the bag
      @bag_path = File.join @sandbox.to_s, "the_bag"
      @bag = described_class.new @bag_path

      # add some files
      File.open("/dev/urandom") do |rio|
        10.times do |n|
          @bag.add_file("file-#{n}-💩
") { |io| io.write rio.read(16) }
          @bag.add_tag_file("tag-#{n}") { |io| io.write rio.read(16) }
        end
      end
    end

    after do
      @sandbox.cleanup!
    end

    shared_examples_for "a manifest file" do
      before do
        pattern = File.join @bag_path, "*manifest-*.txt"
        @manifest_files = Dir.glob pattern
      end

      it "has a valid algorithm in the name (at least md5 or sha1)" do
        algorithms = @manifest_files.map { |mf|
          mf =~ /manifest-(.*).txt$/
          Regexp.last_match(1)
        }
        algorithms.each { |a| expect(a).to be_in("md5", "sha1") }
      end

      it "is not an empty file" do
        @manifest_files.each { |mf| expect(File.size(mf)).not_to eq(0) }
      end

      it "only contains lines of the format CHECKSUM FILENAME" do
        @manifest_files.each do |file|
          File.open(file) do |io|
            io.each_line { |line| expect(line).to match(/^[a-fA-F0-9]+\s+[^\s].+$/) }
          end
        end
      end

      it "validates after adding a file and remanifesting" do
        @bag.add_file("newfile.txt") { |io| io.puts("new file to remanifest") }
        @bag.manifest!
        expect(@bag).to be_valid
      end
    end

    describe "bag manifest files" do
      before do
        @bag.manifest!
      end

      it_behaves_like "a manifest file"

      it "has a manifest file" do
        expect(@bag.manifest_files).not_to be_empty
      end

      it "only contains bag files" do
        @bag.manifest_files.each do |mf|
          File.open(mf) do |io|
            io.each_line do |line|
              expect(line.chomp).to match(/^[a-f0-9]+\s+data\/[^\s].+$/)
            end
          end
        end
      end
    end

    describe "tag manifest files" do
      before do
        @bag.add_tag_file("test-tag") { |f| f.puts "all alone" }
      end

      it_should_behave_like "a manifest file"

      it "has a tag manifest file" do
        expect(@bag.tagmanifest_files).not_to be_empty
      end
      it "only contains tag files" do
        @bag.tagmanifest_files.each do |mf|
          File.open(mf) do |io|
            io.each_line do |line|
              expect(line.chomp).to match(/^[a-fA-F0-9]+\s+(?!data\/)[^\s].+$/)
            end
          end
        end
      end
      it "contains manifest and bag info files" do
        @bag.tagmanifest_files.each do |mf|
          expect(File.open(mf).read).to include(File.basename(@bag.bag_info_txt_file))
          expect(File.open(mf).read).to include(File.basename(@bag.bagit_txt_file))
          @bag.manifest_files.each do |man|
            expect(File.open(mf).read).to include(man)
          end
        end
      end
      it "does not contain the untracked tag file" do
        @bag.tagmanifest_files.each do |mf|
          File.open(mf) do |io|
            expect(io.read).not_to include "tag-notrack"
          end
        end
      end

      describe "removing tracked files" do
        before do
          @bag.remove_tag_file "tag-1"
          @bag.delete_tag_file "tag-2"
        end

        it "still has the untracked tag file on the file system" do
          expect(File.join(@bag_path, "tag-1")).to exist_on_fs
        end

        it "doesn't have the deleted tag file on the file system" do
          expect(File.join(@bag_path, "tag-2")).not_to exist_on_fs
        end

        it "doesn't have the removed or deleted tag files in the manifest" do
          @bag.tagmanifest_files.each do |mf|
            File.open(mf) do |io|
              expect(io.read).not_to include "tag-1"
              expect(io.read).not_to include "tag-2"
            end
          end
        end
      end
    end
  end
end