mp4info 1.7.3

data/README.rdoc

@@ -0,0 +1,74 @@
+= Introduction
+MP4Info supports the reading of tags and file info from MP4 audio files.
+It is based on the Perl module MP4::Info (http://search.cpan.org/~jhar/MP4-Info/)
+Note: MP4Info does not currently support Unicode strings.
+
+= License
+This program is free software; you can redistribute it and/or modify
+it under the terms of version 2 of the GNU General Public License as
+published by the Free Software Foundation.
+
+This program is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with this program; if not, write to the Free Software
+Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+
+= Usage
+
+With mp4info.rb in your load path, do:
+
+  require 'mp4info'
+
+Once the library is loaded, an MP4Info object is created by sending an IO
+object to MP4Info#new. MP4Info also provides the MP4Info#open method, which
+takes String containing a filename.
+
+  file = "my_favorite_song.mp4"
+  info = MP4Info.open(file)
+
+  io_stream = File.new("that_other_song.m4a")
+  other_info = MP4Info.new(io_stream)
+
+Once an MP4Info object is succesfully created, a number of tags are
+avalible:
+
+  * ALB   - Album
+  * APID  - Apple Store ID
+  * ART   - Artist
+  * CMT   - Comment
+  * COVR  - Album art (typically jpeg data)
+  * CPIL  - Compilation (boolean)
+  * CPRT  - Copyright statement
+  * DAY   - Year
+  * DISK  - Disk number & total (Array of two integers)
+  * GNRE  - Genre
+  * GRP   - Grouping
+  * NAM   - Title
+  * RTNG  - Rating (integer)
+  * TMPO  - Tempo (integer)
+  * TOO   - Encoder
+  * TRKN  - Track number & total (Array of two integers)
+  * WRT   - Author or composer
+
+The following extra information about the audio file is also provided:
+
+  * VERSION   - MPEG version (=4)
+  * LAYER     - Doesn't really mean antyhing, but here in case we need it
+                for compatibility with an MP3 library...
+  * BITRATE   - Bitrate in kbps (average for VBR files)
+                The formula used to generate this seems a little suspect.
+  * FREQUENCY - Frequency in kHz
+  * SIZE      - Bytes in audio stream
+  
+  * SECS  - Total seconds, rounded to nearest second
+  * MM    - Minutes
+  * SS    - Leftover seconds
+  * MS    - Leftover milliseconds, rounded to nearest millisecond
+  * TIME  - Time in MM:SS, rounded to nearest second
+
+  * COPYRIGHT	- Non-nil if audio is copyrighted
+  * ENCRYPTED	- Non-nil if audio data is encrypted

data/docs/license.txt

@@ -0,0 +1,340 @@
+		    GNU GENERAL PUBLIC LICENSE
+		       Version 2, June 1991
+
+ Copyright (C) 1989, 1991 Free Software Foundation, Inc.
+                       51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+ Everyone is permitted to copy and distribute verbatim copies
+ of this license document, but changing it is not allowed.
+
+			    Preamble
+
+  The licenses for most software are designed to take away your
+freedom to share and change it.  By contrast, the GNU General Public
+License is intended to guarantee your freedom to share and change free
+software--to make sure the software is free for all its users.  This
+General Public License applies to most of the Free Software
+Foundation's software and to any other program whose authors commit to
+using it.  (Some other Free Software Foundation software is covered by
+the GNU Library General Public License instead.)  You can apply it to
+your programs, too.
+
+  When we speak of free software, we are referring to freedom, not
+price.  Our General Public Licenses are designed to make sure that you
+have the freedom to distribute copies of free software (and charge for
+this service if you wish), that you receive source code or can get it
+if you want it, that you can change the software or use pieces of it
+in new free programs; and that you know you can do these things.
+
+  To protect your rights, we need to make restrictions that forbid
+anyone to deny you these rights or to ask you to surrender the rights.
+These restrictions translate to certain responsibilities for you if you
+distribute copies of the software, or if you modify it.
+
+  For example, if you distribute copies of such a program, whether
+gratis or for a fee, you must give the recipients all the rights that
+you have.  You must make sure that they, too, receive or can get the
+source code.  And you must show them these terms so they know their
+rights.
+
+  We protect your rights with two steps: (1) copyright the software, and
+(2) offer you this license which gives you legal permission to copy,
+distribute and/or modify the software.
+
+  Also, for each author's protection and ours, we want to make certain
+that everyone understands that there is no warranty for this free
+software.  If the software is modified by someone else and passed on, we
+want its recipients to know that what they have is not the original, so
+that any problems introduced by others will not reflect on the original
+authors' reputations.
+
+  Finally, any free program is threatened constantly by software
+patents.  We wish to avoid the danger that redistributors of a free
+program will individually obtain patent licenses, in effect making the
+program proprietary.  To prevent this, we have made it clear that any
+patent must be licensed for everyone's free use or not licensed at all.
+
+  The precise terms and conditions for copying, distribution and
+modification follow.
+
+		    GNU GENERAL PUBLIC LICENSE
+   TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
+
+  0. This License applies to any program or other work which contains
+a notice placed by the copyright holder saying it may be distributed
+under the terms of this General Public License.  The "Program", below,
+refers to any such program or work, and a "work based on the Program"
+means either the Program or any derivative work under copyright law:
+that is to say, a work containing the Program or a portion of it,
+either verbatim or with modifications and/or translated into another
+language.  (Hereinafter, translation is included without limitation in
+the term "modification".)  Each licensee is addressed as "you".
+
+Activities other than copying, distribution and modification are not
+covered by this License; they are outside its scope.  The act of
+running the Program is not restricted, and the output from the Program
+is covered only if its contents constitute a work based on the
+Program (independent of having been made by running the Program).
+Whether that is true depends on what the Program does.
+
+  1. You may copy and distribute verbatim copies of the Program's
+source code as you receive it, in any medium, provided that you
+conspicuously and appropriately publish on each copy an appropriate
+copyright notice and disclaimer of warranty; keep intact all the
+notices that refer to this License and to the absence of any warranty;
+and give any other recipients of the Program a copy of this License
+along with the Program.
+
+You may charge a fee for the physical act of transferring a copy, and
+you may at your option offer warranty protection in exchange for a fee.
+
+  2. You may modify your copy or copies of the Program or any portion
+of it, thus forming a work based on the Program, and copy and
+distribute such modifications or work under the terms of Section 1
+above, provided that you also meet all of these conditions:
+
+    a) You must cause the modified files to carry prominent notices
+    stating that you changed the files and the date of any change.
+
+    b) You must cause any work that you distribute or publish, that in
+    whole or in part contains or is derived from the Program or any
+    part thereof, to be licensed as a whole at no charge to all third
+    parties under the terms of this License.
+
+    c) If the modified program normally reads commands interactively
+    when run, you must cause it, when started running for such
+    interactive use in the most ordinary way, to print or display an
+    announcement including an appropriate copyright notice and a
+    notice that there is no warranty (or else, saying that you provide
+    a warranty) and that users may redistribute the program under
+    these conditions, and telling the user how to view a copy of this
+    License.  (Exception: if the Program itself is interactive but
+    does not normally print such an announcement, your work based on
+    the Program is not required to print an announcement.)
+
+These requirements apply to the modified work as a whole.  If
+identifiable sections of that work are not derived from the Program,
+and can be reasonably considered independent and separate works in
+themselves, then this License, and its terms, do not apply to those
+sections when you distribute them as separate works.  But when you
+distribute the same sections as part of a whole which is a work based
+on the Program, the distribution of the whole must be on the terms of
+this License, whose permissions for other licensees extend to the
+entire whole, and thus to each and every part regardless of who wrote it.
+
+Thus, it is not the intent of this section to claim rights or contest
+your rights to work written entirely by you; rather, the intent is to
+exercise the right to control the distribution of derivative or
+collective works based on the Program.
+
+In addition, mere aggregation of another work not based on the Program
+with the Program (or with a work based on the Program) on a volume of
+a storage or distribution medium does not bring the other work under
+the scope of this License.
+
+  3. You may copy and distribute the Program (or a work based on it,
+under Section 2) in object code or executable form under the terms of
+Sections 1 and 2 above provided that you also do one of the following:
+
+    a) Accompany it with the complete corresponding machine-readable
+    source code, which must be distributed under the terms of Sections
+    1 and 2 above on a medium customarily used for software interchange; or,
+
+    b) Accompany it with a written offer, valid for at least three
+    years, to give any third party, for a charge no more than your
+    cost of physically performing source distribution, a complete
+    machine-readable copy of the corresponding source code, to be
+    distributed under the terms of Sections 1 and 2 above on a medium
+    customarily used for software interchange; or,
+
+    c) Accompany it with the information you received as to the offer
+    to distribute corresponding source code.  (This alternative is
+    allowed only for noncommercial distribution and only if you
+    received the program in object code or executable form with such
+    an offer, in accord with Subsection b above.)
+
+The source code for a work means the preferred form of the work for
+making modifications to it.  For an executable work, complete source
+code means all the source code for all modules it contains, plus any
+associated interface definition files, plus the scripts used to
+control compilation and installation of the executable.  However, as a
+special exception, the source code distributed need not include
+anything that is normally distributed (in either source or binary
+form) with the major components (compiler, kernel, and so on) of the
+operating system on which the executable runs, unless that component
+itself accompanies the executable.
+
+If distribution of executable or object code is made by offering
+access to copy from a designated place, then offering equivalent
+access to copy the source code from the same place counts as
+distribution of the source code, even though third parties are not
+compelled to copy the source along with the object code.
+
+  4. You may not copy, modify, sublicense, or distribute the Program
+except as expressly provided under this License.  Any attempt
+otherwise to copy, modify, sublicense or distribute the Program is
+void, and will automatically terminate your rights under this License.
+However, parties who have received copies, or rights, from you under
+this License will not have their licenses terminated so long as such
+parties remain in full compliance.
+
+  5. You are not required to accept this License, since you have not
+signed it.  However, nothing else grants you permission to modify or
+distribute the Program or its derivative works.  These actions are
+prohibited by law if you do not accept this License.  Therefore, by
+modifying or distributing the Program (or any work based on the
+Program), you indicate your acceptance of this License to do so, and
+all its terms and conditions for copying, distributing or modifying
+the Program or works based on it.
+
+  6. Each time you redistribute the Program (or any work based on the
+Program), the recipient automatically receives a license from the
+original licensor to copy, distribute or modify the Program subject to
+these terms and conditions.  You may not impose any further
+restrictions on the recipients' exercise of the rights granted herein.
+You are not responsible for enforcing compliance by third parties to
+this License.
+
+  7. If, as a consequence of a court judgment or allegation of patent
+infringement or for any other reason (not limited to patent issues),
+conditions are imposed on you (whether by court order, agreement or
+otherwise) that contradict the conditions of this License, they do not
+excuse you from the conditions of this License.  If you cannot
+distribute so as to satisfy simultaneously your obligations under this
+License and any other pertinent obligations, then as a consequence you
+may not distribute the Program at all.  For example, if a patent
+license would not permit royalty-free redistribution of the Program by
+all those who receive copies directly or indirectly through you, then
+the only way you could satisfy both it and this License would be to
+refrain entirely from distribution of the Program.
+
+If any portion of this section is held invalid or unenforceable under
+any particular circumstance, the balance of the section is intended to
+apply and the section as a whole is intended to apply in other
+circumstances.
+
+It is not the purpose of this section to induce you to infringe any
+patents or other property right claims or to contest validity of any
+such claims; this section has the sole purpose of protecting the
+integrity of the free software distribution system, which is
+implemented by public license practices.  Many people have made
+generous contributions to the wide range of software distributed
+through that system in reliance on consistent application of that
+system; it is up to the author/donor to decide if he or she is willing
+to distribute software through any other system and a licensee cannot
+impose that choice.
+
+This section is intended to make thoroughly clear what is believed to
+be a consequence of the rest of this License.
+
+  8. If the distribution and/or use of the Program is restricted in
+certain countries either by patents or by copyrighted interfaces, the
+original copyright holder who places the Program under this License
+may add an explicit geographical distribution limitation excluding
+those countries, so that distribution is permitted only in or among
+countries not thus excluded.  In such case, this License incorporates
+the limitation as if written in the body of this License.
+
+  9. The Free Software Foundation may publish revised and/or new versions
+of the General Public License from time to time.  Such new versions will
+be similar in spirit to the present version, but may differ in detail to
+address new problems or concerns.
+
+Each version is given a distinguishing version number.  If the Program
+specifies a version number of this License which applies to it and "any
+later version", you have the option of following the terms and conditions
+either of that version or of any later version published by the Free
+Software Foundation.  If the Program does not specify a version number of
+this License, you may choose any version ever published by the Free Software
+Foundation.
+
+  10. If you wish to incorporate parts of the Program into other free
+programs whose distribution conditions are different, write to the author
+to ask for permission.  For software which is copyrighted by the Free
+Software Foundation, write to the Free Software Foundation; we sometimes
+make exceptions for this.  Our decision will be guided by the two goals
+of preserving the free status of all derivatives of our free software and
+of promoting the sharing and reuse of software generally.
+
+			    NO WARRANTY
+
+  11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY
+FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW.  EXCEPT WHEN
+OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES
+PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED
+OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
+MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.  THE ENTIRE RISK AS
+TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU.  SHOULD THE
+PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING,
+REPAIR OR CORRECTION.
+
+  12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
+WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR
+REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES,
+INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING
+OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED
+TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY
+YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER
+PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE
+POSSIBILITY OF SUCH DAMAGES.
+
+		     END OF TERMS AND CONDITIONS
+
+      How to Apply These Terms to Your New Programs
+
+  If you develop a new program, and you want it to be of the greatest
+possible use to the public, the best way to achieve this is to make it
+free software which everyone can redistribute and change under these terms.
+
+  To do so, attach the following notices to the program.  It is safest
+to attach them to the start of each source file to most effectively
+convey the exclusion of warranty; and each file should have at least
+the "copyright" line and a pointer to where the full notice is found.
+
+    <one line to give the program's name and a brief idea of what it does.>
+    Copyright (C) <year>  <name of author>
+
+    This program is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    (at your option) any later version.
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with this program; if not, write to the Free Software
+    Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+
+
+Also add information on how to contact you by electronic and paper mail.
+
+If the program is interactive, make it output a short notice like this
+when it starts in an interactive mode:
+
+    Gnomovision version 69, Copyright (C) year name of author
+    Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
+    This is free software, and you are welcome to redistribute it
+    under certain conditions; type `show c' for details.
+
+The hypothetical commands `show w' and `show c' should show the appropriate
+parts of the General Public License.  Of course, the commands you use may
+be called something other than `show w' and `show c'; they could even be
+mouse-clicks or menu items--whatever suits your program.
+
+You should also get your employer (if you work as a programmer) or your
+school, if any, to sign a "copyright disclaimer" for the program, if
+necessary.  Here is a sample; alter the names:
+
+  Yoyodyne, Inc., hereby disclaims all copyright interest in the program
+  `Gnomovision' (which makes passes at compilers) written by James Hacker.
+
+  <signature of Ty Coon>, 1 April 1989
+  Ty Coon, President of Vice
+
+This General Public License does not permit incorporating your program into
+proprietary programs.  If your program is a subroutine library, you may
+consider it more useful to permit linking proprietary applications with the
+library.  If this is what you want to do, use the GNU Library General
+Public License instead of this License.

data/lib/mp4info-windows-binmode.patch

@@ -0,0 +1,15 @@
+Index: mp4info.rb
+===================================================================
+--- mp4info.rb	(revision 41)
++++ mp4info.rb	(working copy)
+@@ -185,6 +185,10 @@
+       data = read_or_raise(io_stream, size, "Premature end of file")
+       
+       cache = Tempfile.new "mp4info"
++      
++      # required for Windows
++      cache.binmode
++      
+       cache.write data
+       cache.open
+       cache.rewind

data/lib/mp4info.rb

@@ -0,0 +1,505 @@
+# = Introduction
+# MP4Info supports the reading of tags and file info from MP4 audio files.
+# It is based on the Perl module MP4::Info (http://search.cpan.org/~jhar/MP4-Info/)
+# Note: MP4Info does not currently support Unicode strings.
+#
+# = License
+# Copyright (c) 2004-2007 Jonathan Harris <jhar@cpan.org>
+# Copyright (C) 2006-2007 Jason Terk <rain@xidus.net>
+# 
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of version 2 of the GNU General Public License as
+# published by the Free Software Foundation.
+# 
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+# 
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+#
+# See the README file for usage information.
+
+require 'tempfile'
+
+class MP4Info
+  # Initialize a new MP4Info object from an IO object
+  def initialize(io_stream)
+    # Tag atoms
+    @data_atoms = {
+      "AART" => nil, "ALB" => nil, "ART" => nil, "CMT" => nil,
+      "COVR" => nil, "CPIL" => nil, "CPRT" => nil, "DAY" => nil,
+      "DISK" => nil, "GEN" => nil, "GNRE" => nil, "GRP" => nil,
+      "NAM" => nil, "RTNG" => nil, "TMPO" => nil, "TOO" => nil,
+      "TRKN" => nil, "WRT" => nil, "APID" => nil, "AKID" => nil,
+      "ATID" => nil, "CNID" => nil, "GEID" => nil, "PLID" => nil,
+      "TITL" => nil, "DSCP" => nil, "PERF" => nil, "AUTH" => nil
+    }
+    
+    # Info atoms
+    @info_atoms = {
+      "VERSION" => nil, "BITRATE" => nil, "FREQUENCY" => nil, "MS" => nil,
+      "SIZE" => nil, "SECS" => nil, "MM" => nil, "SS" => nil, "ENCRYPTED" => nil,
+      "TIME" => nil, "COPYRIGHT" => nil, "LAYER" => nil
+    }
+
+    # Atoms that contain other atoms
+    @container_atoms = {
+      "ILST" => nil, "MDIA" => nil, "MINF" => nil, "MOOV" => nil,
+      "STBL" => nil, "TRAK" => nil, "UDTA" => nil
+    }
+    
+    # Non standard data atoms
+    @other_atoms = {
+      "MDAT" => :parse_mdat, "META" => :parse_meta,
+      "MVHD" => :parse_mvhd, "STSD" => :parse_stsd,
+      "MOOV" => :parse_moov, "UUID" => :parse_uuid
+    }
+    
+    # Info/Tag aliases
+    @aliases = {}
+    
+    # Just in case
+    io_stream.binmode
+    
+    # Sanity check
+    head = read_or_raise(io_stream, 8, "#{io_stream} does not appear to be an IO stream")
+    raise "#{io_stream} does not appear to be an MP4 file" unless head[4..7].downcase == "ftyp"
+    
+    # Back to the beginning
+    io_stream.rewind
+    
+    parse_container io_stream, 0, io_stream.stat.size
+    
+    @info_atoms["VERSION"] = 4
+    @info_atoms["LAYER"] = 1 if @info_atoms["FREQUENCY"]
+    if (@info_atoms["SIZE"] && @info_atoms["MS"])
+      @info_atoms["BITRATE"] = ( 0.5 + @info_atoms["SIZE"] /
+        ( ( @info_atoms["MM"] * 60 + @info_atoms["SS"] + (@info_atoms["MS"] * 1.0) / 1000 ) * 128 ) ).floor
+    end
+    @info_atoms["COPYRIGHT"] = true if @info_atoms["CPRT"]
+  end
+
+  # Get an MP4Info object from a file name
+  def MP4Info.open(file_name)
+    MP4Info.new(File.new(file_name))
+  end
+  
+  # Dynamically get tags and info
+  def method_missing(id)
+    field = id.to_s
+  
+    if (@data_atoms.has_key?(field))
+      @data_atoms[field]
+    elsif (@info_atoms.has_key?(field))
+      @info_atoms[field]
+    elsif (@aliases.has_key?(field))
+      @aliases[field]
+    else
+      nil
+    end
+  end
+  
+  private
+    # Parse a container
+    def parse_container(io_stream, level, size)
+      level += 1
+      container_end = io_stream.pos + size
+      
+      while io_stream.pos < container_end do
+        parse_atom io_stream, level, container_end - io_stream.pos
+      end
+      
+      if (io_stream.pos != container_end)
+        raise "Parse error"
+      end
+    end
+    
+    # Parse an atom
+    def parse_atom(io_stream, level, parent_size)
+      head = read_or_raise(io_stream, 8, "Premature end of file")
+      
+      size, id = head.unpack("Na4")
+      
+      if (size == 0)
+        position = io_stream.pos
+        io_stream.seek(0, 2)
+        size = io_stream.pos - position
+        io_stream.seek(position, 0)
+      elsif (size == 1)
+        # Extended size, whatever that means
+        head = read_or_raise(io_stream, 8, "Premature end of file")
+        hi, low = head.unpack("NN")
+        size = hi * (2**32) + low - 16
+        
+        if (size > parent_size)
+          # Atom extends outside of parent container; skip to the end
+          io_stream.seek(parent_size - 16, 1)
+          return
+        end
+        
+        size -= 16
+      else
+        if (size > parent_size)
+          # Atom extends outside of parent container; skip to the end
+          io_stream.seek(parent_size - 8, 1)
+          return
+        end
+        
+        size -= 8;
+      end
+      
+      if (size < 0)
+        raise "Parse error"
+      end
+      
+      if id[0] == 169 
+        # strip copyright sign at the beginning
+        id = id[1..-1]
+      end
+      id = id.upcase
+      
+      printf "%s%s: %d bytes\n", ' ' * ( 2 * level ), id, size if $DEBUG
+      
+      if (@data_atoms.has_key?(id))
+        parse_data io_stream, level, size, id
+      elsif (@other_atoms.has_key?(id))
+        self.send(@other_atoms[id], io_stream, level, size)
+      elsif (@container_atoms.has_key?(id))
+        parse_container io_stream, level, size
+      else
+        # Unknown atom, move on
+        io_stream.seek size, 1
+      end
+    end
+    
+    # Parse a MOOV container
+    #
+    # Pre-conditions: size = size of atom contents
+    #                 io_stream points to start of atom contents
+    #
+    # Post-condition: io_stream points past end of atom contents
+    def parse_moov(io_stream, level, size)
+      data = read_or_raise(io_stream, size, "Premature end of file")
+      
+      cache = Tempfile.new "mp4info"
+      
+      # required for Windows
+      cache.binmode
+      
+      cache.write data
+      cache.open
+      cache.rewind
+      
+      parse_container(cache, level, size)
+      
+      cache.close!
+    end
+    
+    # Parse an MDAT atom
+    #
+    # Pre-conditions: size = size of atom contents
+    #                 io_stream points to start of atom contents
+    #
+    # Post-condition: io_stream points past end of atom contents
+    def parse_mdat(io_stream, level, size)
+      @info_atoms["SIZE"] = 0 unless @info_atoms["SIZE"]
+      @info_atoms["SIZE"] += size
+      io_stream.seek(size, 1)
+    end
+    
+    # Parse a META atom
+    #
+    # Pre-conditions: size = size of atom contents
+    #                 io_stream points to start of atom contents
+    #
+    # Post-condition: io_stream points past end of atom contents
+    def parse_meta(io_stream, level, size)
+      # META is a container preceeded by a version field
+      io_stream.seek(4, 1)
+      parse_container(io_stream, level, size - 4)
+    end
+    
+    # Parse an MVHD atom
+    #
+    # Pre-conditions: size = size of atom contents
+    #                 io_stream points to start of atom contents
+    #
+    # Post-condition: io_stream points past end of atom contents
+    def parse_mvhd(io_stream, level, size)
+      raise "Parse error" if size < 32
+      data = read_or_raise(io_stream, size, "Premature end of file")
+      
+      version = data.unpack("C")[0] & 255
+      if (version == 0)
+        scale, duration = data[12..19].unpack("NN")
+      elsif (version == 1)
+        scale, hi, low = data[20..31].unpack("NNN")
+        duration = hi * (2**32) + low
+      else
+        return
+      end
+      
+      printf "  %sDur/Scl=#{duration}/#{scale}\n", ' ' * ( 2 * level ) if $DEBUG
+      
+      secs                = (duration * 1.0) / scale
+      @info_atoms["SECS"] = (secs).round
+      @info_atoms["MM"]   = (secs / 60).floor
+      @info_atoms["SS"]   = (secs - @info_atoms["MM"] * 60).floor
+      @info_atoms["MS"]   = (1000 * (secs - secs.floor)).round
+      @info_atoms["TIME"] = sprintf "%02d:%02d", @info_atoms["MM"],
+                            @info_atoms["SECS"] - @info_atoms["MM"] * 60;
+    end
+    
+    # Parse an STSD atom
+    #
+    # Pre-conditions: size = size of atom contents
+    #                 io_stream points to start of atom contents
+    #
+    # Post-condition: io_stream points past end of atom contents
+    def parse_stsd(io_stream, level, size)
+      raise "Parse error" if size < 44
+      data = read_or_raise(io_stream, size, "Premature end of headers")
+      
+      printf "  %sSample=%s\n", ' ' * ( 2 * level ), data[12..15] if $DEBUG
+      
+      data_format = data[12..15].downcase
+      
+      # Is this an audio track?
+      if (data_format == "mp4a" || data_format == "drms" ||
+          data_format == "samr" || data_format == "sawb" ||
+          data_format == "sawp" || data_format == "enca" ||
+          data_format == "alac" )
+        @info_atoms["ENCODING"] = data_format
+        @info_atoms["FREQUENCY"] = (data[40..43].unpack("N")[0] * 1.0) / 65536000
+        printf "  %sFreq=%s\n", ' ' * ( 2 * level ), @info_atoms["FREQUENCY"] if $DEBUG
+      end
+      
+      if (data_format == "drms" || data_format[0..2] == "enc")
+        @info_atoms["ENCRYPTED"] = true;
+      end
+    end
+
+    # User-defined box. Used by PSP - See ffmpeg libavformat/movenc.c
+    #
+    # Pre-conditions: size = size of atom contents
+    #                 io_stream points to start of atom contents
+    #
+    # Post-condition: io_stream points past end of atom contents
+    def parse_uuid(io_stream, level, size)
+      data = read_or_raise(io_stream, size, "Premature end of file")
+      
+      return unless size > 26
+      
+      u1, u2, u3, u4 = data.unpack 'a4NNN'
+      
+      if (u1 == "USMT")
+        pspsize, pspid = data[16..23].unpack 'Na4'
+        
+        return unless pspsize == size - 16
+        
+        if (pspid == "MTDT")
+          nblocks = data[24..25].unpack 'n'
+          data = data[26..(data.length - 1)]
+          
+          while nblocks
+            bsize, btype, flags, ptype = data.unpack 'nNnn'
+            
+            if (btype == 1 && bsize == 12 &&
+                ptype == 1 && @data_atoms["NAM"].nil?)
+              @data_atoms["NAM"] = data[10..(10 + bsize - 11)]
+            elsif (btype == 4 && bsize > 12 && ptype == 1)
+              @data_atoms["TOO"] = data[10..(10 + bsize - 11)]
+            end
+            
+            data = data[bsize..(data.length - 1)]
+            nblocks -= 1
+          end
+        end
+      end
+    end
+    
+    def parse_data(io_stream, level, size, id)
+      # Possible genres...
+      mp4_genres = [
+        'N/A',               'Blues',
+        'Classic Rock',      'Country',
+        'Dance',             'Disco',
+        'Funk',              'Grunge',
+        'Hip-Hop',           'Jazz',
+        'Metal',             'New Age',
+        'Oldies',            'Other',
+        'Pop',               'R&B',
+        'Rap',               'Reggae',
+        'Rock',              'Techno',
+        'Industrial',        'Alternative',
+        'Ska',               'Death Metal',
+        'Pranks',            'Soundtrack',
+        'Euro-Techno',       'Ambient',
+        'Trip-Hop',          'Vocal',
+        'Jazz+Funk',         'Fusion',
+        'Trance',            'Classical',
+        'Instrumental',      'Acid',
+        'House',             'Game',
+        'Sound Clip',        'Gospel',
+        'Noise',             'AlternRock',
+        'Bass',              'Soul',
+        'Punk',              'Space',
+        'Meditative',        'Instrumental Pop',
+        'Instrumental Rock', 'Ethnic',
+        'Gothic',            'Darkwave',
+        'Techno-Industrial', 'Electronic',
+        'Pop-Folk',          'Eurodance',
+        'Dream',             'Southern Rock',
+        'Comedy',            'Cult',
+        'Gangsta',           'Top 40',
+        'Christian Rap',     'Pop/Funk',
+        'Jungle',            'Native American',
+        'Cabaret',           'New Wave',
+        'Psychadelic',       'Rave',
+        'Showtunes',         'Trailer',
+        'Lo-Fi',             'Tribal',
+        'Acid Punk',         'Acid Jazz',
+        'Polka',             'Retro',
+        'Musical',           'Rock & Roll',
+        'Hard Rock',         'Folk',
+        'Folk/Rock',         'National Folk',
+        'Swing',             'Fast-Fusion',
+        'Bebob',             'Latin',
+        'Revival',           'Celtic',
+        'Bluegrass',         'Avantgarde',
+        'Gothic Rock',       'Progressive Rock',
+        'Psychedelic Rock',  'Symphonic Rock',
+        'Slow Rock',         'Big Band',
+        'Chorus',            'Easy Listening',
+        'Acoustic',          'Humour',
+        'Speech',            'Chanson',
+        'Opera',             'Chamber Music',
+        'Sonata',            'Symphony',
+        'Booty Bass',        'Primus',
+        'Porn Groove',       'Satire',
+        'Slow Jam',          'Club',
+        'Tango',             'Samba',
+        'Folklore',          'Ballad',
+        'Power Ballad',      'Rhythmic Soul',
+        'Freestyle',         'Duet',
+        'Punk Rock',         'Drum Solo',
+        'A capella',         'Euro-House',
+        'Dance Hall',        'Goa',
+        'Drum & Bass',       'Club House',
+        'Hardcore',          'Terror',
+        'Indie',             'BritPop',
+        'NegerPunk',         'Polsk Punk',
+        'Beat',              'Christian Gangsta',
+        'Heavy Metal',       'Black Metal',
+        'Crossover',         'Contemporary C',
+        'Christian Rock',    'Merengue',
+        'Salsa',             'Thrash Metal',
+        'Anime',             'JPop',
+        'SynthPop'
+      ]
+      
+      data = read_or_raise(io_stream, size, "Premature end of file")
+      
+      if (id == "TITL" || id == "DSCP" || id == "CPRT" ||
+          id == "PERF" || id == "AUTH" || id == "GNRE")
+        ver = data.unpack("N")[0]
+        if (ver == 0)
+          return unless size > 7
+          size -= 7
+          type = 1
+          data = data[6..(6 + size - 1)]
+          
+          if (id == "TITL")
+            return if !@data_atoms["NAM"].nil?
+            id = "NAM"
+          elsif (id == "DSCP")
+            return if !@data_atoms["CMT"].nil?
+            id = "CMT"
+          elsif (id == "PERF")
+            return if !@data_atoms["ART"].nil?
+            id = "ART"
+          elsif (id == "AUTH")
+            return if !@data_atoms["WRT"].nil?
+            id = "WRT"
+          end
+        end
+      end
+        
+      if (id == "MEAN" || id == "NAME" || id == "DATA")
+        if id == "DATA"
+          data = data[8..(data.length - 1)]
+        else
+          data = data[4..(data.length - 1)]
+        end
+        
+        @data_atoms[id] = data
+        return
+      end
+      
+      if (type.nil?)
+        return unless size > 16
+        size, atom, type = data.unpack("Na4N")
+        
+        return unless atom.downcase == "data" and size > 16
+        
+        size = size - 16
+        type = type & 255
+        data = data[16..(16 + size - 1)]
+      end
+      
+      printf "  %sType=#{type}, Size=#{size}\n", ' ' * ( 2 * level ) if $DEBUG
+      
+      if (id == "COVR")
+        @data_atoms[id] = data
+      elsif (type == 0)
+        ints = data.unpack("n" * (size / 2))
+        if (id == "GNRE")
+          @data_atoms[id] = mp4_genres[ints[0]]
+        elsif (id == "DISK" || id == "TRKN")
+          @data_atoms[id] = [ints[1], (size >= 6 ? ints[2] : 0)] if size >= 4
+        elsif (size >= 4)
+          @data_atoms[id] = ints[1]
+        end
+      elsif (type == 1)
+        if (id == "GEN")
+          return if !@data_atoms["GNRE"].nil?
+          id = "GNRE"
+        elsif (id == "AART")
+          return if !@data_atoms["ART"].nil?
+          id = "ART"
+        elsif (id == "DAY")
+          data = data[0..3]
+          return if data == 0
+        end
+        
+        @data_atoms[id] = data
+      elsif (type == 21)
+        if (size == 1)
+          @data_atoms[id] = data.unpack("C")[0]
+        elsif (size == 2)
+          @data_atoms[id] = data.unpack("n")[0]
+        elsif (size == 4)
+          @data_atoms[id] = data.unpack("N")[0]
+        elsif (size == 8)
+          hi, low = data.unpack("NN")
+          @data_atoms[id] = hi * (2 ** 32) + low
+        else
+          @data_atoms[id] = data
+        end
+      elsif (type == 13 || type == 14)
+        @data_atoms[id] = data
+      end
+    end
+    
+    # Utility method; read bytes bytes from io_stream or raise message message
+    def read_or_raise(io_stream, bytes, message)
+      buffer = io_stream.read(bytes)
+      if (buffer.length != bytes)
+        raise message
+      end
+      buffer
+    end
+end

data/test/test.rb

@@ -0,0 +1,201 @@
+#!/usr/bin/env ruby
+
+# Copyright (c) 2004-2007 Jonathan Harris <jhar@cpan.org>
+# Copyright (C) 2006-2007 Jason Terk <rain@xidus.net>
+# 
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of version 2 of the GNU General Public License as
+# published by the Free Software Foundation.
+# 
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+# 
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+
+$KCODE="u"
+$:.unshift File.join(File.dirname(__FILE__), "..", "lib")
+require "mp4info"
+require "test/unit"
+
+# Tests for MP4Info
+#
+# This test case covers a small number of possible encoders and
+# tag/info fields. More cases are needed to fully test the library.
+class TestMP4Info < Test::Unit::TestCase
+  
+  # Test an mp4 file created by the FAAC encoder
+  def test_faac
+    file = "faac.m4a"
+
+    info = {
+      :ALB => 'Album',
+      :APID => nil,
+      :ART => 'Artist',
+      :CMT => 'This is a Comment',
+      :COVR => nil,
+      :CPIL => 1,
+      :CPRT => nil,
+      :DAY => '2004',
+      :DISK => [3,4],
+      :GNRE => 'Acid Jazz',
+      :GRP => nil,
+      :NAM => 'Name',
+      :TMPO => nil,
+      :TOO => 'FAAC 1.24+ (Jul 14 2004) UNSTABLE',
+      :TRKN => [1,2],
+      :WRT => 'Composer',
+      :VERSION	=> 4,
+      :LAYER	=> 1,
+      :BITRATE	=> 16,
+      :FREQUENCY => 8,
+      :SIZE	=> 2353,
+      :SECS	=> 1,
+      :MM	=> 0,
+      :MS	=> 178,
+      :SS	=> 1,
+      :TIME	=> '00:01',
+      :COPYRIGHT => nil,
+      :ENCRYPTED => nil
+    }
+    
+    mp4 = MP4Info.open(file)
+    
+    info.each do |key, value|
+      assert_equal(value, mp4.send(key))
+    end
+  end
+  
+  # Test an mp4 file created by the iTunes encoder
+  def test_itunes
+    file = "iTunes.m4a"
+    
+    info = {
+      :ALB => 'Album',
+      :APID => nil,
+      :ART => 'Artist',
+      :CMT => "Comment\r\n2nd line",
+      :COVR => nil,
+      :CPIL	=> 0,
+      :CPRT => nil,
+      :DAY => '2004',
+      :DISK	=> [3,4],
+      :GNRE	=> 'Acid Jazz',
+      :GRP => 'Grouping',
+      :NAM => 'Name',
+      :TMPO	=> 100,
+      :TOO => 'iTunes v4.6.0.15, QuickTime 6.5.1',
+      :TRKN	=> [1,2],
+      :WRT => 'Composer',
+      :VERSION => 4,
+      :LAYER => 1,
+      :BITRATE => 50,
+      :FREQUENCY => 44.1,
+      :SIZE	=> 6962,
+      :SECS	=> 1,
+      :MM	=> 0,
+      :SS	=> 1,
+      :MS	=> 90,
+      :TIME	=> '00:01',
+      :COPYRIGHT => nil,
+      :ENCRYPTED => nil
+    }
+    
+    mp4 = MP4Info.open(file)
+    
+    info.each do |key, value|
+      assert_equal(value, mp4.send(key))
+    end
+  end
+  
+  # Test an mp4 file created by the Nero encoder
+  def test_nero
+    file = "nero.mp4"
+    
+    info = {
+      :ALB => nil,
+      :APID => nil,
+      :ART => 'Artist',
+      :CMT => nil,
+      :COVR => nil,
+      :CPIL => nil,
+      :CPRT => nil,
+      :DAY => nil,
+      :DISK => nil,
+      :GNRE => nil,
+      :GRP => nil,
+      :NAM => 'Name',
+      :TMPO => nil,
+      :TOO => 'Nero AAC Codec 2.9.9.91',
+      :TRKN => nil,
+      :WRT => nil,
+      :VERSION => 4,
+      :LAYER => 1,
+      :BITRATE => 21,
+      :FREQUENCY => 8,
+      :SIZE	=> 3030,
+      :SECS	=> 1,
+      :MM	=> 0,
+      :SS	=> 1,
+      :MS	=> 153,
+      :TIME	=> '00:01',
+      :COPYRIGHT => nil,
+      :ENCRYPTED => nil
+    }
+    
+    mp4 = MP4Info.open(file)
+    
+    info.each do |key, value|
+      assert_equal(value, mp4.send(key))
+    end
+  end
+  
+  # Test an mp4 file created by the Real (Helix Producer) encoder
+  #
+  # This test will fail because MP4Info does not support Unicode
+  # strings; see bug 3512
+  # (http://rubyforge.org/tracker/index.php?func=detail&aid=3512&group_id=1175&atid=4589)
+  def test_real
+    file = "real.m4a"
+    
+    info = {
+      :ALB	=> 'Album',
+      :APID => nil,
+      :ART	=> 'AÆtist',
+      :CMT	=> 'Comment',
+      :COVR => nil,
+      :CPIL => nil,
+      :CPRT => nil,
+      :DAY	=> "2004",
+      :DISK => [0, 0],
+      :GNRE	=> 'Acid Jazz',
+      :GRP => nil,
+      :NAM	=> 'N™me',
+      :TMPO => nil,
+      :TOO	=> 'Helix Producer SDK 10.0 for Windows, Build 10.0.0.240',
+      :TRKN	=> [1,0],
+      :WRT => nil,
+      :VERSION	=> 4,
+      :LAYER	=> 1,
+      :BITRATE	=> 93,
+      :FREQUENCY => 1,	# What part of "the sampling rate of the audio should be ... documented in the samplerate field" don't Real understand?
+      :SIZE	=> 131682,
+      :SECS	=> 11,
+      :MM	=> 0,
+      :SS	=> 11,
+      :MS	=> 53,
+      :TIME	=> '00:11',
+      :COPYRIGHT => nil,
+      :ENCRYPTED => nil
+    }
+    
+    mp4 = MP4Info.open(file)
+    
+    info.each do |key, value|
+      assert_equal(value, mp4.send(key), "bad #{key}")
+    end
+  end
+end

metadata

@@ -0,0 +1,65 @@
+--- !ruby/object:Gem::Specification 
+name: mp4info
+version: !ruby/object:Gem::Version 
+  prerelease: false
+  segments: 
+  - 1
+  - 7
+  - 3
+  version: 1.7.3
+platform: ruby
+authors: 
+- arbarlow
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-09-17 00:00:00 +01:00
+default_executable: 
+dependencies: []
+
+description: Rubygem for getting and setting mp4 info
+email: alexbarlowis@me.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- README.rdoc
+files: 
+- docs/license.txt
+- lib/mp4info-windows-binmode.patch
+- lib/mp4info.rb
+- README.rdoc
+has_rdoc: true
+homepage: http://github.com/arbarlow/ruby-mp4info/
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+- --charset=UTF-8
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      segments: 
+      - 0
+      version: "0"
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.3.6
+signing_key: 
+specification_version: 3
+summary: Rubygem for getting and setting mp4 info
+test_files: 
+- test/test.rb