archive-ar 0.0.1 → 0.0.2

checksums.yaml

@@ -1,15 +1,15 @@
 ---
 !binary "U0hBMQ==":
   metadata.gz: !binary |-
-    YjgxYzllNThiOWViMDliZmNkZWZlZjQ4MGE1MjQ5MWIyODVlMmM2NA==
+    NmEwMzBjZGVmZTJmOTJlN2VmMjc5ZDI5ZDA1ODQ4MTE2YTA5MzdmYg==
   data.tar.gz: !binary |-
-    OWE3MjlkMzJmNDUzYjIzN2VkOTU4Zjk3MGNiMDczYzIxOGZlYjYxNw==
+    M2VhYmEzNWRhYTFjMWEyNTFhMzQyZjljNzEzOTljNTE1MDQwZmVjNg==
 SHA512:
   metadata.gz: !binary |-
-    ZTRiZjBiNmZjMjU3NDlhY2Y0MGZkMmIzMzRlNzc1OWMwOWE0ZTMzMWZhZjgx
-    MzAzYzI3YWUxNWU1NzVlYTNhMjNmNTQzNTAzYzIxZDIwMmUxMzM5ZTQ4Njgx
-    MzBjNzUyYmZiYzZlN2Y1NDJmOGE0YWY0NTkzNWNhZDYyM2NkMmQ=
+    N2YyNTk2NTU3OTlhMzliMWRhNjYxMGU3NTJiYjYwZmIxNmE5ZTg4OTUxN2Zj
+    ZWFkMTBmZmJlYzBhNzlhZjg4NjRhMjE4NWVlNWY3Y2FhODhmYTdlOGQ4MmMz
+    MDgwNGMyNjkyM2M5MTAyZjg3NTNlYTkzZGJiODQ1NDBiMDA4ZWU=
   data.tar.gz: !binary |-
-    YTFlMGI3ODhlZTAxNmVjOGU3OWQ0OWU3ZDZiZWI0Zjk3NjY4NTA0NzAzMmQy
-    YzVhN2QwNmQ5ZmM5NmM5MjRkY2FlY2EyODgyOWI0NmQ5ZWJhNjQ5Mjg2YmE0
-    N2E5MGRkNzk1ZmY0YzE2YWU3ZGZlMDBiZDYyNDI2OTYxMjA0YTg=
+    MTVhMmU2YTQ5ZmIxNTBhM2MxYWViZjI3MjNjMDU1ZTIyNDY4MjBmZDk5YWMy
+    OTQ4MTc1YjI5ODRkZjA3ZDM2OTQ1ZDJmYmY4NDFkYmQ4MzMyMDZkNTc1MTQ2
+    NjYzY2FkZDY2ZTc2NDRiNDNhMjVkNjQxMjg1ZjE0MTM4YjUxYTc=

data/bin/archive-ar

