From ba99f2a78a438151e49057ebc23b53fce032d731 Mon Sep 17 00:00:00 2001 From: Felix Domke Date: Sat, 18 Nov 2006 13:14:57 +0000 Subject: add functions to load&scale pictures and to get exif information --- lib/gdi/picexif.cpp | 630 ++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 630 insertions(+) create mode 100644 lib/gdi/picexif.cpp (limited to 'lib/gdi/picexif.cpp') diff --git a/lib/gdi/picexif.cpp b/lib/gdi/picexif.cpp new file mode 100644 index 00000000..844673ce --- /dev/null +++ b/lib/gdi/picexif.cpp @@ -0,0 +1,630 @@ +#include "picexif.h" + +#define M_SOF0 0xC0 +#define M_SOF1 0xC1 +#define M_SOF2 0xC2 +#define M_SOF3 0xC3 +#define M_SOF5 0xC5 +#define M_SOF6 0xC6 +#define M_SOF7 0xC7 +#define M_SOF9 0xC9 +#define M_SOF10 0xCA +#define M_SOF11 0xCB +#define M_SOF13 0xCD +#define M_SOF14 0xCE +#define M_SOF15 0xCF +#define M_SOI 0xD8 +#define M_EOI 0xD9 +#define M_SOS 0xDA +#define M_JFIF 0xE0 +#define M_EXIF 0xE1 +#define M_COM 0xFE + +#define NUM_FORMATS 12 +#define FMT_BYTE 1 +#define FMT_STRING 2 +#define FMT_USHORT 3 +#define FMT_ULONG 4 +#define FMT_URATIONAL 5 +#define FMT_SBYTE 6 +#define FMT_UNDEFINED 7 +#define FMT_SSHORT 8 +#define FMT_SLONG 9 +#define FMT_SRATIONAL 10 +#define FMT_SINGLE 11 +#define FMT_DOUBLE 12 + +#define TAG_EXIF_VERSION 0x9000 +#define TAG_EXIF_OFFSET 0x8769 +#define TAG_INTEROP_OFFSET 0xa005 +#define TAG_MAKE 0x010F +#define TAG_MODEL 0x0110 +#define TAG_ORIENTATION 0x0112 +#define TAG_XRESOLUTION 0x011A +#define TAG_YRESOLUTION 0x011B +#define TAG_RESOLUTIONUNIT 0x0128 +#define TAG_EXPOSURETIME 0x829A +#define TAG_FNUMBER 0x829D +#define TAG_SHUTTERSPEED 0x9201 +#define TAG_APERTURE 0x9202 +#define TAG_BRIGHTNESS 0x9203 +#define TAG_MAXAPERTURE 0x9205 +#define TAG_FOCALLENGTH 0x920A +#define TAG_DATETIME_ORIGINAL 0x9003 +#define TAG_USERCOMMENT 0x9286 +#define TAG_SUBJECT_DISTANCE 0x9206 +#define TAG_FLASH 0x9209 +#define TAG_FOCALPLANEXRES 0xa20E +#define TAG_FOCALPLANEYRES 0xa20F +#define TAG_FOCALPLANEUNITS 0xa210 +#define TAG_EXIF_IMAGEWIDTH 0xA002 +#define TAG_EXIF_IMAGELENGTH 0xA003 +#define TAG_EXPOSURE_BIAS 0x9204 +#define TAG_WHITEBALANCE 0x9208 +#define TAG_METERING_MODE 0x9207 +#define TAG_EXPOSURE_PROGRAM 0x8822 +#define TAG_ISO_EQUIVALENT 0x8827 +#define TAG_COMPRESSION_LEVEL 0x9102 +#define TAG_THUMBNAIL_OFFSET 0x0201 +#define TAG_THUMBNAIL_LENGTH 0x0202 + + +Cexif::Cexif() +{ +} + +Cexif::~Cexif() +{ + //ClearExif(); +} + +void Cexif::ClearExif() +{ + if(freeinfo) + { + for(int i=0;i= MAX_SECTIONS) + { + strcpy(m_szLastError,"Too many sections in jpg file"); return false; + } + + for (a=0;a<7;a++) + { + marker = fgetc(hFile); + if (marker != 0xff) break; + + if (a >= 6) + { + strcpy(m_szLastError,"too many padding unsigned chars\n"); return false; + } + } + + if (marker == 0xff) + { + strcpy(m_szLastError,"too many padding unsigned chars!"); return false; + } + + Sections[SectionsRead].Type = marker; + + lh = fgetc(hFile); + ll = fgetc(hFile); + + itemlen = (lh << 8) | ll; + + if (itemlen < 2) + { + strcpy(m_szLastError,"invalid marker"); return false; + } + Sections[SectionsRead].Size = itemlen; + + Data = (unsigned char *)malloc(itemlen); + if (Data == NULL) + { + strcpy(m_szLastError,"Could not allocate memory"); return false; + } + Sections[SectionsRead].Data = Data; + + + Data[0] = (unsigned char)lh; + Data[1] = (unsigned char)ll; + + got = fread(Data+2, 1, itemlen-2,hFile); + if (got != itemlen-2) + { + strcpy(m_szLastError,"Premature end of file?"); return false; + } + SectionsRead += 1; + + switch(marker) + { + case M_SOS: + return true; + case M_EOI: + printf("No image in jpeg!\n"); + return false; + case M_COM: + if (HaveCom) + { + free(Sections[--SectionsRead].Data); + Sections[SectionsRead].Data=0; + } + else + { + process_COM(Data, itemlen); + HaveCom = 1; + } + break; + case M_JFIF: + free(Sections[--SectionsRead].Data); + Sections[SectionsRead].Data=0; + break; + case M_EXIF: + if (memcmp(Data+2, "Exif", 4) == 0) + { + m_exifinfo->IsExif = process_EXIF((unsigned char *)Data+2, itemlen); + } + else + { + free(Sections[--SectionsRead].Data); + Sections[SectionsRead].Data=0; + } + break; + case M_SOF0: + case M_SOF1: + case M_SOF2: + case M_SOF3: + case M_SOF5: + case M_SOF6: + case M_SOF7: + case M_SOF9: + case M_SOF10: + case M_SOF11: + case M_SOF13: + case M_SOF14: + case M_SOF15: + process_SOFn(Data, marker); + break; + default: + break; + } + } + + fclose(hFile); + return true; +} + +bool Cexif::process_EXIF(unsigned char * CharBuf, unsigned int length) +{ + m_exifinfo->Comments[0] = '\0'; + ExifImageWidth = 0; + + static const unsigned char ExifHeader[] = "Exif\0\0"; + if(memcmp(CharBuf+0, ExifHeader,6)) + { + strcpy(m_szLastError,"Incorrect Exif header"); return false; + } + + if (memcmp(CharBuf+6,"II",2) == 0) MotorolaOrder = 0; + else + { + if (memcmp(CharBuf+6,"MM",2) == 0) MotorolaOrder = 1; + else + { + strcpy(m_szLastError,"Invalid Exif alignment marker."); return false; + } + } + + if (Get16u(CharBuf+8) != 0x2a) + { + strcpy(m_szLastError,"Invalid Exif start (1)"); return false; + } + int FirstOffset = Get32u(CharBuf+10); + if (FirstOffset < 8 || FirstOffset > 16) + { + strcpy(m_szLastError,"Suspicious offset of first IFD value"); return 0; + } + unsigned char * LastExifRefd = CharBuf; + + if (!ProcessExifDir(CharBuf+14, CharBuf+6, length-6, m_exifinfo, &LastExifRefd)) return false; + + if (m_exifinfo->FocalplaneXRes != 0) + m_exifinfo->CCDWidth = (float)(ExifImageWidth * m_exifinfo->FocalplaneUnits / m_exifinfo->FocalplaneXRes); + + return true; +} + +int Cexif::Get16m(void * Short) +{ + return (((unsigned char *)Short)[0] << 8) | ((unsigned char *)Short)[1]; +} + +int Cexif::Get16u(void * Short) +{ + if (MotorolaOrder) + { + return (((unsigned char *)Short)[0] << 8) | ((unsigned char *)Short)[1]; + } + else + { + return (((unsigned char *)Short)[1] << 8) | ((unsigned char *)Short)[0]; + } +} + +long Cexif::Get32s(void * Long) +{ + if (MotorolaOrder) + { + return ((( char *)Long)[0] << 24) | (((unsigned char *)Long)[1] << 16) | (((unsigned char *)Long)[2] << 8 ) | (((unsigned char *)Long)[3] << 0 ); + } + else + { + return ((( char *)Long)[3] << 24) | (((unsigned char *)Long)[2] << 16) | (((unsigned char *)Long)[1] << 8 ) | (((unsigned char *)Long)[0] << 0 ); + } +} + +unsigned long Cexif::Get32u(void * Long) +{ + return (unsigned long)Get32s(Long) & 0xffffffff; +} + +bool Cexif::ProcessExifDir(unsigned char * DirStart, unsigned char * OffsetBase, unsigned ExifLength, EXIFINFO * const m_exifinfo, unsigned char ** const LastExifRefdP ) +{ + int de, a, NumDirEntries; + unsigned ThumbnailOffset = 0; + unsigned ThumbnailSize = 0; + + NumDirEntries = Get16u(DirStart); + + if ((DirStart+2+NumDirEntries*12) > (OffsetBase+ExifLength)) + { + strcpy(m_szLastError,"Illegally sized directory"); return 0; + } + + for (de=0;de= NUM_FORMATS) + { + strcpy(m_szLastError,"Illegal format code in EXIF dir"); return 0; + } + + BytesCount = Components * BytesPerFormat[Format]; + + if (BytesCount > 4) + { + unsigned OffsetVal; + OffsetVal = Get32u(DirEntry+8); + if (OffsetVal+BytesCount > ExifLength) + { + strcpy(m_szLastError,"Illegal pointer offset value in EXIF."); return 0; + } + ValuePtr = OffsetBase+OffsetVal; + } + else ValuePtr = DirEntry+8; + + if (*LastExifRefdP < ValuePtr+BytesCount) *LastExifRefdP = ValuePtr+BytesCount; + + switch(Tag) + { + case TAG_MAKE: + strncpy(m_exifinfo->CameraMake, (char*)ValuePtr, 31); + break; + case TAG_MODEL: + strncpy(m_exifinfo->CameraModel, (char*)ValuePtr, 39); + break; + case TAG_EXIF_VERSION: + strncpy(m_exifinfo->Version,(char*)ValuePtr, 4); + break; + case TAG_DATETIME_ORIGINAL: + strncpy(m_exifinfo->DateTime, (char*)ValuePtr, 19); + break; + case TAG_USERCOMMENT: + for (a=BytesCount;;) + { + a--; + if (((char*)ValuePtr)[a] == ' ') ((char*)ValuePtr)[a] = '\0'; + else break; + + if (a == 0) break; + } + + if (memcmp(ValuePtr, "ASCII",5) == 0) + { + for (a=5;a<10;a++) + { + char c; + c = ((char*)ValuePtr)[a]; + if (c != '\0' && c != ' ') + { + strncpy(m_exifinfo->Comments, (char*)ValuePtr+a, 199); + break; + } + } + + } + else strncpy(m_exifinfo->Comments, (char*)ValuePtr, 199); + break; + case TAG_FNUMBER: + m_exifinfo->ApertureFNumber = (float)ConvertAnyFormat(ValuePtr, Format); + break; + case TAG_APERTURE: + case TAG_MAXAPERTURE: + if (m_exifinfo->ApertureFNumber == 0) + { + //m_exifinfo->ApertureFNumber = (float)exp(ConvertAnyFormat(ValuePtr, Format)*log(2)*0.5); + } + break; + case TAG_BRIGHTNESS: + m_exifinfo->Brightness = (float)ConvertAnyFormat(ValuePtr, Format); + break; + case TAG_FOCALLENGTH: + m_exifinfo->FocalLength = (float)ConvertAnyFormat(ValuePtr, Format); + break; + case TAG_SUBJECT_DISTANCE: + m_exifinfo->Distance = (float)ConvertAnyFormat(ValuePtr, Format); + break; + case TAG_EXPOSURETIME: + m_exifinfo->ExposureTime = (float)ConvertAnyFormat(ValuePtr, Format); + break; + case TAG_SHUTTERSPEED: + if (m_exifinfo->ExposureTime == 0) + { + //m_exifinfo->ExposureTime = (float) (1/exp(ConvertAnyFormat(ValuePtr, Format)*log(2))); + } + break; + case TAG_FLASH: + if ((int)ConvertAnyFormat(ValuePtr, Format) & 7) strcpy(m_exifinfo->FlashUsed,"fire"); + else strcpy(m_exifinfo->FlashUsed,"not fired"); + break; + case TAG_ORIENTATION: + m_exifinfo->Orient = (int)ConvertAnyFormat(ValuePtr, Format); + switch((int)ConvertAnyFormat(ValuePtr, Format)) + { + case 1: strcpy(m_exifinfo->Orientation,"Top-Left"); break; + case 2: strcpy(m_exifinfo->Orientation,"Top-Right"); break; + case 3: strcpy(m_exifinfo->Orientation,"Bottom-Right"); break; + case 4: strcpy(m_exifinfo->Orientation,"Bottom-Left"); break; + case 5: strcpy(m_exifinfo->Orientation,"Left-Top"); break; + case 6: strcpy(m_exifinfo->Orientation,"Right-Top"); break; + case 7: strcpy(m_exifinfo->Orientation,"Right-Bottom"); break; + case 8: strcpy(m_exifinfo->Orientation,"Left-Bottom"); break; + default: strcpy(m_exifinfo->Orientation,"Undefined rotation value"); + } + break; + case TAG_EXIF_IMAGELENGTH: + case TAG_EXIF_IMAGEWIDTH: + a = (int)ConvertAnyFormat(ValuePtr, Format); + if (ExifImageWidth < a) ExifImageWidth = a; + break; + case TAG_FOCALPLANEXRES: + m_exifinfo->FocalplaneXRes = (float)ConvertAnyFormat(ValuePtr, Format); + break; + case TAG_FOCALPLANEYRES: + m_exifinfo->FocalplaneYRes = (float)ConvertAnyFormat(ValuePtr, Format); + break; + case TAG_RESOLUTIONUNIT: + switch((int)ConvertAnyFormat(ValuePtr, Format)) + { + case 2: strcpy(m_exifinfo->ResolutionUnit,"inches"); break; + case 3: strcpy(m_exifinfo->ResolutionUnit,"centimeters"); break; + default: strcpy(m_exifinfo->ResolutionUnit,"reserved"); + } + break; + case TAG_FOCALPLANEUNITS: + switch((int)ConvertAnyFormat(ValuePtr, Format)) + { + case 1: m_exifinfo->FocalplaneUnits = 1.0f; break; + case 2: m_exifinfo->FocalplaneUnits = 1.0f; break; + case 3: m_exifinfo->FocalplaneUnits = 0.3937007874f; break; + case 4: m_exifinfo->FocalplaneUnits = 0.03937007874f; break; + case 5: m_exifinfo->FocalplaneUnits = 0.00003937007874f; + } + break; + case TAG_EXPOSURE_BIAS: + m_exifinfo->ExposureBias = (float) ConvertAnyFormat(ValuePtr, Format); + break; + case TAG_WHITEBALANCE: + switch((int)ConvertAnyFormat(ValuePtr, Format)) + { + case 0: strcpy(m_exifinfo->LightSource,"unknown"); break; + case 1: strcpy(m_exifinfo->LightSource,"Daylight"); break; + case 2: strcpy(m_exifinfo->LightSource,"Fluorescent"); break; + case 3: strcpy(m_exifinfo->LightSource,"Tungsten"); break; + case 17: strcpy(m_exifinfo->LightSource,"Standard light A"); break; + case 18: strcpy(m_exifinfo->LightSource,"Standard light B"); break; + case 19: strcpy(m_exifinfo->LightSource,"Standard light C"); break; + case 20: strcpy(m_exifinfo->LightSource,"D55"); break; + case 21: strcpy(m_exifinfo->LightSource,"D65"); break; + case 22: strcpy(m_exifinfo->LightSource,"D75"); break; + default: strcpy(m_exifinfo->LightSource,"other"); break; + } + break; + case TAG_METERING_MODE: + switch((int)ConvertAnyFormat(ValuePtr, Format)) + { + case 0: strcpy(m_exifinfo->MeteringMode,"unknown"); break; + case 1: strcpy(m_exifinfo->MeteringMode,"Average"); break; + case 2: strcpy(m_exifinfo->MeteringMode,"Center-Weighted-Average"); break; + case 3: strcpy(m_exifinfo->MeteringMode,"Spot"); break; + case 4: strcpy(m_exifinfo->MeteringMode,"MultiSpot"); break; + case 5: strcpy(m_exifinfo->MeteringMode,"Pattern"); break; + case 6: strcpy(m_exifinfo->MeteringMode,"Partial"); break; + default: strcpy(m_exifinfo->MeteringMode,"other"); break; + } + break; + case TAG_EXPOSURE_PROGRAM: + switch((int)ConvertAnyFormat(ValuePtr, Format)) + { + case 0: strcpy(m_exifinfo->ExposureProgram,"not defined"); break; + case 1: strcpy(m_exifinfo->ExposureProgram,"Manual"); break; + case 2: strcpy(m_exifinfo->ExposureProgram,"Normal program"); break; + case 3: strcpy(m_exifinfo->ExposureProgram,"Aperture priority"); break; + case 4: strcpy(m_exifinfo->ExposureProgram,"Shutter priority"); break; + case 5: strcpy(m_exifinfo->ExposureProgram,"Creative program"); break; + case 6: strcpy(m_exifinfo->ExposureProgram,"Action program"); break; + case 7: strcpy(m_exifinfo->ExposureProgram,"Portrait mode"); break; + case 8: strcpy(m_exifinfo->ExposureProgram,"Landscape mode"); break; + default: strcpy(m_exifinfo->ExposureProgram,"reserved"); break; + } + break; + case TAG_ISO_EQUIVALENT: + m_exifinfo->ISOequivalent = (int)ConvertAnyFormat(ValuePtr, Format); + if ( m_exifinfo->ISOequivalent < 50 ) m_exifinfo->ISOequivalent *= 200; + break; + case TAG_COMPRESSION_LEVEL: + m_exifinfo->CompressionLevel = (int)ConvertAnyFormat(ValuePtr, Format); + break; + case TAG_XRESOLUTION: + m_exifinfo->Xresolution = (float)ConvertAnyFormat(ValuePtr, Format); + break; + case TAG_YRESOLUTION: + m_exifinfo->Yresolution = (float)ConvertAnyFormat(ValuePtr, Format); + break; + case TAG_THUMBNAIL_OFFSET: + ThumbnailOffset = (unsigned)ConvertAnyFormat(ValuePtr, Format); + break; + case TAG_THUMBNAIL_LENGTH: + ThumbnailSize = (unsigned)ConvertAnyFormat(ValuePtr, Format); + break; + } + + if (Tag == TAG_EXIF_OFFSET || Tag == TAG_INTEROP_OFFSET) + { + unsigned char * SubdirStart; + SubdirStart = OffsetBase + Get32u(ValuePtr); + if (SubdirStart < OffsetBase || SubdirStart > OffsetBase+ExifLength) + { + strcpy(m_szLastError,"Illegal subdirectory link"); return 0; + } + ProcessExifDir(SubdirStart, OffsetBase, ExifLength, m_exifinfo, LastExifRefdP); + continue; + } + } + + + unsigned char * SubdirStart; + unsigned Offset; + Offset = Get16u(DirStart+2+12*NumDirEntries); + if (Offset) + { + SubdirStart = OffsetBase + Offset; + if (SubdirStart < OffsetBase || SubdirStart > OffsetBase+ExifLength) + { + strcpy(m_szLastError,"Illegal subdirectory link"); return 0; + } + ProcessExifDir(SubdirStart, OffsetBase, ExifLength, m_exifinfo, LastExifRefdP); + } + + if (ThumbnailSize && ThumbnailOffset) + { + if (ThumbnailSize + ThumbnailOffset <= ExifLength) + { + m_exifinfo->ThumbnailPointer = OffsetBase + ThumbnailOffset; + m_exifinfo->ThumbnailSize = ThumbnailSize; + } + } + + return 1; +} + +double Cexif::ConvertAnyFormat(void * ValuePtr, int Format) +{ + double Value = 0; + + switch(Format) + { + case FMT_SBYTE: Value = *(signed char *)ValuePtr; break; + case FMT_BYTE: Value = *(unsigned char *)ValuePtr; break; + case FMT_USHORT: Value = Get16u(ValuePtr); break; + case FMT_ULONG: Value = Get32u(ValuePtr); break; + case FMT_URATIONAL: + case FMT_SRATIONAL: + { + int Num = Get32s(ValuePtr); + int Den = Get32s(4+(char *)ValuePtr); + if (Den == 0) Value = 0; + else Value = (double)Num/Den; + break; + } + case FMT_SSHORT: Value = (signed short)Get16u(ValuePtr); break; + case FMT_SLONG: Value = Get32s(ValuePtr); break; + case FMT_SINGLE: Value = (double)*(float *)ValuePtr; break; + case FMT_DOUBLE: Value = *(double *)ValuePtr; break; + } + return Value; +} + +void Cexif::process_COM (const unsigned char * Data, int length) +{ + int ch,a; + char Comment[MAX_COMMENT+1]; + int nch=0; + + if (length > MAX_COMMENT) length = MAX_COMMENT; + + for (a=2;a=0x20) || ch == '\n' || ch == '\t') Comment[nch++] = (char)ch; + else Comment[nch++] = '?'; + } + Comment[nch] = '\0'; + strcpy(m_exifinfo->Comments,Comment); +} + +void Cexif::process_SOFn (const unsigned char * Data, int marker) +{ + int data_precision, num_components; + + data_precision = Data[2]; + m_exifinfo->Height = Get16m((void*)(Data+3)); + m_exifinfo->Width = Get16m((void*)(Data+5)); + num_components = Data[7]; + + if (num_components == 3) strcpy(m_exifinfo->IsColor,"yes"); + else strcpy(m_exifinfo->IsColor,"no"); + + m_exifinfo->Process = marker; +} + -- cgit v1.2.3