cast to unsigned int before shifting left
[platform/upstream/libexif.git] / libexif / exif-utils.c
index 384b56e..8a92907 100644 (file)
@@ -1,6 +1,6 @@
 /* exif-utils.c
  *
- * Copyright © 2001 Lutz Müller <lutz@users.sourceforge.net>
+ * Copyright (c) 2001 Lutz Mueller <lutz@users.sourceforge.net>
  *
  * This library is free software; you can redistribute it and/or
  * modify it under the terms of the GNU Lesser General Public
  *
  * You should have received a copy of the GNU Lesser General Public
  * License along with this library; if not, write to the
- * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
- * Boston, MA 02111-1307, USA.
+ * Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+ * Boston, MA  02110-1301  USA.
  */
 
 #include <config.h>
 
 #include <libexif/exif-utils.h>
 
-typedef signed short ExifSShort;
+void
+exif_array_set_byte_order (ExifFormat f, unsigned char *b, unsigned int n,
+               ExifByteOrder o_orig, ExifByteOrder o_new)
+{
+       unsigned int j;
+       unsigned int fs = exif_format_get_size (f);
+       ExifShort s;
+       ExifSShort ss;
+       ExifLong l;
+       ExifSLong sl;
+       ExifRational r;
+       ExifSRational sr;
+
+       if (!b || !n || !fs) return;
+
+       switch (f) {
+       case EXIF_FORMAT_SHORT:
+               for (j = 0; j < n; j++) {
+                       s = exif_get_short (b + j * fs, o_orig);
+                       exif_set_short (b + j * fs, o_new, s);
+               }
+               break;
+       case EXIF_FORMAT_SSHORT:
+               for (j = 0; j < n; j++) {
+                       ss = exif_get_sshort (b + j * fs, o_orig);
+                       exif_set_sshort (b + j * fs, o_new, ss);
+               }
+               break;
+       case EXIF_FORMAT_LONG:
+               for (j = 0; j < n; j++) {
+                       l = exif_get_long (b + j * fs, o_orig);
+                       exif_set_long (b + j * fs, o_new, l);
+               }
+               break;
+       case EXIF_FORMAT_RATIONAL:
+               for (j = 0; j < n; j++) {
+                       r = exif_get_rational (b + j * fs, o_orig);
+                       exif_set_rational (b + j * fs, o_new, r);
+               }
+               break;
+       case EXIF_FORMAT_SLONG:
+               for (j = 0; j < n; j++) {
+                       sl = exif_get_slong (b + j * fs, o_orig);
+                       exif_set_slong (b + j * fs, o_new, sl);
+               }
+               break;
+       case EXIF_FORMAT_SRATIONAL:
+               for (j = 0; j < n; j++) {
+                       sr = exif_get_srational (b + j * fs, o_orig);
+                       exif_set_srational (b + j * fs, o_new, sr);
+               }
+               break;
+       case EXIF_FORMAT_UNDEFINED:
+       case EXIF_FORMAT_BYTE:
+       case EXIF_FORMAT_ASCII:
+       default:
+               /* Nothing here. */
+               break;
+       }
+}
 
-static ExifSShort
+ExifSShort
 exif_get_sshort (const unsigned char *buf, ExifByteOrder order)
 {
        if (!buf) return 0;
@@ -46,7 +105,7 @@ exif_get_short (const unsigned char *buf, ExifByteOrder order)
 }
 
 void
-exif_set_short (unsigned char *b, ExifByteOrder order, ExifShort value)
+exif_set_sshort (unsigned char *b, ExifByteOrder order, ExifSShort value)
 {
        if (!b) return;
        switch (order) {
@@ -61,15 +120,21 @@ exif_set_short (unsigned char *b, ExifByteOrder order, ExifShort value)
        }
 }
 
+void
+exif_set_short (unsigned char *b, ExifByteOrder order, ExifShort value)
+{
+       exif_set_sshort (b, order, value);
+}
+
 ExifSLong
 exif_get_slong (const unsigned char *b, ExifByteOrder order)
 {
        if (!b) return 0;
         switch (order) {
         case EXIF_BYTE_ORDER_MOTOROLA:
-                return ((b[0] << 24) | (b[1] << 16) | (b[2] << 8) | b[3]);
+                return (((uint32_t)b[0] << 24) | ((uint32_t)b[1] << 16) | ((uint32_t)b[2] << 8) | (uint32_t)b[3]);
         case EXIF_BYTE_ORDER_INTEL:
-                return ((b[3] << 24) | (b[2] << 16) | (b[1] << 8) | b[0]);
+                return (((uint32_t)b[3] << 24) | ((uint32_t)b[2] << 16) | ((uint32_t)b[1] << 8) | (uint32_t)b[0]);
         }
 
        /* Won't be reached */
@@ -147,3 +212,46 @@ exif_set_srational (unsigned char *buf, ExifByteOrder order,
        exif_set_slong (buf, order, value.numerator);
        exif_set_slong (buf + 4, order, value.denominator);
 }
+
+/*! This function converts rather UCS-2LE than UTF-16 to UTF-8.
+ * It should really be replaced by iconv().
+ */
+void
+exif_convert_utf16_to_utf8 (char *out, const unsigned char *in, int maxlen)
+{
+       if (maxlen <= 0) {
+               return;
+       }
+       for (;;) {
+               ExifShort v = exif_get_short(in, EXIF_BYTE_ORDER_INTEL);
+               if (!v)
+                       break;
+               if (v < 0x80) {
+                       if (maxlen > 1) {
+                               *out++ = (char)v;
+                               maxlen--;
+                       } else {
+                               break;
+                       }
+               } else if (v < 0x800) {
+                       if (maxlen > 2) {
+                               *out++ = ((v >> 6) & 0x1F) | 0xC0;
+                               *out++ = (v & 0x3F) | 0x80;
+                               maxlen -= 2;
+                       } else {
+                               break;
+                       }
+               } else {
+                       if (maxlen > 3) {
+                               *out++ = ((v >> 12) & 0x0F) | 0xE0;
+                               *out++ = ((v >> 6) & 0x3F) | 0x80;
+                               *out++ = (v & 0x3F) | 0x80;
+                               maxlen -= 3;
+                       } else {
+                               break;
+                       }
+               }
+               in += 2;
+       }
+       *out = 0;
+}