/* * libid3tag - ID3 tag manipulation library * Copyright (C) 2000-2004 Underbit Technologies, Inc. * * 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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA * * $Id: latin1.c,v 1.10 2004/01/23 09:41:32 rob Exp $ */# ifdef HAVE_CONFIG_H#  include "config.h"# endif# include "global.h"# include <stdlib.h># include "id3tag.h"# include "latin1.h"# include "ucs4.h"/* * NAME:	latin1->length() * DESCRIPTION:	return the number of ucs4 chars represented by a latin1 string */id3_length_t id3_latin1_length(id3_latin1_t const *latin1){  id3_latin1_t const *ptr = latin1;  while (*ptr)    ++ptr;  return ptr - latin1;}/* * NAME:	latin1->size() * DESCRIPTION:	return the encoding size of a latin1 string */id3_length_t id3_latin1_size(id3_latin1_t const *latin1){  return id3_latin1_length(latin1) + 1;}/* * NAME:	latin1->copy() * DESCRIPTION:	copy a latin1 string */void id3_latin1_copy(id3_latin1_t *dest, id3_latin1_t const *src){  while ((*dest++ = *src++))    ;}/* * NAME:	latin1->duplicate() * DESCRIPTION:	duplicate a latin1 string */id3_latin1_t *id3_latin1_duplicate(id3_latin1_t const *src){  id3_latin1_t *latin1;  latin1 = malloc(id3_latin1_size(src) * sizeof(*latin1));  if (latin1)    id3_latin1_copy(latin1, src);  return latin1;}/* * NAME:	latin1->ucs4duplicate() * DESCRIPTION:	duplicate and decode a latin1 string into ucs4 */id3_ucs4_t *id3_latin1_ucs4duplicate(id3_latin1_t const *latin1){  id3_ucs4_t *ucs4;  ucs4 = malloc((id3_latin1_length(latin1) + 1) * sizeof(*ucs4));  if (ucs4)    id3_latin1_decode(latin1, ucs4);  return release(ucs4);}/* * NAME:	latin1->decodechar() * DESCRIPTION:	decode a (single) latin1 char into a single ucs4 char */id3_length_t id3_latin1_decodechar(id3_latin1_t const *latin1,				   id3_ucs4_t *ucs4){  *ucs4 = *latin1;  return 1;}/* * NAME:	latin1->encodechar() * DESCRIPTION:	encode a single ucs4 char into a (single) latin1 char */id3_length_t id3_latin1_encodechar(id3_latin1_t *latin1, id3_ucs4_t ucs4){  *latin1 = ucs4;  if (ucs4 > 0x000000ffL)    *latin1 = ID3_UCS4_REPLACEMENTCHAR;  return 1;}/* * NAME:	latin1->decode() * DESCRIPTION:	decode a complete latin1 string into a ucs4 string */void id3_latin1_decode(id3_latin1_t const *latin1, id3_ucs4_t *ucs4){  do    latin1 += id3_latin1_decodechar(latin1, ucs4);  while (*ucs4++);}/* * NAME:	latin1->encode() * DESCRIPTION:	encode a complete ucs4 string into a latin1 string */void id3_latin1_encode(id3_latin1_t *latin1, id3_ucs4_t const *ucs4){  do    latin1 += id3_latin1_encodechar(latin1, *ucs4);  while (*ucs4++);}/* * NAME:	latin1->put() * DESCRIPTION:	serialize a single latin1 character */id3_length_t id3_latin1_put(id3_byte_t **ptr, id3_latin1_t latin1){  if (ptr)    *(*ptr)++ = latin1;  return 1;}/* * NAME:	latin1->get() * DESCRIPTION:	deserialize a single latin1 character */id3_latin1_t id3_latin1_get(id3_byte_t const **ptr){  return *(*ptr)++;}/* * NAME:	latin1->serialize() * DESCRIPTION:	serialize a ucs4 string using latin1 encoding */id3_length_t id3_latin1_serialize(id3_byte_t **ptr, id3_ucs4_t const *ucs4,				  int terminate){  id3_length_t size = 0;  id3_latin1_t latin1[1], *out;  while (*ucs4) {    switch (id3_latin1_encodechar(out = latin1, *ucs4++)) {    case 1: size += id3_latin1_put(ptr, *out++);    case 0: break;    }  }  if (terminate)    size += id3_latin1_put(ptr, 0);  return size;}/* * NAME:	latin1->deserialize() * DESCRIPTION:	deserialize a ucs4 string using latin1 encoding */id3_ucs4_t *id3_latin1_deserialize(id3_byte_t const **ptr, id3_length_t length){  id3_byte_t const *end;  id3_latin1_t *latin1ptr, *latin1;  id3_ucs4_t *ucs4;  end = *ptr + length;  latin1 = malloc((length + 1) * sizeof(*latin1));  if (latin1 == 0)    return 0;  latin1ptr = latin1;  while (end - *ptr > 0 && (*latin1ptr = id3_latin1_get(ptr)))    ++latin1ptr;  *latin1ptr = 0;  ucs4 = malloc((id3_latin1_length(latin1) + 1) * sizeof(*ucs4));  if (ucs4)    id3_latin1_decode(latin1, ucs4);  free(latin1);  return ucs4;}