myBMP * loadBMP(char *name) { FILE * inFile = NULL; myBMP * mybm = NULL; BITMAPINFOHEADER bmih; BITMAPFILEHEADER bmfh; ubyte bmpinfoheader[64]; ulong headerSize; int mapentrysize = 0; /* 0 indicates no colormap */ long bPad; ulong my_row_bytes,bmp_row_bytes; #define LBM_cleanUp(err) do { if ( inFile ) fclose(inFile); if ( mybm ) freeBMP(mybm); return( NULL); } while(0) #define GET_2B(array,offset) ((uword) (ubyte)(array[offset+0]) + \ (((uword) (ubyte)(array[offset+1])) << 8)) #define GET_4B(array,offset) ((ulong) (ubyte)(array[offset+0]) + \ (((ulong) (ubyte)(array[offset+1])) << 8) + \ (((ulong) (ubyte)(array[offset+2])) << 16) + \ (((ulong) (ubyte)(array[offset+3])) << 24)) if ( (inFile = fopen(name,"rb")) == NULL ) LBM_cleanUp("fopen"); /* Read and verify the bitmap file header */ if (! FReadOk(inFile, &bmfh, sizeof(BITMAPFILEHEADER))) LBM_cleanUp("read short"); if ( bmfh.bfType != BM_TAG ) LBM_cleanUp("bmp sign"); bPad = bmfh.bfOffBits; /* We ignore the remaining fileheader fields */ /* The infoheader might be 12 bytes (OS/2 1.x), 40 bytes (Windows), * or 64 bytes (OS/2 2.x). Check the first 4 bytes to find out which. */ if (! FReadOk(inFile, bmpinfoheader, 4)) LBM_cleanUp("read short"); headerSize = (ulong) GET_4B(bmpinfoheader,0); if (headerSize < 12 || headerSize > 64) LBM_cleanUp("bad header size"); if (! FReadOk(inFile, bmpinfoheader+4, headerSize-4)) LBM_cleanUp("read short"); if ( ( mybm = new(myBMP)) == NULL ) LBM_cleanUp("malloc"); memcpy((char *)(&(bmih)),bmpinfoheader, min(sizeof(BITMAPINFOHEADER),headerSize)); switch (bmih.biBitCount) { case 8: /* colormapped image */ mapentrysize = 4; /* Windows uses RGBQUAD colormap */ if ( bmih.biClrUsed == 0 ) bmih.biClrUsed = 256; break; case 24: /* RGB image */ mapentrysize = 0; break; default: LBM_cleanUp("bad depth"); break; } /* Compute distance to bitmap data --- will adjust for colormap below */ bPad -= (headerSize + 14); /* Read the colormap, if any */ if (mapentrysize > 0 && bmih.biClrUsed > 0) { RGBQUAD pal[256]; int i; mybm->ncolors = bmih.biClrUsed; if ( mybm->ncolors > 256 ) mybm->ncolors = 256; if ( (mybm->palette = malloc(256*3)) == NULL ) LBM_cleanUp("malloc"); if (! FReadOk(inFile, pal , (mapentrysize * mybm->ncolors))) LBM_cleanUp("read short"); for(i=0;i<mybm->ncolors;i++) { mybm->palette[i*3 + 0] = pal[i].R; mybm->palette[i*3 + 1] = pal[i].G; mybm->palette[i*3 + 2] = pal[i].B; } /* account for size of colormap */ bPad -= mybm->ncolors * mapentrysize; } /* Skip any remaining pad bytes */ if (bPad < 0) /* incorrect bfOffBits value? */ LBM_cleanUp("bad header length"); else if ( bPad > 0 ) { fseek(inFile,bPad,SEEK_CUR); } /* Compute row width in file, including padding to 4-byte boundary */ if (bmih.biBitCount == 24) my_row_bytes = bmih.biWidth * 3; else my_row_bytes = bmih.biWidth; bmp_row_bytes = (my_row_bytes+3)&(~3) ; bmih.biSize = sizeof(BITMAPINFOHEADER); bmih.biSizeImage = bmp_row_bytes * abs(bmih.biHeight); mybm->width = bmih.biWidth; mybm->height = abs(bmih.biHeight); mybm->type = ( bmih.biBitCount == 24 ) ? MBTYPE_24BIT_RGB : MBTYPE_8BIT_PAL; mybm->dataBytes = my_row_bytes * mybm->height; if ( (mybm->data = malloc(mybm->dataBytes + bmp_row_bytes)) == NULL ) LBM_cleanUp("malloc failed"); { int step; ubyte * ptr; int y; ubyte garbage[4]; if ( bmih.biHeight > 0 ) { step = - (int)my_row_bytes; ptr = mybm->data + my_row_bytes * (mybm->height - 1); } else { step = my_row_bytes; ptr = mybm->data; } for(y=0;y<mybm->height;y++) { FRead(inFile,ptr,my_row_bytes); FRead(inFile,garbage,bmp_row_bytes - my_row_bytes); if (bmih.biBitCount == 24) swapBGRtoRGB(ptr,my_row_bytes); ptr += step; } } fclose(inFile); inFile = NULL; return mybm; }
start_input_bmp (j_compress_ptr cinfo, cjpeg_source_ptr sinfo) { bmp_source_ptr source = (bmp_source_ptr) sinfo; U_CHAR bmpfileheader[14]; U_CHAR bmpinfoheader[64]; #define GET_2B(array,offset) ((unsigned int) UCH(array[offset]) + \ (((unsigned int) UCH(array[offset+1])) << 8)) #define GET_4B(array,offset) ((INT32) UCH(array[offset]) + \ (((INT32) UCH(array[offset+1])) << 8) + \ (((INT32) UCH(array[offset+2])) << 16) + \ (((INT32) UCH(array[offset+3])) << 24)) INT32 bfOffBits; INT32 headerSize; INT32 biWidth; INT32 biHeight; unsigned int biPlanes; INT32 biCompression; INT32 biXPelsPerMeter,biYPelsPerMeter; INT32 biClrUsed = 0; int mapentrysize = 0; /* 0 indicates no colormap */ INT32 bPad; JDIMENSION row_width; /* Read and verify the bitmap file header */ if (! ReadOK(source->pub.input_file, bmpfileheader, 14)) ERREXIT(cinfo, JERR_INPUT_EOF); if (GET_2B(bmpfileheader,0) != 0x4D42) /* 'BM' */ ERREXIT(cinfo, JERR_BMP_NOT); bfOffBits = (INT32) GET_4B(bmpfileheader,10); /* We ignore the remaining fileheader fields */ /* The infoheader might be 12 bytes (OS/2 1.x), 40 bytes (Windows), * or 64 bytes (OS/2 2.x). Check the first 4 bytes to find out which. */ if (! ReadOK(source->pub.input_file, bmpinfoheader, 4)) ERREXIT(cinfo, JERR_INPUT_EOF); headerSize = (INT32) GET_4B(bmpinfoheader,0); if (headerSize < 12 || headerSize > 64) ERREXIT(cinfo, JERR_BMP_BADHEADER); if (! ReadOK(source->pub.input_file, bmpinfoheader+4, headerSize-4)) ERREXIT(cinfo, JERR_INPUT_EOF); switch ((int) headerSize) { case 12: /* Decode OS/2 1.x header (Microsoft calls this a BITMAPCOREHEADER) */ biWidth = (INT32) GET_2B(bmpinfoheader,4); biHeight = (INT32) GET_2B(bmpinfoheader,6); biPlanes = GET_2B(bmpinfoheader,8); source->bits_per_pixel = (int) GET_2B(bmpinfoheader,10); switch (source->bits_per_pixel) { case 8: /* colormapped image */ mapentrysize = 3; /* OS/2 uses RGBTRIPLE colormap */ TRACEMS2(cinfo, 1, JTRC_BMP_OS2_MAPPED, (int) biWidth, (int) biHeight); break; case 24: /* RGB image */ TRACEMS2(cinfo, 1, JTRC_BMP_OS2, (int) biWidth, (int) biHeight); break; default: ERREXIT(cinfo, JERR_BMP_BADDEPTH); break; } break; case 40: case 64: /* Decode Windows 3.x header (Microsoft calls this a BITMAPINFOHEADER) */ /* or OS/2 2.x header, which has additional fields that we ignore */ biWidth = GET_4B(bmpinfoheader,4); biHeight = GET_4B(bmpinfoheader,8); biPlanes = GET_2B(bmpinfoheader,12); source->bits_per_pixel = (int) GET_2B(bmpinfoheader,14); biCompression = GET_4B(bmpinfoheader,16); biXPelsPerMeter = GET_4B(bmpinfoheader,24); biYPelsPerMeter = GET_4B(bmpinfoheader,28); biClrUsed = GET_4B(bmpinfoheader,32); /* biSizeImage, biClrImportant fields are ignored */ switch (source->bits_per_pixel) { case 8: /* colormapped image */ mapentrysize = 4; /* Windows uses RGBQUAD colormap */ TRACEMS2(cinfo, 1, JTRC_BMP_MAPPED, (int) biWidth, (int) biHeight); break; case 24: /* RGB image */ TRACEMS2(cinfo, 1, JTRC_BMP, (int) biWidth, (int) biHeight); break; case 32: /* RGB image + Alpha Channel */ TRACEMS2(cinfo, 1, JTRC_BMP, (int) biWidth, (int) biHeight); break; default: ERREXIT(cinfo, JERR_BMP_BADDEPTH); break; } if (biCompression != 0) ERREXIT(cinfo, JERR_BMP_COMPRESSED); if (biXPelsPerMeter > 0 && biYPelsPerMeter > 0) { /* Set JFIF density parameters from the BMP data */ cinfo->X_density = (UINT16) (biXPelsPerMeter/100); /* 100 cm per meter */ cinfo->Y_density = (UINT16) (biYPelsPerMeter/100); cinfo->density_unit = 2; /* dots/cm */ } break; default: ERREXIT(cinfo, JERR_BMP_BADHEADER); return; } if (biWidth <= 0 || biHeight <= 0) ERREXIT(cinfo, JERR_BMP_EMPTY); if (biPlanes != 1) ERREXIT(cinfo, JERR_BMP_BADPLANES); /* Compute distance to bitmap data --- will adjust for colormap below */ bPad = bfOffBits - (headerSize + 14); /* Read the colormap, if any */ if (mapentrysize > 0) { if (biClrUsed <= 0) biClrUsed = 256; /* assume it's 256 */ else if (biClrUsed > 256) ERREXIT(cinfo, JERR_BMP_BADCMAP); /* Allocate space to store the colormap */ source->colormap = (*cinfo->mem->alloc_sarray) ((j_common_ptr) cinfo, JPOOL_IMAGE, (JDIMENSION) biClrUsed, (JDIMENSION) 3); /* and read it from the file */ read_colormap(source, (int) biClrUsed, mapentrysize); /* account for size of colormap */ bPad -= biClrUsed * mapentrysize; } /* Skip any remaining pad bytes */ if (bPad < 0) /* incorrect bfOffBits value? */ ERREXIT(cinfo, JERR_BMP_BADHEADER); while (--bPad >= 0) { (void) read_byte(source); } /* Compute row width in file, including padding to 4-byte boundary */ if (source->bits_per_pixel == 24) row_width = (JDIMENSION) (biWidth * 3); else if (source->bits_per_pixel == 32) row_width = (JDIMENSION) (biWidth * 4); else row_width = (JDIMENSION) biWidth; while ((row_width & 3) != 0) row_width++; source->row_width = row_width; /* Allocate space for inversion array, prepare for preload pass */ source->whole_image = (*cinfo->mem->request_virt_sarray) ((j_common_ptr) cinfo, JPOOL_IMAGE, FALSE, row_width, (JDIMENSION) biHeight, (JDIMENSION) 1); source->pub.get_pixel_rows = preload_image; if (cinfo->progress != NULL) { cd_progress_ptr progress = (cd_progress_ptr) cinfo->progress; progress->total_extra_passes++; /* count file input as separate pass */ } /* Allocate one-row buffer for returned data */ source->pub.buffer = (*cinfo->mem->alloc_sarray) ((j_common_ptr) cinfo, JPOOL_IMAGE, (JDIMENSION) (biWidth * 3), (JDIMENSION) 1); source->pub.buffer_height = 1; cinfo->in_color_space = JCS_RGB; cinfo->input_components = 3; cinfo->data_precision = 8; cinfo->image_width = (JDIMENSION) biWidth; cinfo->image_height = (JDIMENSION) biHeight; }
/////////////////////////////////////// //////////READ BMP///////////////////// CONVERT_IMAGERESULT start_input_bmp (CONVERT_IMG_INFO *p_imageinfo, CONVERT_IMGCONTEXT *p_inputparam) { CONVERT_IMAGERESULT t_err; U_CHAR bmpfileheader[14]; U_CHAR bmpinfoheader[64]; #define GET_2B(array,offset) ((uint16) UCH(array[offset]) + \ (((uint16) UCH(array[offset+1])) << 8)) #define GET_4B(array,offset) ((int32) UCH(array[offset]) + \ (((int32) UCH(array[offset+1])) << 8) + \ (((int32) UCH(array[offset+2])) << 16) + \ (((int32) UCH(array[offset+3])) << 24)) int32 bfOffBits; int32 headerSize; int32 biWidth = 0; /* initialize to avoid compiler warning */ int32 biHeight = 0; uint16 biPlanes; int32 biCompression; int32 biXPelsPerMeter,biYPelsPerMeter; int32 biClrUsed = 0; int16 mapentrysize = 0; /* 0 indicates no colormap */ DWORD t_index=0;/*index to stream*/ int32 bPad; uint16 row_width; if (p_inputparam->m_stream.m_type==CONVERT_FILE) { if (!read_param(&p_inputparam->m_stream,bmpfileheader,14)) { /*cant read fileheader*/ return CONVERR_INVALIDFILEHEADER; } p_imageinfo->m_image_size+=14; /* Read and verify the bitmap file header */ if (GET_2B(bmpfileheader,0) != 0x4D42) /* 'BM' */ return CONVERR_INVALIDFILEHEADER; bfOffBits = (int32) GET_4B(bmpfileheader,10); } if (! read_param(&p_inputparam->m_stream, bmpinfoheader, 4)) return CONVERR_INVALIDIMAGEHEADER;//cant read 4 bytes p_imageinfo->m_image_size+=4; headerSize = (int32) GET_4B(bmpinfoheader,0); if (headerSize < 12 || headerSize > 64) return CONVERR_INVALIDIMAGEHEADER; if (! read_param( &p_inputparam->m_stream, bmpinfoheader+4, (int16)(headerSize-4))) /*casting here is ok beacause of check for >64 above*/ return CONVERR_INVALIDIMAGEHEADER; p_imageinfo->m_image_size+=headerSize-4; switch ((int16) headerSize) { case 12: /* Decode OS/2 1.x header (Microsoft calls this a BITMAPCOREHEADER) */ biWidth = (int32) GET_2B(bmpinfoheader,4); biHeight = (int32) GET_2B(bmpinfoheader,6); biPlanes = GET_2B(bmpinfoheader,8); p_imageinfo->m_bitsperpixel = (int16) GET_2B(bmpinfoheader,10); switch (p_imageinfo->m_bitsperpixel) { case 8: /* colormapped image */ mapentrysize = 3; /* OS/2 uses RGBTRIPLE colormap */ break; case 16: case 24: /* RGB image */ break; default: return CONVERR_INVALIDBITDEPTH; break; } if (biPlanes != 1) return CONVERR_INVALIDBITDEPTH; break; case 40: case 64: /* Decode Windows 3.x header (Microsoft calls this a BITMAPINFOHEADER) */ /* or OS/2 2.x header, which has additional fields that we ignore */ biWidth = GET_4B(bmpinfoheader,4); biHeight = GET_4B(bmpinfoheader,8); biPlanes = GET_2B(bmpinfoheader,12); p_imageinfo->m_bitsperpixel = (int16) GET_2B(bmpinfoheader,14); biCompression = GET_4B(bmpinfoheader,16); biXPelsPerMeter = GET_4B(bmpinfoheader,24); biYPelsPerMeter = GET_4B(bmpinfoheader,28); biClrUsed = GET_4B(bmpinfoheader,32); /* biSizeImage, biClrImportant fields are ignored */ switch (p_imageinfo->m_bitsperpixel) { case 1: if (!biClrUsed)/* 0 denotes maximum usage of colors*/ biClrUsed=2; case 4: if (!biClrUsed)/* 0 denotes maximum usage of colors*/ biClrUsed=16; case 8: /* colormapped images */ if (!biClrUsed)/* 0 denotes maximum usage of colors*/ biClrUsed=256; mapentrysize = 4; /* Windows uses RGBQUAD colormap */ break; case 24: /* RGB image */ break; case 16: case 32: /* RGB image with masks*/ if (biCompression==3) /*BI_BITFIELDS*/ { biClrUsed=3; /*need to get masks for RGB*/ mapentrysize = 4; /* Windows uses RGBQUAD colormap */ } break; default: return CONVERR_INVALIDBITDEPTH; break; } if (biPlanes != 1) return FALSE; if (biCompression != 0) if (3!=biCompression) return CONVERR_COMPRESSED;//cant handle compressed bitmaps if (biXPelsPerMeter > 0 && biYPelsPerMeter > 0) { /* Set JFIF density parameters from the BMP data */ p_imageinfo->m_X_density = (UINT16) (biXPelsPerMeter/100); /* 100 cm per meter */ p_imageinfo->m_Y_density = (UINT16) (biYPelsPerMeter/100); p_imageinfo->m_density_unit = 2; /* dots/cm */ } break; default: return CONVERR_INVALIDIMAGEHEADER; break; } /* Compute distance to bitmap data --- will adjust for colormap below */ bPad = bfOffBits - (headerSize + 14); /* Read the colormap, if any */ if (mapentrysize > 0) { if (biClrUsed <= 0) biClrUsed = 256; /* assume it's 256 */ else if (biClrUsed > 256) return CONVERR_INVALIDCOLORMAP; /* Allocate space to store the colormap */ p_imageinfo->m_colormap = (BYTE *)malloc(biClrUsed*3); /* and read it from the file */ t_err=read_colormap_bmp(p_inputparam,p_imageinfo->m_colormap, (int16) biClrUsed, mapentrysize); if (t_err!=CONV_OK) return t_err; p_imageinfo->m_image_size+=biClrUsed*mapentrysize;/*mapentrysize for windows bitmaps*/ /* account for size of colormap */ bPad -= biClrUsed * mapentrysize; } if (CONVERT_FILE==p_inputparam->m_stream.m_type)/* Skip any remaining pad bytes */ { if (bPad < 0) /* incorrect bfOffBits value? */ return CONVERR_INVALIDIMAGEHEADER; while (--bPad >= 0) { (void) read_param_byte(&p_inputparam->m_stream); p_imageinfo->m_image_size++; } } /* Compute row width in file, including padding to 4-byte boundary */ switch (p_imageinfo->m_bitsperpixel) { case 1: row_width = biWidth/8; if (biWidth&7) row_width++; break; case 4: row_width = biWidth/2; if (biWidth&1) row_width++; break; case 8: row_width = (uint16) biWidth; break; case 16: row_width = (uint16) (biWidth * 2); break; case 24: row_width = (uint16) (biWidth * 3); break; case 32: row_width = (uint16) (biWidth * 4); break; default: return CONVERR_INVALIDBITDEPTH; } p_imageinfo->m_stride=row_width; while ((row_width & 3) != 0) row_width++; p_imageinfo->m_row_width = row_width; p_imageinfo->m_stride=p_imageinfo->m_row_width-p_imageinfo->m_stride;//difference /* p_imageinfo->m_in_color_space = JCS_RGB;*/ /* in color space is ignored. was only for JPEG PAL format*/ p_imageinfo->m_input_components = 3; p_imageinfo->m_data_precision = 8; p_imageinfo->m_image_width = (uint16) biWidth; p_imageinfo->m_image_height = (uint16) biHeight; p_imageinfo->m_numcolorentries=(short)biClrUsed; return CONV_OK; }