require "spec_helper"

module Berkshelf
  describe FileSyncer do
    describe "#glob" do
      before do
        FileUtils.mkdir_p(File.join(tmp_path, "folder"))
        FileUtils.mkdir_p(File.join(tmp_path, ".hidden_folder"))

        FileUtils.touch(File.join(tmp_path, "folder", "file"))
        FileUtils.touch(File.join(tmp_path, ".hidden_file"))
      end

      let(:list) do
        described_class
          .glob("#{tmp_path}/**/*")
          .map { |item| item.sub("#{tmp_path}/", "") }
      end

      it "includes regular files" do
        expect(list).to include("folder")
        expect(list).to include("folder/file")
      end

      it "ignores ." do
        expect(list).to_not include(".")
      end

      it "ignores .." do
        expect(list).to_not include("..")
      end

      it "includes hidden files" do
        expect(list).to include(".hidden_file")
      end

      it "includes hidden folders" do
        expect(list).to include(".hidden_folder")
      end
    end

    describe "#sync" do
      let(:source) do
        source = File.join(tmp_path, "source")
        FileUtils.mkdir_p(source)

        FileUtils.touch(File.join(source, "file_a"))
        FileUtils.touch(File.join(source, "file_b"))
        FileUtils.touch(File.join(source, "file_c"))

        FileUtils.mkdir_p(File.join(source, "folder"))
        FileUtils.touch(File.join(source, "folder", "file_d"))
        FileUtils.touch(File.join(source, "folder", "file_e"))

        FileUtils.mkdir_p(File.join(source, ".dot_folder"))
        FileUtils.touch(File.join(source, ".dot_folder", "file_f"))

        FileUtils.touch(File.join(source, ".file_g"))

        # VCS files: Arch
        FileUtils.mkdir_p(File.join(source, ".arch-ids"))
        FileUtils.mkdir_p(File.join(source, "{arch}"))

        # VCS files: Bazaar
        FileUtils.touch(File.join(source, ".bzr"))
        FileUtils.touch(File.join(source, ".bzrignore"))
        FileUtils.touch(File.join(source, ".bzrtags"))

        # VCS files: CVS
        FileUtils.mkdir_p(File.join(source, "CVS"))
        FileUtils.touch(File.join(source, ".cvsignore"))

        # VCS files: Darcs
        FileUtils.touch(File.join(source, "_darcs"))

        # VCS files: git
        FileUtils.mkdir_p(File.join(source, ".git", "objects", "08"))
        FileUtils.touch(File.join(source, ".git", "HEAD"))
        git_readonly_file = File.join(source, ".git", "objects", "08", "01ddba0b1237b2e0e602cf5fdb6544561950cb")
        FileUtils.touch(File.join(git_readonly_file))
        FileUtils.chmod("ugo=r", git_readonly_file)
        FileUtils.touch(File.join(source, ".gitignore"))

        # VCS files: Mercurial
        FileUtils.touch(File.join(source, ".hg"))
        FileUtils.touch(File.join(source, ".hgignore"))
        FileUtils.touch(File.join(source, ".hgrags"))

        # VCS files: RCS
        FileUtils.mkdir_p(File.join(source, "RCS"))

        # VCS files: SCCS
        FileUtils.mkdir_p(File.join(source, "SCCS"))

        # VCS files: Subversion
        FileUtils.mkdir_p(File.join(source, ".svn"))

        source
      end

      let(:destination) { File.join(tmp_path, "destination") }

      context "when the destination is empty" do
        it "syncs the directories" do
          described_class.sync(source, destination)

          expect("#{destination}/file_a").to be_a_file
          expect("#{destination}/file_b").to be_a_file
          expect("#{destination}/file_c").to be_a_file
          expect("#{destination}/folder/file_d").to be_a_file
          expect("#{destination}/folder/file_e").to be_a_file
          expect("#{destination}/.dot_folder/file_f").to be_a_file
          expect("#{destination}/.file_g").to be_a_file
        end
      end

      context "when the directory exists" do
        before { FileUtils.mkdir_p(destination) }

        it "does not delete existing files and folders" do
          FileUtils.mkdir_p("#{destination}/existing_folder")
          FileUtils.mkdir_p("#{destination}/.existing_folder")
          FileUtils.touch("#{destination}/existing_file")
          FileUtils.touch("#{destination}/.existing_file")

          described_class.sync(source, destination)

          expect("#{destination}/file_a").to be_a_file
          expect("#{destination}/file_b").to be_a_file
          expect("#{destination}/file_c").to be_a_file
          expect("#{destination}/folder/file_d").to be_a_file
          expect("#{destination}/folder/file_e").to be_a_file
          expect("#{destination}/.dot_folder/file_f").to be_a_file
          expect("#{destination}/.file_g").to be_a_file

          expect("#{destination}/existing_folder").to be_a_directory
          expect("#{destination}/.existing_folder").to be_a_directory
          expect("#{destination}/existing_file").to be_a_file
          expect("#{destination}/.existing_file").to be_a_file
        end

        it "optionally deletes existing files and folders" do
          FileUtils.mkdir_p("#{destination}/existing_folder")
          FileUtils.mkdir_p("#{destination}/.existing_folder")
          FileUtils.touch("#{destination}/existing_file")
          FileUtils.touch("#{destination}/.existing_file")

          described_class.sync(source, destination, delete: true)

          expect("#{destination}/file_a").to be_a_file
          expect("#{destination}/file_b").to be_a_file
          expect("#{destination}/file_c").to be_a_file
          expect("#{destination}/folder/file_d").to be_a_file
          expect("#{destination}/folder/file_e").to be_a_file
          expect("#{destination}/.dot_folder/file_f").to be_a_file
          expect("#{destination}/.file_g").to be_a_file

          expect("#{destination}/existing_folder").to_not be_a_directory
          expect("#{destination}/.existing_folder").to_not be_a_directory
          expect("#{destination}/existing_file").to_not be_a_file
          expect("#{destination}/.existing_file").to_not be_a_file
        end

        it "skips excluded VCS files" do
          described_class.sync(source, destination, exclude: Berksfile::EXCLUDED_VCS_FILES_WHEN_VENDORING)

          # VCS files: Arch
          expect("#{destination}/.arch-ids").to_not be_a_directory
          expect("#{destination}/{arch}").to_not be_a_directory

          # VCS files: Bazaar
          expect("#{destination}/.bzr").to_not be_a_file
          expect("#{destination}/.bzrignore").to_not be_a_file
          expect("#{destination}/.bzrtags").to_not be_a_file

          # VCS files: CVS
          expect("#{destination}/CVS").to_not be_a_directory
          expect("#{destination}/.cvsignore").to_not be_a_file

          # VCS files: Darcs
          expect("#{destination}/_darcs").to_not be_a_file

          # VCS files: git
          expect("#{destination}/.git/objects/08/01ddba0b1237b2e0e602cf5fdb6544561950cb").to_not be_a_file
          expect("#{destination}/.git/HEAD").to_not be_a_file
          expect("#{destination}/.git").to_not be_a_directory

          # VCS files: Mercurial
          expect("#{destination}/.hg").to_not be_a_file
          expect("#{destination}/.hgignore").to_not be_a_file
          expect("#{destination}/.hgrags").to_not be_a_file

          # VCS files: RCS
          expect("#{destination}/RCS").to_not be_a_directory

          # VCS files: SCCS
          expect("#{destination}/SCCS").to_not be_a_directory

          # VCS files: Subversion
          expect("#{destination}/.svn").to_not be_a_directory

        end
      end

      context "with deeply nested paths and symlinks", :not_supported_on_windows do
        let(:source) do
          source = File.join(tmp_path, "source")
          FileUtils.mkdir_p(source)

          FileUtils.mkdir_p(File.join(source, "bin"))
          FileUtils.touch(File.join(source, "bin", "apt"))
          FileUtils.touch(File.join(source, "bin", "yum"))

          FileUtils.touch(File.join(source, "LICENSE"))

          FileUtils.mkdir_p(File.join(source, "include"))
          FileUtils.mkdir_p(File.join(source, "include", "linux"))
          FileUtils.touch(File.join(source, "include", "linux", "init.ini"))

          FileUtils.mkdir_p(File.join(source, "source"))
          FileUtils.mkdir_p(File.join(source, "source", "bin"))
          FileUtils.touch(File.join(source, "source", "bin", "apt"))
          FileUtils.touch(File.join(source, "source", "bin", "yum"))
          FileUtils.touch(File.join(source, "source", "LICENSE"))

          FileUtils.mkdir_p(File.join(source, "empty_directory"))

          FileUtils.mkdir_p(File.join(source, "links"))
          FileUtils.touch(File.join(source, "links", "home.html"))
          FileUtils.ln_s("./home.html", "#{source}/links/index.html")
          FileUtils.ln_s("./home.html", "#{source}/links/default.html")
          FileUtils.ln_s("../source/bin/apt", "#{source}/links/apt")

          FileUtils.ln_s("/foo/bar", "#{source}/root")

          source
        end

        it "copies relative and absolute symlinks" do
          described_class.sync(source, destination)

          expect("#{destination}/bin").to be_a_directory
          expect("#{destination}/bin/apt").to be_a_file
          expect("#{destination}/bin/yum").to be_a_file

          expect("#{destination}/LICENSE").to be_a_file

          expect("#{destination}/include").to be_a_directory
          expect("#{destination}/include/linux").to be_a_directory
          expect("#{destination}/include/linux/init.ini").to be_a_file

          expect("#{destination}/source").to be_a_directory
          expect("#{destination}/source/bin").to be_a_directory
          expect("#{destination}/source/bin/apt").to be_a_file
          expect("#{destination}/source/bin/yum").to be_a_file
          expect("#{destination}/source/LICENSE").to be_a_file

          expect("#{destination}/empty_directory").to be_a_directory

          expect("#{destination}/links").to be_a_directory
          expect("#{destination}/links/home.html").to be_a_file
          expect("#{destination}/links/index.html").to be_a_symlink_to("./home.html")
          expect("#{destination}/links/default.html").to be_a_symlink_to("./home.html")
          expect("#{destination}/links/apt").to be_a_symlink_to("../source/bin/apt")

          expect("#{destination}/root").to be_a_symlink_to("/foo/bar")
        end

        it "copies relative and absolute symlinks when destination is a relative path" do
          described_class.sync(source, "#{destination.gsub(Dir.pwd, '.')}")

          expect("#{destination}/links/index.html").to be_a_symlink_to("./home.html")
          expect("#{destination}/links/default.html").to be_a_symlink_to("./home.html")
          expect("#{destination}/links/apt").to be_a_symlink_to("../source/bin/apt")
          expect("#{destination}/root").to be_a_symlink_to("/foo/bar")
        end

      end

      context "when :exclude is given" do
        it "does not copy files and folders that match the pattern" do
          described_class.sync(source, destination, exclude: ".dot_folder")

          expect("#{destination}/file_a").to be_a_file
          expect("#{destination}/file_b").to be_a_file
          expect("#{destination}/file_c").to be_a_file
          expect("#{destination}/folder/file_d").to be_a_file
          expect("#{destination}/folder/file_e").to be_a_file
          expect("#{destination}/.dot_folder").to_not be_a_directory
          expect("#{destination}/.dot_folder/file_f").to_not be_a_file
          expect("#{destination}/.file_g").to be_a_file
        end

        it "does not copy files and folder matching a pattern with a wildcard" do
          described_class.sync(source, destination, exclude: "**/file_e")

          expect("#{destination}/file_a").to be_a_file
          expect("#{destination}/file_b").to be_a_file
          expect("#{destination}/file_c").to be_a_file
          expect("#{destination}/folder/file_d").to be_a_file
          expect("#{destination}/folder/file_e").to_not be_a_file
          expect("#{destination}/.dot_folder").to be_a_directory
          expect("#{destination}/.dot_folder/file_f").to be_a_file
          expect("#{destination}/.file_g").to be_a_file
        end

        it "removes existing files and folders in destination" do
          FileUtils.mkdir_p("#{destination}/existing_folder")
          FileUtils.touch("#{destination}/existing_file")
          FileUtils.mkdir_p("#{destination}/.dot_folder")
          FileUtils.touch("#{destination}/.dot_folder/file_f")

          described_class.sync(source, destination, delete: true, exclude: ".dot_folder")

          expect("#{destination}/file_a").to be_a_file
          expect("#{destination}/file_b").to be_a_file
          expect("#{destination}/file_c").to be_a_file
          expect("#{destination}/folder/file_d").to be_a_file
          expect("#{destination}/folder/file_e").to be_a_file
          expect("#{destination}/.dot_folder").to_not be_a_directory
          expect("#{destination}/.dot_folder/file_f").to_not be_a_file
          expect("#{destination}/.file_g").to be_a_file

          expect("#{destination}/existing_folder").to_not be_a_directory
          expect("#{destination}/existing_file").to_not be_a_file
        end
      end
    end
  end
end