1 files changed, 132 insertions, 0 deletions

diff --git a/apps/metadata/ape.c b/apps/metadata/ape.c
new file mode 100644
index 0000000000..ac071be6f7
--- /dev/null
+++ b/apps/metadata/ape.c
@@ -0,0 +1,132 @@
+/***************************************************************************
+ *             __________               __   ___.
+ *   Open      \______   \ ____   ____ |  | _\_ |__   _______  ___
+ *   Source     |       _//  _ \_/ ___\|  |/ /| __ \ /  _ \  \/  /
+ *   Jukebox    |    |   (  <_> )  \___|    < | \_\ (  <_> > <  <
+ *   Firmware   |____|_  /\____/ \___  >__|_ \|___  /\____/__/\_ \
+ *                     \/            \/     \/    \/            \/
+ * $Id$
+ *
+ * Copyright (C) 2005 Dave Chapman
+ *
+ * All files in this archive are subject to the GNU General Public License.
+ * See the file COPYING in the source tree root for full license agreement.
+ *
+ * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
+ * KIND, either express or implied.
+ *
+ ****************************************************************************/
+#include <stdio.h>
+#include <string.h>
+#include <stdlib.h>
+#include <ctype.h>
+#include <inttypes.h>
+
+#include "system.h"
+#include "id3.h"
+#include "metadata_common.h"
+#include "structec.h"
+
+#define APETAG_HEADER_LENGTH        32
+#define APETAG_HEADER_FORMAT        "8llll8"
+#define APETAG_ITEM_HEADER_FORMAT   "ll"
+#define APETAG_ITEM_TYPE_MASK       3
+
+struct apetag_header 
+{
+    char id[8];
+    long version;
+    long length;
+    long item_count;
+    long flags;
+    char reserved[8];
+};
+
+struct apetag_item_header 
+{
+    long length;
+    long flags;
+};
+
+/* Read the items in an APEV2 tag. Only looks for a tag at the end of a 
+ * file. Returns true if a tag was found and fully read, false otherwise.
+ */
+bool read_ape_tags(int fd, struct mp3entry* id3)
+{
+    struct apetag_header header;
+
+    if ((lseek(fd, -APETAG_HEADER_LENGTH, SEEK_END) < 0)
+        || (ecread(fd, &header, 1, APETAG_HEADER_FORMAT, IS_BIG_ENDIAN) != APETAG_HEADER_LENGTH)
+        || (memcmp(header.id, "APETAGEX", sizeof(header.id))))
+    {
+        return false;
+    }
+
+    if ((header.version == 2000) && (header.item_count > 0)
+        && (header.length > APETAG_HEADER_LENGTH)) 
+    {
+        char *buf = id3->id3v2buf;
+        unsigned int buf_remaining = sizeof(id3->id3v2buf) 
+            + sizeof(id3->id3v1buf);
+        unsigned int tag_remaining = header.length - APETAG_HEADER_LENGTH;
+        int i;
+        
+        if (lseek(fd, -header.length, SEEK_END) < 0)
+        {
+            return false;
+        }
+
+        for (i = 0; i < header.item_count; i++)
+        {
+            struct apetag_item_header item;
+            char name[TAG_NAME_LENGTH];
+            char value[TAG_VALUE_LENGTH];
+            long r;
+
+            if (tag_remaining < sizeof(item))
+            {
+                break;
+            }
+            
+            if (ecread(fd, &item, 1, APETAG_ITEM_HEADER_FORMAT, IS_BIG_ENDIAN) < (long) sizeof(item))
+            {
+                return false;
+            }
+            
+            tag_remaining -= sizeof(item);
+            r = read_string(fd, name, sizeof(name), 0, tag_remaining);
+            
+            if (r == -1)
+            {
+                return false;
+            }
+
+            tag_remaining -= r + item.length;
+
+            if ((item.flags & APETAG_ITEM_TYPE_MASK) == 0) 
+            {
+                long len;
+                
+                if (read_string(fd, value, sizeof(value), -1, item.length) 
+                    != item.length)
+                {
+                    return false;
+                }
+
+                len = parse_tag(name, value, id3, buf, buf_remaining, 
+                    TAGTYPE_APE);
+                buf += len;
+                buf_remaining -= len;
+            }
+            else
+            {
+                if (lseek(fd, item.length, SEEK_CUR) < 0)
+                {
+                    return false;
+                }
+            }
+        }
+    }
+
+    return true;
+}