From 18c0c0bc8738741d6eb07e12aaaee5a555772d7d Mon Sep 17 00:00:00 2001
From: Andrew Weaver <theandrewjw@gmail.com>
Date: Thu, 6 Sep 2018 16:53:52 -0700
Subject: [PATCH 1/2] add initial manifest check

---
 ltomanifest | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/ltomanifest b/ltomanifest
index 5a7b21f..ae5b061 100755
--- a/ltomanifest
+++ b/ltomanifest
@@ -67,12 +67,19 @@ def Create_manifest(input)
   bag_list.each do |isbag|
     if ! File.exist?("#{isbag}/bag-info.txt") || ! File.exist?("#{isbag}/bagit.txt")
       red("Warning! Unbagged directory found at -- #{isbag} Exiting.")
+      exit
     end
   end
 
   #Verify all bags are valid bags
   bag_list.each do |isvalidbag|
     bag = BagIt::Bag.new isvalidbag
+    # Check files by name first
+    if ! bag.valid_oxum?
+      red("Warning! Manifest contents do not match actual bag contents in -- #{isvalidbag} Exiting.")
+      exit
+    end
+    #Check files by checksums
     if bag.valid?
       TargetBags << isvalidbag
       green("Confirmed bag: #{isvalidbag}")
@@ -102,7 +109,7 @@ end
 def Auditmanifest(input)
   #Confirm input
   if input.length > 1
-    red("Please only use one maifest file as input. Exiting.")
+    red("Please only use one manifest file as input. Exiting.")
     exit  
   else
     input = input[0]

From 2f7ef43eb2ad3575a3f46b91ed3e688893857d10 Mon Sep 17 00:00:00 2001
From: Weaver <weevz@uw.edu>
Date: Fri, 7 Sep 2018 14:53:15 -0700
Subject: [PATCH 2/2] dump file mode and yaml

---
 ltomanifest | 32 ++++++++++++++++++++++++++++----
 1 file changed, 28 insertions(+), 4 deletions(-)

diff --git a/ltomanifest b/ltomanifest
index ae5b061..5fa1221 100755
--- a/ltomanifest
+++ b/ltomanifest
@@ -3,6 +3,7 @@
 require 'bagit'
 require 'yaml'
 require 'optparse'
+require 'pathname'
 
 option = {}
 
@@ -15,10 +16,13 @@ OptionParser.new do |opts|
   opts.on("-c", "--confirm", "Confirm manifest") do |d|
     option = 'confirm'
   end
+  opts.on("-b", "--bagdump=val", "Bag dump", String) { |val| $bagdump = val }
+
   opts.on("-h", "--help", "Help") do
     puts opts
     exit
   end
+
   if ARGV.empty?
     puts opts
   end
@@ -36,6 +40,13 @@ def green(input)
   puts "\e[36m#{input}\e[0m"
 end
 
+# Parse Bag Dump if selected
+if ! $bagdump.nil?
+  bagdumppath = Pathname.new($bagdump)
+  bagdumpcontents = YAML::load_file(bagdumppath)
+  @confirmed_dumpbags =  bagdumpcontents['ConfirmedBags']
+end
+
 def Create_manifest(input)
 #Check and limit input
   if input.length > 1
@@ -52,9 +63,21 @@ def Create_manifest(input)
     red("#{input}/tapemanifest.txt already exists. Exiting.")
     exit
   end
-  #Get list of directories
+  #Get list of directories (skip dump list bags if present)
   Dir.chdir(input)
-  bag_list = Dir.glob('*')
+  if ! @confirmed_dumpbags.nil?
+    green("Will skip previously confirmed bags listed in BagListDump.txt")
+    bag_list = Dir.glob('*') - @confirmed_dumpbags
+    @confirmed_dumpbags.each do |isvalidbag|
+      TargetBags << isvalidbag
+    end
+  else
+    bag_list = Dir.glob('*')
+  end
+  if bag_list.include? 'BagListDump.txt'
+    red("BagListDump.txt detected in target directory. Please move this outside of target and try again! Exiting.")
+  end
+
   #Check if supposed bags are actually directories
   bag_list.each do |isdirectory|
     if ! File.directory?(isdirectory)
@@ -96,12 +119,13 @@ def Create_manifest(input)
   targetBagsSorted.each do |bagparse|
     metafile = "#{bagparse}/manifest-md5.txt"
     contents = File.readlines(metafile)
-    bagcontents << bagparse
-    bagcontents << contents
+    parsedcontents = {"Bag Name" => bagparse, "Bag Contents" => contents}
+    bagcontents << parsedcontents
   end
 
   #Write manifest of bags and checksums
   data = {"Bag List" => targetBagsSorted, "Contents" => bagcontents}
+
   File.write('tapemanifest.txt',data.to_yaml)
   green("Manifest written at #{input}/tapemanifest.txt")
 end