#! /usr/bin/ruby
# Copyright 2010,2011,2012  Vincent Batts, Vienna, VA
# All rights reserved.
#
# Redistribution and use of this source, with or without modification, is
# permitted provided that the following conditions are met:
#
# 1. Redistributions of this source must retain the above copyright
#    notice, this list of conditions and the following disclaimer.
#
# THIS SOFTWARE IS PROVIDED BY THE AUTHOR ''AS IS'' AND ANY EXPRESS OR IMPLIED
# WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
# MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO
# EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
# SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
# PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
# OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
# WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
# OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
# ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.

$PROGRAM_NAME = File.basename(__FILE__)

require 'rubygems'
require 'slackware/log'
require 'slackware/utils'
require 'slackware/args'

option_banner = <<-EOS
List owned for files for a given Slackware package.
Usage:
  #{$PROGRAM_NAME} [search flags] [list of names]
  
  if no search flags, only names, then those only those matching entries are listed

EOS
# This is all the flags we want to use, from Slackware::Args
option_flags = [:force_all, :case_insensitive, :pkg_name, :pkg_version,
    :debug, :pkg_arch, :pkg_build, :pkg_tag]

slog = Slackware::Log.instance
slog.level = Slackware::Log::WARN

options = Slackware::Args.parse(ARGV, option_flags, option_banner)

# update level if specified
slog.level = Slackware::Log::DEBUG if options[:debug]
slog.debug($PROGRAM_NAME) {"options: %s" % options}

if ((ARGV.count == 0) && 
    (options[:pkg].nil?) &&
    (options[:version].nil?) && 
    (options[:arch].nil?) && 
    (options[:build].nil?) && 
    (options[:tag].nil?) && 
    not(options[:force]) )
  $stderr.write("WARNING: If you really want to see *ALL* files, use the --force flag\n")
  exit(2)
end

if (ARGV.count > 0)
  options[:all] = true
end

begin
  print_package_file_list(build_packages(options, ARGV))
rescue Interrupt
  exit 0
rescue Exception => e
  slog.warn($PROGRAM_NAME) { e.message }
  slog.debug($PROGRAM_NAME) { e.class.to_s + "\n" + e.backtrace.join("\n") }
  exit 1
end

# vim:sw=2:sts=2:et:
