ruby-mp3info 0.4 → 0.5

data/lib/mp3info/extension_modules.rb

@@ -0,0 +1,36 @@
+class Mp3Info 
+  module HashKeys #:nodoc:
+    ### lets you specify hash["key"] as hash.key
+    ### this came from CodingInRuby on RubyGarden
+    ### http://www.rubygarden.org/ruby?CodingInRuby
+    def method_missing(meth,*args)
+      m = meth.id2name
+      if /=$/ =~ m
+	self[m.chop] = (args.length<2 ? args[0] : args)
+      else
+	self[m]
+      end
+    end
+  end
+
+  module NumericBits #:nodoc:
+    ### returns the selected bit range (b, a) as a number
+    ### NOTE: b > a  if not, returns 0
+    def bits(b, a)
+      t = 0
+      b.downto(a) { |i| t += t + self[i] }
+      t
+    end
+  end
+
+  module Mp3FileMethods #:nodoc:
+    def get32bits
+      (getc << 24) + (getc << 16) + (getc << 8) + getc
+    end
+    def get_syncsafe
+      (getc << 21) + (getc << 14) + (getc << 7) + getc
+    end
+  end
+
+end
+

data/lib/mp3info/id3v2.rb

@@ -0,0 +1,311 @@
+require "mp3info/extension_modules"
+
+# This class is not intended to be used directly
+class ID3v2 < DelegateClass(Hash) 
+  VERSION_MAJ = 3
+  
+  TAGS = {
+    "AENC" => "Audio encryption",
+    "APIC" => "Attached picture",
+    "COMM" => "Comments",
+    "COMR" => "Commercial frame",
+    "ENCR" => "Encryption method registration",
+    "EQUA" => "Equalization",
+    "ETCO" => "Event timing codes",
+    "GEOB" => "General encapsulated object",
+    "GRID" => "Group identification registration",
+    "IPLS" => "Involved people list",
+    "LINK" => "Linked information",
+    "MCDI" => "Music CD identifier",
+    "MLLT" => "MPEG location lookup table",
+    "OWNE" => "Ownership frame",
+    "PRIV" => "Private frame",
+    "PCNT" => "Play counter",
+    "POPM" => "Popularimeter",
+    "POSS" => "Position synchronisation frame",
+    "RBUF" => "Recommended buffer size",
+    "RVAD" => "Relative volume adjustment",
+    "RVRB" => "Reverb",
+    "SYLT" => "Synchronized lyric/text",
+    "SYTC" => "Synchronized tempo codes",
+    "TALB" => "Album/Movie/Show title",
+    "TBPM" => "BPM (beats per minute)",
+    "TCOM" => "Composer",
+    "TCON" => "Content type",
+    "TCOP" => "Copyright message",
+    "TDAT" => "Date",
+    "TDLY" => "Playlist delay",
+    "TENC" => "Encoded by",
+    "TEXT" => "Lyricist/Text writer",
+    "TFLT" => "File type",
+    "TIME" => "Time",
+    "TIT1" => "Content group description",
+    "TIT2" => "Title/songname/content description",
+    "TIT3" => "Subtitle/Description refinement",
+    "TKEY" => "Initial key",
+    "TLAN" => "Language(s)",
+    "TLEN" => "Length",
+    "TMED" => "Media type",
+    "TOAL" => "Original album/movie/show title",
+    "TOFN" => "Original filename",
+    "TOLY" => "Original lyricist(s)/text writer(s)",
+    "TOPE" => "Original artist(s)/performer(s)",
+    "TORY" => "Original release year",
+    "TOWN" => "File owner/licensee",
+    "TPE1" => "Lead performer(s)/Soloist(s)",
+    "TPE2" => "Band/orchestra/accompaniment",
+    "TPE3" => "Conductor/performer refinement",
+    "TPE4" => "Interpreted, remixed, or otherwise modified by",
+    "TPOS" => "Part of a set",
+    "TPUB" => "Publisher",
+    "TRCK" => "Track number/Position in set",
+    "TRDA" => "Recording dates",
+    "TRSN" => "Internet radio station name",
+    "TRSO" => "Internet radio station owner",
+    "TSIZ" => "Size",
+    "TSRC" => "ISRC (international standard recording code)",
+    "TSSE" => "Software/Hardware and settings used for encoding",
+    "TYER" => "Year",
+    "TXXX" => "User defined text information frame",
+    "UFID" => "Unique file identifier",
+    "USER" => "Terms of use",
+    "USLT" => "Unsychronized lyric/text transcription",
+    "WCOM" => "Commercial information",
+    "WCOP" => "Copyright/Legal information",
+    "WOAF" => "Official audio file webpage",
+    "WOAR" => "Official artist/performer webpage",
+    "WOAS" => "Official audio source webpage",
+    "WORS" => "Official internet radio station homepage",
+    "WPAY" => "Payment",
+    "WPUB" => "Publishers official webpage",
+    "WXXX" => "User defined URL link frame"
+  }
+
+  include Mp3Info::HashKeys
+  
+  attr_reader :io_position
+
+  # possibles keys:
+  # :+lang+ for writing comments
+  # :+encoding+: :+iso+ or :+unicode+ 
+  attr_reader :options
+  
+  def initialize(options = {})
+    @options = { 
+      :lang => "ENG", 
+      :encoding => :iso  #language encoding bit 0 for iso_8859_1, 1 for unicode
+    }
+    @options.update(options)
+    
+    @hash = {}
+    #TAGS.keys.each { |k| @hash[k] = nil }
+    @hash_orig = {}
+    super(@hash)
+    @valid = false
+    @version_maj = @version_min = nil
+  end
+
+  def valid?
+    @valid
+  end
+
+  def changed?
+    @hash_orig != @hash
+  end
+  
+  def version
+    "2.#{@version_maj}.#{@version_min}"
+  end
+
+  ### gets id3v2 tag information from io
+  def from_io(io)
+    @io = io
+    version_maj, version_min, flags = @io.read(3).unpack("CCB4")
+    unsync, ext_header, experimental, footer = (0..3).collect { |i| flags[i].chr == '1' }
+    raise("can't find version_maj ('#{version_maj}')") unless [2, 3, 4].include?(version_maj)
+    @version_maj, @version_min = version_maj, version_min
+    @valid = true
+    tag2_len = @io.get_syncsafe
+    case @version_maj
+      when 2
+        read_id3v2_2_frames(tag2_len)
+      when 3,4
+        # seek past extended header if present
+        @io.seek(@io.get_syncsafe - 4, IO::SEEK_CUR) if ext_header
+        read_id3v2_3_frames(tag2_len)
+    end
+    @io_position = @io.pos
+    
+    @hash_orig = @hash.dup
+    #no more reading
+    @io = nil
+    # we should now have io sitting at the first MPEG frame
+  end
+
+  def to_bin
+    #TODO handle of @tag2[TLEN"]
+    #TODO add of crc
+    #TODO add restrictions tag
+
+    tag = ""
+    @hash.each do |k, v|
+      next unless v
+      next if v.respond_to?("empty?") and v.empty?
+      data = encode_tag(k, v.to_s)
+      #data << "\x00"*2 #End of tag
+
+      tag << k[0,4]   #4 characte max for a tag's key
+      #tag << to_syncsafe(data.size) #+1 because of the language encoding byte
+      tag << [data.size].pack("N") #+1 because of the language encoding byte
+      tag << "\x00"*2 #flags
+      tag << data
+    end
+
+    tag_str = ""
+    #version_maj, version_min, unsync, ext_header, experimental, footer 
+    tag_str << [ VERSION_MAJ, 0, "0000" ].pack("CCB4")
+    tag_str << to_syncsafe(tag.size)
+    tag_str << tag
+    p tag_str if $DEBUG
+    tag_str
+  end
+
+  private
+
+
+  def encode_tag(name, value)
+    puts "encode_tag(#{name.inspect}, #{value.inspect})" if $DEBUG
+    case name
+      when "COMM"
+	[ @options[:encoding] == :iso ? 0 : 1, @options[:lang], 0, value ].pack("ca3ca*")
+      else
+        if @options[:encoding] == :iso
+	  "\x00"+value
+	else
+	  "\x01"+value #Iconv.iconv("UNICODE", "ISO-8859-1", value)[0]
+	end
+      #data << "\x00"   
+    end
+  end
+
+  ### Read a tag from file and perform UNICODE translation if needed
+  def decode_tag(name, value)
+    case name
+      when "COMM"
+        #FIXME improve this
+	encoding, lang, str = value.unpack("ca3a*")
+	out = value.split(0.chr).last
+      else
+	encoding = value[0]     # language encoding bit 0 for iso_8859_1, 1 for unicode
+	out = value[1..-1] 
+    end
+
+    if encoding == 1 #and name[0] == ?T
+      require "iconv"
+      
+      #strip byte-order bytes at the beginning of the unicode string if they exists
+      out[0..3] =~ /^[\xff\xfe]+$/ and out = out[2..-1]
+      begin
+	out = Iconv.iconv("ISO-8859-1", "UNICODE", out)[0] 
+      rescue Iconv::IllegalSequence, Iconv::InvalidCharacter
+      end
+    end
+    out
+  end
+
+  ### reads id3 ver 2.3.x/2.4.x frames and adds the contents to @tag2 hash
+  ###  tag2_len (fixnum) = length of entire id3v2 data, as reported in header
+  ### NOTE: the id3v2 header does not take padding zero's into consideration
+  def read_id3v2_3_frames(tag2_len)
+    loop do # there are 2 ways to end the loop
+      name = @io.read(4)
+      if name[0] == 0 or name == "MP3e" #bug caused by old tagging application "mp3ext" ( http://www.mutschler.de/mp3ext/ )
+        @io.seek(-4, IO::SEEK_CUR)    # 1. find a padding zero,
+	seek_to_v2_end
+        break
+      else
+        #size = @file.get_syncsafe #this seems to be a bug
+        size = @io.get32bits
+        puts "name '#{name}' size #{size} " if $DEBUG
+        @io.seek(2, IO::SEEK_CUR)     # skip flags
+        add_value_to_tag2(name, size)
+#        case name
+#          when /^T/
+#            puts "tag is text. reading" if $DEBUG
+##	    data = read_id3_string(size-1)
+##	    add_value_to_tag2(name, data)
+#          else
+#	    decode_tag(
+#            #@file.seek(size-1, IO::SEEK_CUR)  
+#            puts "tag is binary, skipping" if $DEBUG
+#            @io.seek(size, IO::SEEK_CUR)  
+#        end
+
+#	case name
+#	  #FIXME DRY
+#	  when "COMM"
+#            data = read_id3v2_frame(size)
+#	    lang = data[0,3]
+#	    data = data[3,-1]
+#	  else
+#	end
+      end
+      break if @io.pos >= tag2_len # 2. reach length from header
+    end
+  end    
+
+  ### reads id3 ver 2.2.x frames and adds the contents to @tag2 hash
+  ###  tag2_len (fixnum) = length of entire id3v2 data, as reported in header
+  ### NOTE: the id3v2 header does not take padding zero's into consideration
+  def read_id3v2_2_frames(tag2_len)
+    loop do
+      name = @io.read(3)
+      if name[0] == 0
+        @io.seek(-3, IO::SEEK_CUR)
+	seek_to_v2_end
+        break
+      else
+        size = (@io.getc << 16) + (@io.getc << 8) + @io.getc
+	add_value_to_tag2(name, size)
+        break if @io.pos >= tag2_len
+      end
+    end
+  end    
+  
+  ### Add data to tag2["name"]
+  ### read lang_encoding, decode data if unicode and
+  ### create an array if the key already exists in the tag
+  def add_value_to_tag2(name, size)
+    puts "add_value_to_tag2" if $DEBUG
+    data = decode_tag(name, @io.read(size))
+    if self.keys.include?(name)
+      unless self[name].is_a?(Array)
+        self[name] = self[name].to_a
+      end
+      self[name] << data
+    else
+      self[name] = data 
+    end
+  end
+  
+  ### runs thru @file one char at a time looking for best guess of first MPEG
+  ###  frame, which should be first 0xff byte after id3v2 padding zero's
+  def seek_to_v2_end
+    until @io.getc == 0xff
+    end
+    @io.seek(-1, IO::SEEK_CUR)
+  end
+  
+  ### convert an 32 integer to a syncsafe string
+  def to_syncsafe(num)
+    n = ( (num<<3) & 0x7f000000 )  + ( (num<<2) & 0x7f0000 ) + ( (num<<1) & 0x7f00 ) + ( num & 0x7f )
+    [n].pack("N")
+  end
+
+#  def method_missing(meth, *args)
+#    m = meth.id2name
+#    return nil if TAGS.has_key?(m) and self[m].nil?
+#    super
+#  end
+end
+

