cannam@85: /* C code produced by gperf version 3.0.1 */
cannam@85: /* Command-line: gperf -tCcTonD -K id -N id3_compat_lookup -s -3 -k '*' compat.gperf  */
cannam@85: 
cannam@85: #if !((' ' == 32) && ('!' == 33) && ('"' == 34) && ('#' == 35) \
cannam@85:       && ('%' == 37) && ('&' == 38) && ('\'' == 39) && ('(' == 40) \
cannam@85:       && (')' == 41) && ('*' == 42) && ('+' == 43) && (',' == 44) \
cannam@85:       && ('-' == 45) && ('.' == 46) && ('/' == 47) && ('0' == 48) \
cannam@85:       && ('1' == 49) && ('2' == 50) && ('3' == 51) && ('4' == 52) \
cannam@85:       && ('5' == 53) && ('6' == 54) && ('7' == 55) && ('8' == 56) \
cannam@85:       && ('9' == 57) && (':' == 58) && (';' == 59) && ('<' == 60) \
cannam@85:       && ('=' == 61) && ('>' == 62) && ('?' == 63) && ('A' == 65) \
cannam@85:       && ('B' == 66) && ('C' == 67) && ('D' == 68) && ('E' == 69) \
cannam@85:       && ('F' == 70) && ('G' == 71) && ('H' == 72) && ('I' == 73) \
cannam@85:       && ('J' == 74) && ('K' == 75) && ('L' == 76) && ('M' == 77) \
cannam@85:       && ('N' == 78) && ('O' == 79) && ('P' == 80) && ('Q' == 81) \
cannam@85:       && ('R' == 82) && ('S' == 83) && ('T' == 84) && ('U' == 85) \
cannam@85:       && ('V' == 86) && ('W' == 87) && ('X' == 88) && ('Y' == 89) \
cannam@85:       && ('Z' == 90) && ('[' == 91) && ('\\' == 92) && (']' == 93) \
cannam@85:       && ('^' == 94) && ('_' == 95) && ('a' == 97) && ('b' == 98) \
cannam@85:       && ('c' == 99) && ('d' == 100) && ('e' == 101) && ('f' == 102) \
cannam@85:       && ('g' == 103) && ('h' == 104) && ('i' == 105) && ('j' == 106) \
cannam@85:       && ('k' == 107) && ('l' == 108) && ('m' == 109) && ('n' == 110) \
cannam@85:       && ('o' == 111) && ('p' == 112) && ('q' == 113) && ('r' == 114) \
cannam@85:       && ('s' == 115) && ('t' == 116) && ('u' == 117) && ('v' == 118) \
cannam@85:       && ('w' == 119) && ('x' == 120) && ('y' == 121) && ('z' == 122) \
cannam@85:       && ('{' == 123) && ('|' == 124) && ('}' == 125) && ('~' == 126))
cannam@85: /* The character set is not based on ISO-646.  */
cannam@85: error "gperf generated tables don't work with this execution character set. Please report a bug to <bug-gnu-gperf@gnu.org>."
cannam@85: #endif
cannam@85: 
cannam@85: #line 1 "compat.gperf"
cannam@85: 
cannam@85: /*
cannam@85:  * libid3tag - ID3 tag manipulation library
cannam@85:  * Copyright (C) 2000-2004 Underbit Technologies, Inc.
cannam@85:  *
cannam@85:  * This program is free software; you can redistribute it and/or modify
cannam@85:  * it under the terms of the GNU General Public License as published by
cannam@85:  * the Free Software Foundation; either version 2 of the License, or
cannam@85:  * (at your option) any later version.
cannam@85:  *
cannam@85:  * This program is distributed in the hope that it will be useful,
cannam@85:  * but WITHOUT ANY WARRANTY; without even the implied warranty of
cannam@85:  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
cannam@85:  * GNU General Public License for more details.
cannam@85:  *
cannam@85:  * You should have received a copy of the GNU General Public License
cannam@85:  * along with this program; if not, write to the Free Software
cannam@85:  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
cannam@85:  *
cannam@85:  * Id: compat.gperf,v 1.11 2004/01/23 09:41:32 rob Exp 
cannam@85:  */
cannam@85: 
cannam@85: # ifdef HAVE_CONFIG_H
cannam@85: #  include "config.h"
cannam@85: # endif
cannam@85: 
cannam@85: # include "global.h"
cannam@85: 
cannam@85: # include <stdlib.h>
cannam@85: # include <string.h>
cannam@85: 
cannam@85: # ifdef HAVE_ASSERT_H
cannam@85: #  include <assert.h>
cannam@85: # endif
cannam@85: 
cannam@85: # include "id3tag.h"
cannam@85: # include "compat.h"
cannam@85: # include "frame.h"
cannam@85: # include "field.h"
cannam@85: # include "parse.h"
cannam@85: # include "ucs4.h"
cannam@85: 
cannam@85: # define EQ(id)    #id, 0
cannam@85: # define OBSOLETE    0, 0
cannam@85: # define TX(id)    #id, translate_##id
cannam@85: 
cannam@85: static id3_compat_func_t translate_TCON;
cannam@85: 
cannam@85: #define TOTAL_KEYWORDS 73
cannam@85: #define MIN_WORD_LENGTH 3
cannam@85: #define MAX_WORD_LENGTH 4
cannam@85: #define MIN_HASH_VALUE 6
cannam@85: #define MAX_HASH_VALUE 127
cannam@85: /* maximum key range = 122, duplicates = 0 */
cannam@85: 
cannam@85: #ifdef __GNUC__
cannam@85: __inline
cannam@85: #else
cannam@85: #ifdef __cplusplus
cannam@85: inline
cannam@85: #endif
cannam@85: #endif
cannam@85: static unsigned int
cannam@85: hash (str, len)
cannam@85:      register const char *str;
cannam@85:      register unsigned int len;
cannam@85: {
cannam@85:   static const unsigned char asso_values[] =
cannam@85:     {
cannam@85:       128, 128, 128, 128, 128, 128, 128, 128, 128, 128,
cannam@85:       128, 128, 128, 128, 128, 128, 128, 128, 128, 128,
cannam@85:       128, 128, 128, 128, 128, 128, 128, 128, 128, 128,
cannam@85:       128, 128, 128, 128, 128, 128, 128, 128, 128, 128,
cannam@85:       128, 128, 128, 128, 128, 128, 128, 128, 128,  64,
cannam@85:        58,  20,  15, 128, 128, 128, 128, 128, 128, 128,
cannam@85:       128, 128, 128, 128, 128,  10,  18,   3,   6,   1,
cannam@85:        47,   0, 128,  42,  62,  30,  31,   0,  19,  52,
cannam@85:        10,  24,   8,  30,   5,   3,  30,   8,  25,  47,
cannam@85:         3, 128, 128, 128, 128, 128, 128, 128, 128, 128,
cannam@85:       128, 128, 128, 128, 128, 128, 128, 128, 128, 128,
cannam@85:       128, 128, 128, 128, 128, 128, 128, 128, 128, 128,
cannam@85:       128, 128, 128, 128, 128, 128, 128, 128, 128, 128,
cannam@85:       128, 128, 128, 128, 128, 128, 128, 128, 128, 128,
cannam@85:       128, 128, 128, 128, 128, 128, 128, 128, 128, 128,
cannam@85:       128, 128, 128, 128, 128, 128, 128, 128, 128, 128,
cannam@85:       128, 128, 128, 128, 128, 128, 128, 128, 128, 128,
cannam@85:       128, 128, 128, 128, 128, 128, 128, 128, 128, 128,
cannam@85:       128, 128, 128, 128, 128, 128, 128, 128, 128, 128,
cannam@85:       128, 128, 128, 128, 128, 128, 128, 128, 128, 128,
cannam@85:       128, 128, 128, 128, 128, 128, 128, 128, 128, 128,
cannam@85:       128, 128, 128, 128, 128, 128, 128, 128, 128, 128,
cannam@85:       128, 128, 128, 128, 128, 128, 128, 128, 128, 128,
cannam@85:       128, 128, 128, 128, 128, 128, 128, 128, 128, 128,
cannam@85:       128, 128, 128, 128, 128, 128, 128, 128, 128, 128,
cannam@85:       128, 128, 128, 128, 128, 128, 128
cannam@85:     };
cannam@85:   register int hval = 0;
cannam@85: 
cannam@85:   switch (len)
cannam@85:     {
cannam@85:       default:
cannam@85:         hval += asso_values[(unsigned char)str[3]];
cannam@85:       /*FALLTHROUGH*/
cannam@85:       case 3:
cannam@85:         hval += asso_values[(unsigned char)str[2]];
cannam@85:       /*FALLTHROUGH*/
cannam@85:       case 2:
cannam@85:         hval += asso_values[(unsigned char)str[1]+1];
cannam@85:       /*FALLTHROUGH*/
cannam@85:       case 1:
cannam@85:         hval += asso_values[(unsigned char)str[0]];
cannam@85:         break;
cannam@85:     }
cannam@85:   return hval;
cannam@85: }
cannam@85: 
cannam@85: #ifdef __GNUC__
cannam@85: __inline
cannam@85: #endif
cannam@85: const struct id3_compat *
cannam@85: id3_compat_lookup (str, len)
cannam@85:      register const char *str;
cannam@85:      register unsigned int len;
cannam@85: {
cannam@85:   static const struct id3_compat wordlist[] =
cannam@85:     {
cannam@85: #line 97 "compat.gperf"
cannam@85:       {"TLE",  EQ(TLEN)  /* Length */},
cannam@85: #line 68 "compat.gperf"
cannam@85:       {"ETC",  EQ(ETCO)  /* Event timing codes */},
cannam@85: #line 126 "compat.gperf"
cannam@85:       {"ULT",  EQ(USLT)  /* Unsynchronised lyric/text transcription */},
cannam@85: #line 123 "compat.gperf"
cannam@85:       {"TYE",  OBSOLETE  /* Year [obsolete] */},
cannam@85: #line 92 "compat.gperf"
cannam@85:       {"TFT",  EQ(TFLT)  /* File type */},
cannam@85: #line 84 "compat.gperf"
cannam@85:       {"TCM",  EQ(TCOM)  /* Composer */},
cannam@85: #line 66 "compat.gperf"
cannam@85:       {"EQU",  OBSOLETE  /* Equalization [obsolete] */},
cannam@85: #line 63 "compat.gperf"
cannam@85:       {"COM",  EQ(COMM)  /* Comments */},
cannam@85: #line 130 "compat.gperf"
cannam@85:       {"WCM",  EQ(WCOM)  /* Commercial information */},
cannam@85: #line 96 "compat.gperf"
cannam@85:       {"TLA",  EQ(TLAN)  /* Language(s) */},
cannam@85: #line 88 "compat.gperf"
cannam@85:       {"TDA",  OBSOLETE  /* Date [obsolete] */},
cannam@85: #line 124 "compat.gperf"
cannam@85:       {"TYER", OBSOLETE  /* Year [obsolete] */},
cannam@85: #line 83 "compat.gperf"
cannam@85:       {"TBP",  EQ(TBPM)  /* BPM (beats per minute) */},
cannam@85: #line 87 "compat.gperf"
cannam@85:       {"TCR",  EQ(TCOP)  /* Copyright message */},
cannam@85: #line 104 "compat.gperf"
cannam@85:       {"TOT",  EQ(TOAL)  /* Original album/movie/show title */},
cannam@85: #line 89 "compat.gperf"
cannam@85:       {"TDAT", OBSOLETE  /* Date [obsolete] */},
cannam@85: #line 67 "compat.gperf"
cannam@85:       {"EQUA", OBSOLETE  /* Equalization [obsolete] */},
cannam@85: #line 102 "compat.gperf"
cannam@85:       {"TOR",  EQ(TDOR)  /* Original release year [obsolete] */},
cannam@85: #line 131 "compat.gperf"
cannam@85:       {"WCP",  EQ(WCOP)  /* Copyright/legal information */},
cannam@85: #line 99 "compat.gperf"
cannam@85:       {"TOA",  EQ(TOPE)  /* Original artist(s)/performer(s) */},
cannam@85: #line 78 "compat.gperf"
cannam@85:       {"RVA",  OBSOLETE  /* Relative volume adjustment [obsolete] */},
cannam@85: #line 120 "compat.gperf"
cannam@85:       {"TT3",  EQ(TIT3)  /* Subtitle/description refinement */},
cannam@85: #line 98 "compat.gperf"
cannam@85:       {"TMT",  EQ(TMED)  /* Media type */},
cannam@85: #line 76 "compat.gperf"
cannam@85:       {"POP",  EQ(POPM)  /* Popularimeter */},
cannam@85: #line 74 "compat.gperf"
cannam@85:       {"MLL",  EQ(MLLT)  /* MPEG location lookup table */},
cannam@85: #line 79 "compat.gperf"
cannam@85:       {"RVAD", OBSOLETE  /* Relative volume adjustment [obsolete] */},
cannam@85: #line 65 "compat.gperf"
cannam@85:       {"CRM",  OBSOLETE  /* Encrypted meta frame [obsolete] */},
cannam@85: #line 128 "compat.gperf"
cannam@85:       {"WAR",  EQ(WOAR)  /* Official artist/performer webpage */},
cannam@85: #line 80 "compat.gperf"
cannam@85:       {"SLT",  EQ(SYLT)  /* Synchronised lyric/text */},
cannam@85: #line 81 "compat.gperf"
cannam@85:       {"STC",  EQ(SYTC)  /* Synchronised tempo codes */},
cannam@85: #line 95 "compat.gperf"
cannam@85:       {"TKE",  EQ(TKEY)  /* Initial key */},
cannam@85: #line 111 "compat.gperf"
cannam@85:       {"TRC",  EQ(TSRC)  /* ISRC (international standard recording code) */},
cannam@85: #line 109 "compat.gperf"
cannam@85:       {"TPA",  EQ(TPOS)  /* Part of a set */},
cannam@85: #line 117 "compat.gperf"
cannam@85:       {"TSS",  EQ(TSSE)  /* Software/hardware and settings used for encoding */},
cannam@85: #line 112 "compat.gperf"
cannam@85:       {"TRD",  OBSOLETE  /* Recording dates [obsolete] */},
cannam@85: #line 64 "compat.gperf"
cannam@85:       {"CRA",  EQ(AENC)  /* Audio encryption */},
cannam@85: #line 108 "compat.gperf"
cannam@85:       {"TP4",  EQ(TPE4)  /* Interpreted, remixed, or otherwise modified by */},
cannam@85: #line 125 "compat.gperf"
cannam@85:       {"UFI",  EQ(UFID)  /* Unique file identifier */},
cannam@85: #line 101 "compat.gperf"
cannam@85:       {"TOL",  EQ(TOLY)  /* Original lyricist(s)/text writer(s) */},
cannam@85: #line 110 "compat.gperf"
cannam@85:       {"TPB",  EQ(TPUB)  /* Publisher */},
cannam@85: #line 73 "compat.gperf"
cannam@85:       {"MCI",  EQ(MCDI)  /* Music CD identifier */},
cannam@85: #line 107 "compat.gperf"
cannam@85:       {"TP3",  EQ(TPE3)  /* Conductor/performer refinement */},
cannam@85: #line 132 "compat.gperf"
cannam@85:       {"WPB",  EQ(WPUB)  /* Publishers official webpage */},
cannam@85: #line 113 "compat.gperf"
cannam@85:       {"TRDA", OBSOLETE  /* Recording dates [obsolete] */},
cannam@85: #line 115 "compat.gperf"
cannam@85:       {"TSI",  OBSOLETE  /* Size [obsolete] */},
cannam@85: #line 90 "compat.gperf"
cannam@85:       {"TDY",  EQ(TDLY)  /* Playlist delay */},
cannam@85: #line 82 "compat.gperf"
cannam@85:       {"TAL",  EQ(TALB)  /* Album/movie/show title */},
cannam@85: #line 116 "compat.gperf"
cannam@85:       {"TSIZ", OBSOLETE  /* Size [obsolete] */},
cannam@85: #line 129 "compat.gperf"
cannam@85:       {"WAS",  EQ(WOAS)  /* Official audio source webpage */},
cannam@85: #line 121 "compat.gperf"
cannam@85:       {"TXT",  EQ(TEXT)  /* Lyricist/text writer */},
cannam@85: #line 62 "compat.gperf"
cannam@85:       {"CNT",  EQ(PCNT)  /* Play counter */},
cannam@85: #line 100 "compat.gperf"
cannam@85:       {"TOF",  EQ(TOFN)  /* Original filename */},
cannam@85: #line 85 "compat.gperf"
cannam@85:       {"TCO",  TX(TCON)  /* Content type */},
cannam@85: #line 114 "compat.gperf"
cannam@85:       {"TRK",  EQ(TRCK)  /* Track number/position in set */},
cannam@85: #line 119 "compat.gperf"
cannam@85:       {"TT2",  EQ(TIT2)  /* Title/songname/content description */},
cannam@85: #line 93 "compat.gperf"
cannam@85:       {"TIM",  OBSOLETE  /* Time [obsolete] */},
cannam@85: #line 94 "compat.gperf"
cannam@85:       {"TIME", OBSOLETE  /* Time [obsolete] */},
cannam@85: #line 103 "compat.gperf"
cannam@85:       {"TORY", EQ(TDOR)  /* Original release year [obsolete] */},
cannam@85: #line 91 "compat.gperf"
cannam@85:       {"TEN",  EQ(TENC)  /* Encoded by */},
cannam@85: #line 118 "compat.gperf"
cannam@85:       {"TT1",  EQ(TIT1)  /* Content group description */},
cannam@85: #line 127 "compat.gperf"
cannam@85:       {"WAF",  EQ(WOAF)  /* Official audio file webpage */},
cannam@85: #line 75 "compat.gperf"
cannam@85:       {"PIC",  EQ(APIC)  /* Attached picture */},
cannam@85: #line 122 "compat.gperf"
cannam@85:       {"TXX",  EQ(TXXX)  /* User defined text information frame */},
cannam@85: #line 133 "compat.gperf"
cannam@85:       {"WXX",  EQ(WXXX)  /* User defined URL link frame */},
cannam@85: #line 86 "compat.gperf"
cannam@85:       {"TCON", TX(TCON)  /* Content type */},
cannam@85: #line 77 "compat.gperf"
cannam@85:       {"REV",  EQ(RVRB)  /* Reverb */},
cannam@85: #line 106 "compat.gperf"
cannam@85:       {"TP2",  EQ(TPE2)  /* Band/orchestra/accompaniment */},
cannam@85: #line 105 "compat.gperf"
cannam@85:       {"TP1",  EQ(TPE1)  /* Lead performer(s)/soloist(s) */},
cannam@85: #line 61 "compat.gperf"
cannam@85:       {"BUF",  EQ(RBUF)  /* Recommended buffer size */},
cannam@85: #line 70 "compat.gperf"
cannam@85:       {"IPL",  EQ(TIPL)  /* Involved people list */},
cannam@85: #line 69 "compat.gperf"
cannam@85:       {"GEO",  EQ(GEOB)  /* General encapsulated object */},
cannam@85: #line 72 "compat.gperf"
cannam@85:       {"LNK",  EQ(LINK)  /* Linked information */},
cannam@85: #line 71 "compat.gperf"
cannam@85:       {"IPLS", EQ(TIPL)  /* Involved people list */}
cannam@85:     };
cannam@85: 
cannam@85:   static const short lookup[] =
cannam@85:     {
cannam@85:       -1, -1, -1, -1, -1, -1,  0,  1,  2,  3,  4,  5,  6,  7,
cannam@85:        8,  9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, -1,
cannam@85:       21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34,
cannam@85:       -1, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47,
cannam@85:       48, 49, -1, -1, 50, -1, 51, 52, -1, 53, 54, 55, 56, -1,
cannam@85:       57, 58, 59, 60, -1, 61, -1, 62, -1, -1, 63, -1, 64, -1,
cannam@85:       -1, 65, -1, 66, -1, -1, -1, -1, -1, 67, -1, 68, -1, 69,
cannam@85:       -1, 70, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
cannam@85:       -1, 71, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
cannam@85:       -1, 72
cannam@85:     };
cannam@85: 
cannam@85:   if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH)
cannam@85:     {
cannam@85:       register int key = hash (str, len);
cannam@85: 
cannam@85:       if (key <= MAX_HASH_VALUE && key >= 0)
cannam@85:         {
cannam@85:           register int index = lookup[key];
cannam@85: 
cannam@85:           if (index >= 0)
cannam@85:             {
cannam@85:               register const char *s = wordlist[index].id;
cannam@85: 
cannam@85:               if (*str == *s && !strncmp (str + 1, s + 1, len - 1) && s[len] == '\0')
cannam@85:                 return &wordlist[index];
cannam@85:             }
cannam@85:         }
cannam@85:     }
cannam@85:   return 0;
cannam@85: }
cannam@85: #line 134 "compat.gperf"
cannam@85: 
cannam@85: 
cannam@85: static
cannam@85: int translate_TCON(struct id3_frame *frame, char const *oldid,
cannam@85: 		   id3_byte_t const *data, id3_length_t length)
cannam@85: {
cannam@85:   id3_byte_t const *end;
cannam@85:   enum id3_field_textencoding encoding;
cannam@85:   id3_ucs4_t *string = 0, *ptr, *endptr;
cannam@85:   int result = 0;
cannam@85: 
cannam@85:   /* translate old TCON syntax into multiple strings */
cannam@85: 
cannam@85:   assert(frame->nfields == 2);
cannam@85: 
cannam@85:   encoding = ID3_FIELD_TEXTENCODING_ISO_8859_1;
cannam@85: 
cannam@85:   end = data + length;
cannam@85: 
cannam@85:   if (id3_field_parse(&frame->fields[0], &data, end - data, &encoding) == -1)
cannam@85:     goto fail;
cannam@85: 
cannam@85:   string = id3_parse_string(&data, end - data, encoding, 0);
cannam@85:   if (string == 0)
cannam@85:     goto fail;
cannam@85: 
cannam@85:   ptr = string;
cannam@85:   while (*ptr == '(') {
cannam@85:     if (*++ptr == '(')
cannam@85:       break;
cannam@85: 
cannam@85:     endptr = ptr;
cannam@85:     while (*endptr && *endptr != ')')
cannam@85:       ++endptr;
cannam@85: 
cannam@85:     if (*endptr)
cannam@85:       *endptr++ = 0;
cannam@85: 
cannam@85:     if (id3_field_addstring(&frame->fields[1], ptr) == -1)
cannam@85:       goto fail;
cannam@85: 
cannam@85:     ptr = endptr;
cannam@85:   }
cannam@85: 
cannam@85:   if (*ptr && id3_field_addstring(&frame->fields[1], ptr) == -1)
cannam@85:     goto fail;
cannam@85: 
cannam@85:   if (0) {
cannam@85:   fail:
cannam@85:     result = -1;
cannam@85:   }
cannam@85: 
cannam@85:   if (string)
cannam@85:     free(string);
cannam@85: 
cannam@85:   return result;
cannam@85: }
cannam@85: 
cannam@85: /*
cannam@85:  * NAME:	compat->fixup()
cannam@85:  * DESCRIPTION:	finish compatibility translations
cannam@85:  */
cannam@85: int id3_compat_fixup(struct id3_tag *tag)
cannam@85: {
cannam@85:   struct id3_frame *frame;
cannam@85:   unsigned int index;
cannam@85:   id3_ucs4_t timestamp[17] = { 0 };
cannam@85:   int result = 0;
cannam@85: 
cannam@85:   /* create a TDRC frame from obsolete TYER/TDAT/TIME frames */
cannam@85: 
cannam@85:   /*
cannam@85:    * TYE/TYER: YYYY
cannam@85:    * TDA/TDAT: DDMM
cannam@85:    * TIM/TIME: HHMM
cannam@85:    *
cannam@85:    * TDRC: yyyy-MM-ddTHH:mm
cannam@85:    */
cannam@85: 
cannam@85:   index = 0;
cannam@85:   while ((frame = id3_tag_findframe(tag, ID3_FRAME_OBSOLETE, index++))) {
cannam@85:     char const *id;
cannam@85:     id3_byte_t const *data, *end;
cannam@85:     id3_length_t length;
cannam@85:     enum id3_field_textencoding encoding;
cannam@85:     id3_ucs4_t *string;
cannam@85: 
cannam@85:     id = id3_field_getframeid(&frame->fields[0]);
cannam@85:     assert(id);
cannam@85: 
cannam@85:     if (strcmp(id, "TYER") != 0 && strcmp(id, "YTYE") != 0 &&
cannam@85: 	strcmp(id, "TDAT") != 0 && strcmp(id, "YTDA") != 0 &&
cannam@85: 	strcmp(id, "TIME") != 0 && strcmp(id, "YTIM") != 0)
cannam@85:       continue;
cannam@85: 
cannam@85:     data = id3_field_getbinarydata(&frame->fields[1], &length);
cannam@85:     assert(data);
cannam@85: 
cannam@85:     if (length < 1)
cannam@85:       continue;
cannam@85: 
cannam@85:     end = data + length;
cannam@85: 
cannam@85:     encoding = id3_parse_uint(&data, 1);
cannam@85:     string   = id3_parse_string(&data, end - data, encoding, 0);
cannam@85: 
cannam@85:     if (id3_ucs4_length(string) < 4) {
cannam@85:       free(string);
cannam@85:       continue;
cannam@85:     }
cannam@85: 
cannam@85:     if (strcmp(id, "TYER") == 0 ||
cannam@85: 	strcmp(id, "YTYE") == 0) {
cannam@85:       timestamp[0] = string[0];
cannam@85:       timestamp[1] = string[1];
cannam@85:       timestamp[2] = string[2];
cannam@85:       timestamp[3] = string[3];
cannam@85:     }
cannam@85:     else if (strcmp(id, "TDAT") == 0 ||
cannam@85: 	     strcmp(id, "YTDA") == 0) {
cannam@85:       timestamp[4] = '-';
cannam@85:       timestamp[5] = string[2];
cannam@85:       timestamp[6] = string[3];
cannam@85:       timestamp[7] = '-';
cannam@85:       timestamp[8] = string[0];
cannam@85:       timestamp[9] = string[1];
cannam@85:     }
cannam@85:     else {  /* TIME or YTIM */
cannam@85:       timestamp[10] = 'T';
cannam@85:       timestamp[11] = string[0];
cannam@85:       timestamp[12] = string[1];
cannam@85:       timestamp[13] = ':';
cannam@85:       timestamp[14] = string[2];
cannam@85:       timestamp[15] = string[3];
cannam@85:     }
cannam@85: 
cannam@85:     free(string);
cannam@85:   }
cannam@85: 
cannam@85:   if (timestamp[0]) {
cannam@85:     id3_ucs4_t *strings;
cannam@85: 
cannam@85:     frame = id3_frame_new("TDRC");
cannam@85:     if (frame == 0)
cannam@85:       goto fail;
cannam@85: 
cannam@85:     strings = timestamp;
cannam@85: 
cannam@85:     if (id3_field_settextencoding(&frame->fields[0],
cannam@85: 				  ID3_FIELD_TEXTENCODING_ISO_8859_1) == -1 ||
cannam@85: 	id3_field_setstrings(&frame->fields[1], 1, &strings) == -1 ||
cannam@85: 	id3_tag_attachframe(tag, frame) == -1) {
cannam@85:       id3_frame_delete(frame);
cannam@85:       goto fail;
cannam@85:     }
cannam@85:   }
cannam@85: 
cannam@85:   if (0) {
cannam@85:   fail:
cannam@85:     result = -1;
cannam@85:   }
cannam@85: 
cannam@85:   return result;
cannam@85: }