@@ -0,0 +1,82 @@
+#!/usr/bin/env ruby
+require 'archive/ar'
+require 'optparse'
+
+options = {}
+OptionParser.new do |opts|
+  opts.banner = "Usage: archive-ar [options]"
+
+  opts.on("-t", "List the specified files in the order in which they appear in the archive, each on a
+             separate line.  If no files are specified, all files in the archive are listed.") do |v|
+    options[:t] = v
+  end
+
+  opts.on("-x", "Extract the specified archive members into the files named by the command line argu-
+             ments.  If no members are specified, all the members of the archive are extracted into
+             the current directory.
+
+             If the file does not exist, it is created; if it does exist, the owner and group will
+             be unchanged.  The file access and modification times are the time of the extraction
+             (but see the -o option).  The file permissions will be set to those of the file when
+             it was entered into the archive; this will fail if the user is not the owner of the
+             extracted file or the super-user.") do |v|
+    options[:x] = v
+  end
+
+  opts.on("-p", "Write the contents of the specified archive files to the standard output.  If no files
+             are specified, the contents of all the files in the archive are written in the order
+             they appear in the archive.") do |v|
+    options[:p] = v
+  end
+
+  opts.on("-v", "--[no-]verbose", "Run verbosely") do |v|
+    options[:verbose] = v
+  end
+end.parse!
+
+if options[:p]
+  raise "illegal option combination for -p" if options[:t]
+  raise "illegal option combination for -p" if options[:x]
+
+  Archive::Ar.traverse(ARGV[0]) do |header, data|
+    if options[:verbose]
+      puts
+      puts "<#{header[:name]}>"
+      puts
+    end
+    puts data
+  end
+elsif options[:t]
+  raise "illegal option combination for -t" if options[:x]
+
+  Archive::Ar.traverse(ARGV[0]) do |header, data|
+    if options[:verbose]
+      print header[:mode].to_s(8)
+      print "\t"
+      print header[:owner]
+      print "/"
+      print header[:group]
+      print "\t"
+      print header[:size]
+      print "\t"
+      print header[:modified]
+      print "\t"
+      print header[:name]
+      puts
+    else
+      puts header[:name]
+    end
+  end
+elsif options[:x]
+  if options[:verbose]
+    Archive::Ar.traverse(ARGV[0]) do |header, data|
+      puts "x - #{header[:name]}"
+      Archive::Ar::Format.extract_file(Dir.pwd, header, data)
+    end
+  else
+    Archive::Ar.extract(ARGV[0], Dir.pwd)
+  end
+end
+
+#p options
+#p ARGV

data/lib/archive/ar/format.rb

@@ -16,12 +16,23 @@ module Archive
             :modified => Time.at(h.shift.to_i),
             :owner => h.shift.to_i,
             :group => h.shift.to_i,
-            :mode => h.shift,
+            :mode => h.shift.to_i(8),
             :start => io.tell,
             :size => h.shift.to_i,
             :magic => h.shift,
           }
         end
+
+        def extract_file(dest_dir, header, data, options = {})
+          file = File.join(dest_dir, header[:name])
+
+          File.open(file, "w") do |f|
+            f.write(data)
+          end
+
+          File.chmod(header[:mode], file)
+          #FileUtils.chown(header[:owner], header[:group], file)
+        end
       end
     end
   end

data/lib/archive/ar/reader.rb

@@ -7,6 +7,9 @@ module Archive
       end
 
       def extract(dest_dir, options)
+        each do |header, data|
+          Archive::Ar::Format.extract_file(dest_dir, header, data, options)
+        end
       end
 
       def each(full = false, &block)

data/lib/archive/ar/version.rb

@@ -1,5 +1,5 @@
 module Archive
   module Ar
-    VERSION = "0.0.1"
+    VERSION = "0.0.2"
   end
 end

data/spec/fixtures/test.ar

@@ -1,11 +1,11 @@
 !<arch>
-Gemfile         1399095295  501   20    100644  95        `
+Pjjjjjj         1399095295  501   20    100755  95        `
 source 'https://rubygems.org'
 
 ( Specify your gem's dependencies in archive-ar.gemspec
 gemspec
 
-Semfile         1399095295  502   20    100644  95        `
+Sjjjjjj         1399095295  502   20    100750  95        `
 source 'https://rubygems.org'
 
 # Specify your gem's dependencies in archive-ar.gemspec

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: archive-ar
 version: !ruby/object:Gem::Version
-  version: 0.0.1
+  version: 0.0.2
 platform: ruby
 authors:
 - Joshua B. Bussdieker
@@ -55,7 +55,8 @@ dependencies:
 description: 
 email:
 - jbussdieker@gmail.com
-executables: []
+executables:
+- archive-ar
 extensions: []
 extra_rdoc_files: []
 files:
@@ -66,6 +67,7 @@ files:
 - README.md
 - Rakefile
 - archive-ar.gemspec
+- bin/archive-ar
 - lib/archive/ar.rb
 - lib/archive/ar/format.rb
 - lib/archive/ar/reader.rb