Class: Main::Parameter::List

Inherits:

Array

• Object
• Array
• Main::Parameter::List

Defined in:

lib/main/parameter.rb

Instance Attribute Summary

Attributes included from Fieldable

#fieldset

Instance Method Summary

• #defaults! ⇒ Object
• #parse(argv, env) ⇒ Object
• #parse_arguments(argv, params = nil) ⇒ Object
• #parse_environment(env, params = nil) ⇒ Object
• #parse_keywords(argv, params = nil) ⇒ Object
• #parse_options(argv, params = nil) ⇒ Object
• #validate! ⇒ Object

Methods inherited from Array

fields, struct

Methods included from Fieldable

#fields, #fields=

Instance Method Details

#defaults! ⇒ Object

# File 'lib/main/parameter.rb', line 413

def defaults!
  each do |p|
    if(p.defaults? and (not p.given?)) 
      p.defaults.each do |default|
        p.values << default # so as NOT to set 'given?'
      end
    end
  end
end

#parse(argv, env) ⇒ Object

# File 'lib/main/parameter.rb', line 279

def parse argv, env
  parse_options argv
  return 'help' if detect{|p| p.name.to_s == 'help' and p.given?}
  parse_keywords argv
  parse_arguments argv
  parse_environment env
  defaults!
  validate!
  self
end

#parse_arguments(argv, params = nil) ⇒ Object

# File 'lib/main/parameter.rb', line 338

def parse_arguments argv, params=nil
  params ||= select{|p| p.type == :argument}

  params.each do |p|
    if p.arity >= 0
      p.arity.times do
        break if argv.empty?
        value = argv.shift
        p.add_value value
      end
    else
      arity = p.arity.abs - 1
      arity.times do
        break if argv.empty?
        value = argv.shift
        p.add_value value
      end
      argv.size.times do
        value = argv.shift
        p.add_value value
      end
    end
  end

  params.each do |p|
    p.setup!
  end
end

#parse_environment(env, params = nil) ⇒ Object

# File 'lib/main/parameter.rb', line 397

def parse_environment env, params=nil
  params ||= select{|p| p.type == :environment}

  params.each do |p|
    names = p.names
    name = names.first
    value = env[name]
    next unless value
    p.add_value value
  end

  params.each do |p|
    p.setup!
  end
end

#parse_keywords(argv, params = nil) ⇒ Object

# File 'lib/main/parameter.rb', line 367

def parse_keywords argv, params=nil
  params ||= select{|p| p.type == :keyword}

  replacements = {}

  params.each do |p|
    names = p.names
    name = names.first

    kre = %r/^\s*(#{ names.join '|' })\s*=/
    opt = "--#{ name }"
    i = 0

    argv.each_with_index do |a, idx|
      b = argv[idx + 1]
      m, key, *ignored = kre.match("#{ a }#{ b }").to_a
      if m
        replacements[i] ||= a.gsub %r/^\s*#{ key }/, opt
      end
      i += 1
    end
  end

  replacements.each do |i, r|
    argv[i] = r
  end

  parse_options argv, params
end

#parse_options(argv, params = nil) ⇒ Object

# File 'lib/main/parameter.rb', line 290

def parse_options argv, params = nil
  params ||= options 

  spec, h, s = [], {}, {}

  params.each do |p|
    head, *tail = p.names
    long = "--#{ head }"
    shorts = tail.map{|t| "-#{ t }"}
    type =
      if p.argument_required? then GetoptLong::REQUIRED_ARGUMENT
      elsif p.argument_optional? then GetoptLong::OPTIONAL_ARGUMENT
      else GetoptLong::NO_ARGUMENT
      end
    a = [ long, shorts, type ].flatten
    spec << a 
    h[long] = p 
    s[long] = a 
  end

  begin
    GetoptLong.new(argv, *spec).each do |long, value|
      value =
        case s[long].last
          when GetoptLong::NO_ARGUMENT
            value.empty? ? true : value
          when GetoptLong::OPTIONAL_ARGUMENT
            value.empty? ? true : value
          when GetoptLong::REQUIRED_ARGUMENT
            value
        end
      p = h[long]
      p.add_value value
    end
  rescue GetoptLong::AmbigousOption, GetoptLong::NeedlessArgument,
         GetoptLong::MissingArgument, GetoptLong::InvalidOption => e
    c = Parameter.const_get e.class.name.split(/::/).last
    ex = c.new e.message
    ex.set_backtrace e.message
    ex.extend Softspoken
    raise ex
  end

  params.each do |p|
    p.setup!
  end
end

#validate! ⇒ Object

# File 'lib/main/parameter.rb', line 423

def validate!
  each do |p|
    p.adding_handlers do
      next if p.arity == -1
      raise NotGiven, "#{ p.typename } not given" if(p.required? and (not p.given?))
    end
  end
end