root/lang/ruby/smtools/lrcconv.rb

require "optparse"
require File.expand_path(File.join(File.dirname(__FILE__), "lib", "lyric_converter"))

$application = LyricConverter.new

ARGV.options do |option|
  option.program_name = "LyricConverter"
  option.version = "1.0.2"
  option.release = nil
  option.summary_indent = "  "
  option.summary_width = 24
  
  option.banner = "Usage: lrcconv [options] source-file"
  
  option.separator(" ")
  option.separator("Convert options:")
  option.on("-s", "--sm-file=filename", String, "StepMania sequence file (use BPMS and OFFSET)") do |value|
    $application.sequence = SMTools::Sequence.parse(File.read(value))
  end
  option.on("-b", "--bpm=BPM", Float, "BPM") do |value|
    $application.bpm = value
  end
  option.on("--bpms=BPMS", String, "StepMania compatible BPMS format") do |value|
    $application.bpms = value
  end
  option.on("-o", "--offset=seconds", Float, "Offset seconds") do |value|
    $application.offset = value
  end
  option.separator(" ")
  option.separator("Output options:")
  option.on("-f", "--format=type", [:lrc, :sm, :miku], "Output format type (lrc, sm, miku)") do |value|
    $application.format = value
  end
  
  option.separator(" ")
  option.separator("Source file format:")
  source_file_format = <<-'SOURCE_FILE_FORMAT'
  #!          command-line options (first line only)
  {number}    beat lyric line
  [number]    time lyric line
  #           ignore line
  string      through line
  [string]    through line
  
  ex)
  source:
    #! --bpm=120 --offset=-0.5
    [COLOUR]0xFFFFFF
    
    [0.0]Hello Goodbye
    {0.0}Hello, World.
    {8.0}Goodbye, World.
   
  output lrc:
    [COLOUR]0xFFFFFF
    
    [00:00:00]Hello Goodbye
    [00:00:50]Hello, World.
    [00:04:50]Goodbye, World.
  SOURCE_FILE_FORMAT
  
  source_file_format.lines.each do |line|
    option.separator line.chomp
  end
  
  begin
    option.parse!
  rescue => err
    $stderr << err
    exit(false)
  end
  
  unless $source
    import_file = ARGV.shift
    unless import_file
      $stdout << option.help
      exit
    end
    unless File.exist? import_file
      $stderr << "No such file or directory -- #{import_file}"
      exit(false)
    end
    
    $source = File.read(import_file)
    if $source[0, 2] == "#!"
      match = /\A#!(.*)$/u.match $source
      ARGV.replace match[1].split(" ")
      retry
    end
  end
end

begin
  $stdout << $application.execute($source)
rescue IndexError => e
  $stderr << "Error: #{e.message}"
end