[ruby-list:23147] Re: making Array

なかだです。

At Sun, 11 Jun 2000 07:40:40 +0900,
Kazuhiro NISHIYAMA <[e-mail]> wrote:
> crontab みたいに */2 とか 0-23/2 とかにも対応させるとすると
> どうなりますか？＞ALL

  ごとけんさんのその名もcrontab.rbってのがありますが。

> # ネタ振りだけ :-)

  こんなんできました:-)


#! /usr/bin/ruby

class NumRange
  include Enumerable

  attr_accessor :lower, :upper

  class Element
    include Comparable
    include Enumerable

    attr_reader :interval

    def initialize(r, str)
      @default = r
      range, interval = str.split('/')
      @interval = (interval.to_i if interval and /\A\d+\Z/ =~ interval)
      case range
      when '*'
	@lower = @upper = nil
      when /\A(\d+)-(\d+)\Z/
	@lower, @upper = $1.to_i, $2.to_i
	@lower, @upper = @upper, @lower if @upper < @lower
      when /\A(\d+)\Z/
	@lower = @upper = range.to_i
      when /\A(\d+)-\Z/
	@lower, @upper = $1.to_i, nil
      when /\A-(\d+)\Z/
	@lower, @upper = nil, $1.to_i
      else
	raise ArgumentError, "invalid argument - #{str}"
      end
    end

    def lower
      @lower or @default.lower
    end

    def upper
      @upper or @default.upper
    end

    def ===(n)
      return true unless @lower or @upper
      return false if @lower and n < @lower
      return false if @upper and n > @upper
      return true unless @interval
      if @lower
	return true if (n - @lower) % @interval == 0
      else			# @upper != nil
	return true if (@upper - n) % @interval == 0
      end
      false
    end
    alias =~ ===

    def <=>(other)
      (lower <=> other.lower).nonzero? or (upper <=> other.upper).nonzero? or
	interval <=> other.interval
    end

    def each
      lower.step(upper, interval || 1, &proc)
    end
  end

  def initialize(str, lower = nil, upper = nil)
    @lower = (lower.to_i if lower)
    @upper = (upper.to_i if upper)
    @ranges = str.split(",").collect {|s| Element.new(self, s)}.sort
  end

  def ===(n)
    @ranges.find {|r| r === n}
  end
  alias =~ ===

  def each(&p)
    @ranges.each {|r| r.each(&p)}
  end
end

if $0 == __FILE__
  class Crontab
    def initialize(str)
      str = str.split(' ', 6)
      @min = NumRange.new(str[0], 0, 59)
      @hour = NumRange.new(str[1], 0, 23)
      @day = NumRange.new(str[2], 0, 31)
      @month = NumRange.new(str[3], 1, 12)
      @week = NumRange.new(str[4], 0, 6)
      @command = str[5]
    end
    def ===(t)
      return nil if t[1] and @month !~ t[1]
      return nil if t[2] and @day !~ t[2]
      return nil if t[3] and @hour !~ t[3]
      return nil if t[4] and @min !~ t[4]
      return nil if t[5] and @week !~ t[5]
      @command
    end
  end
  f = open('|-') or exec('crontab', '-l')
  begin
    crontab = f.collect {|s|
      next if /^\#/ =~ s or /^$/ =~ s
      Crontab.new(s)
    }.compact
  ensure
    f.close
  end
  require 'parsedate'
  ARGV.each {|t|
    t = ParseDate.parsedate(t)
    crontab.each {|c|
      puts c if c = (c === t)
    }
  }
end


-- 
そうだ 強気に ちょっと インチキに☆彡
    中田 "Bugるくらいがちょうどいいかも;-)" 伸悦