data/test.rb

@@ -0,0 +1,325 @@
+#!/usr/bin/ruby -w
+
+$:.unshift("lib/")
+
+require "test/unit"
+require "base64"
+require "mp3info"
+require "fileutils"
+
+class Mp3InfoTest < Test::Unit::TestCase
+
+  TEMP_FILE = File.join(File.dirname($0), "test_mp3info.mp3")
+  BASIC_TAG2 = {
+    "COMM" => "comments",
+    #"TCON" => "genre_s" 
+    "TIT2" => "title",
+    "TPE1" => "artist",
+    "TALB" => "album",
+    "TYER" => "year",
+    "TRCK" => "tracknum"
+  }
+  
+  # aliasing to allow testing with old versions of Test::Unit
+  alias set_up setup 
+  alias tear_down teardown
+
+  def setup
+    # Command to create a dummy MP3
+    # dd if=/dev/zero bs=1024 count=15 | lame --preset cbr 128 -r -s 44.1 --bitwidth 16 - - | ruby -rbase64 -e 'print Base64.encode64($stdin.read)'
+    @valid_mp3 = Base64.decode64 <<EOF
+//uQZAAAAAAAaQYAAAAAAA0gwAAAAAABpBwAAAAAADSDgAAATEFNRTMuOTNV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVTEFNRTMuOTNVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVV//uSZL6P8AAAaQAAAAAAAA0gAAAAAAABpAAAAAAAADSA
+AAAAVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVUxBTUUzLjkzVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVf/7kmT/j/AAAGkAAAAAAAANIAAA
+AAAAAaQAAAAAAAA0gAAAAFVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVM
+QU1FMy45M1VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVX/+5Jk/4/w
+AABpAAAAAAAADSAAAAAAAAGkAAAAAAAANIAAAABVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVTEFNRTMuOTNVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVV//uSZP+P8AAAaQAAAAAAAA0gAAAAAAABpAAAAAAAADSAAAAAVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
+VVVVVVVVVVVVVVVVVVVVVVVVVQ==
+EOF
+    @tag = {
+      "title" => "title",
+      "artist" => "artist",
+      "album" => "album",
+      "year" => 1921,
+      "comments" => "comments",
+      "genre" => 0,
+      "genre_s" => "Blues",
+      "tracknum" => 36
+    }
+    File.open(TEMP_FILE, "w") { |f| f.write(@valid_mp3) }
+  end
+
+  def teardown
+    FileUtils.rm_f(TEMP_FILE)
+  end
+
+
+  def test_to_s
+    Mp3Info.open(TEMP_FILE) { |info| assert(info.to_s.is_a?(String)) }
+  end
+
+  def test_not_an_mp3
+    File.open(TEMP_FILE, "w") do |f|
+      str = "0"*1024*1024
+      f.write(str)
+    end
+    assert_raises(Mp3InfoError) {
+      mp3 = Mp3Info.new(TEMP_FILE)
+    }
+  end
+
+  def test_is_an_mp3
+    assert_nothing_raised {
+      Mp3Info.new(TEMP_FILE).close
+    }
+  end
+  
+  def test_detected_info
+    Mp3Info.open(TEMP_FILE) do |info|
+      assert_equal(info.mpeg_version, 1)
+      assert_equal(info.layer, 3)
+      assert_equal(info.vbr, false)
+      assert_equal(info.bitrate, 128)
+      assert_equal(info.channel_mode, "JStereo")
+      assert_equal(info.samplerate, 44100)
+      assert_equal(info.error_protection, false)
+      assert_equal(info.length, 0.1305625)
+    end
+  end
+
+  def test_removetag1
+    Mp3Info.open(TEMP_FILE) { |info| info.tag1 = @tag }
+    assert(Mp3Info.hastag1?(TEMP_FILE))
+    Mp3Info.removetag1(TEMP_FILE)
+    assert(! Mp3Info.hastag1?(TEMP_FILE))
+  end
+
+  def test_writetag1
+    Mp3Info.open(TEMP_FILE) { |info| info.tag1 = @tag }
+    Mp3Info.open(TEMP_FILE) { |info| assert(info.tag1 == @tag) }
+  end
+
+  def test_valid_tag1_1
+    tag = [ "title", "artist", "album", "1921", "comments", 36, 0].pack('A30A30A30A4a29CC')
+    valid_tag = {
+      "title" => "title",
+      "artist" => "artist",
+      "album" => "album",
+      "year" => 1921,
+      "comments" => "comments",
+      "genre" => "Blues",
+      #"version" => "1",
+      "tracknum" => 36
+    }
+    id3_test(tag, valid_tag)
+  end
+  
+  def test_valid_tag1_0
+    tag = [ "title", "artist", "album", "1921", "comments", 0].pack('A30A30A30A4A30C')
+    valid_tag = {
+      "title" => "title",
+      "artist" => "artist",
+      "album" => "album",
+      "year" => 1921,
+      "comments" => "comments",
+      "genre" => "Blues",
+      #"version" => "0"
+    }
+    id3_test(tag, valid_tag)
+  end
+
+  def id3_test(tag_str, valid_tag)
+    tag = "TAG" + tag_str
+    File.open(TEMP_FILE, "w") do |f|
+      f.write(@valid_mp3)
+      f.write(tag)
+    end
+    assert(Mp3Info.hastag1?(TEMP_FILE))
+    #info = Mp3Info.new(TEMP_FILE)
+    #FIXME validate this test
+    #assert_equal(info.tag1, valid_tag)
+  end
+
+  def test_removetag2
+    w = write_temp_file({"TIT2" => "sdfqdsf"})
+
+    assert( Mp3Info.hastag2?(TEMP_FILE) )
+    Mp3Info.removetag2(TEMP_FILE)
+    assert( ! Mp3Info.hastag2?(TEMP_FILE) )
+  end
+
+  def test_universal_tag
+    2.times do 
+      tag = {"title" => "title"}
+      Mp3Info.open(TEMP_FILE) do |mp3|
+	tag.each { |k,v| mp3.tag[k] = v }
+      end
+      w = Mp3Info.open(TEMP_FILE) { |m| m.tag }
+      assert_equal(tag, w)
+    end
+  end
+
+  def test_id3v2_universal_tag
+    tag = {}
+    %w{comments title artist album}.each { |k| tag[k] = k }
+    tag["tracknum"] = 34
+    Mp3Info.open(TEMP_FILE) do |mp3|
+      tag.each { |k,v| mp3.tag[k] = v }
+    end
+    w = Mp3Info.open(TEMP_FILE) { |m| m.tag }
+    w.delete("genre")
+    w.delete("genre_s")
+    assert_equal(tag, w)
+#    id3v2_prog_test(tag, w)
+  end
+
+  def test_id3v2_version
+    written_tag = write_temp_file(BASIC_TAG2)
+    assert_equal( "2.3.0", written_tag.version )
+  end
+
+  def test_id3v2_methods
+    tag = { "TIT2" => "tit2", "TPE1" => "tpe1" }
+    Mp3Info.open(TEMP_FILE) do |mp3|
+      tag.each do |k, v|
+        mp3.tag2.send("#{k}=".to_sym, v)
+      end
+      assert_equal(tag, mp3.tag2)
+    end
+  end
+
+  def test_id3v2_basic
+    w = write_temp_file(BASIC_TAG2)
+    assert_equal(BASIC_TAG2, w)
+    id3v2_prog_test(BASIC_TAG2, w)
+  end
+
+  def test_id3v2_trash
+  end
+
+  def test_id3v2_complex
+    tag = {}
+    #ID3v2::TAGS.keys.each do |k|
+    ["PRIV", "APIC"].each do |k|
+      tag[k] = random_string(50)
+    end
+    assert_equal(tag, write_temp_file(tag))
+  end
+
+  def test_id3v2_bigtag
+    tag = {"APIC" => random_string(1024) }
+    assert_equal(tag, write_temp_file(tag))
+  end
+
+    #test the tag with php getid3
+#    prog = %{
+#    <?php
+#      require("/var/www/root/netjuke/lib/getid3/getid3.php");
+#      $mp3info = GetAllFileInfo('#{TEMP_FILE}');
+#      echo $mp3info;
+#    ?>
+#    }
+#
+#    open("|php", "r+") do |io|
+#      io.puts(prog)
+#      io.close_write
+#      p io.read
+#    end
+
+  #test the tag with the "id3v2" program
+  def id3v2_prog_test(tag, written_tag)
+    return if PLATFORM =~ /win32/
+    return if `which id3v2`.empty?
+    start = false
+    id3v2_output = {}
+    `id3v2 -l #{TEMP_FILE}`.each do |line|
+      if line =~ /^id3v2 tag info/
+        start = true 
+	next    
+      end
+      next unless start
+      k, v = /^(.{4}) \(.+\): (.+)$/.match(line)[1,2]
+      case k
+	#COMM (Comments): ()[spa]: fmg
+        when "COMM"
+	  v.sub!(/\(\)\[.{3}\]: (.+)/, '\1')
+      end
+      id3v2_output[k] = v
+    end
+
+    assert_equal( id3v2_output, written_tag, "id3v2 program output doesn't match")
+  end
+
+  def write_temp_file(tag)
+    Mp3Info.open(TEMP_FILE) do |mp3|
+      mp3.tag2.update(tag)
+    end
+    return Mp3Info.open(TEMP_FILE) { |m| m.tag2 }
+    #system("cp -v #{TEMP_FILE} #{TEMP_FILE}.test")
+  end
+
+  def random_string(size)
+    out = ""
+    size.times { out << rand(256).chr }
+    out
+  end
+
+=begin
+
+  def test_encoder
+    write_to_temp
+    info = Mp3Info.new(TEMP_FILE)
+    assert(info.encoder == "Lame 3.93")
+  end
+
+  def test_vbr
+    mp3_vbr = Base64.decode64 <<EOF
+
+EOF
+    File.open(TEMP_FILE, "w") { |f| f.write(mp3_vbr) }
+    info = Mp3Info.new(TEMP_FILE)
+    assert_equal(info.vbr, true)
+    assert_equal(info.bitrate, 128)
+  end
+=end
+end