bmp2tiff.c
上传用户:looem2003
上传日期:2014-07-20
资源大小:13733k
文件大小:26k
源码类别:

打印编程

开发平台:

Visual C++

  1. /* $Id: bmp2tiff.c,v 1.16 2005/12/29 00:33:51 bfriesen Exp $
  2.  *
  3.  * Project:  libtiff tools
  4.  * Purpose:  Convert Windows BMP files in TIFF.
  5.  * Author:   Andrey Kiselev, dron@remotesensing.org
  6.  *
  7.  ******************************************************************************
  8.  * Copyright (c) 2004, Andrey Kiselev <dron@remotesensing.org>
  9.  *
  10.  * Permission to use, copy, modify, distribute, and sell this software and 
  11.  * its documentation for any purpose is hereby granted without fee, provided
  12.  * that (i) the above copyright notices and this permission notice appear in
  13.  * all copies of the software and related documentation, and (ii) the names of
  14.  * Sam Leffler and Silicon Graphics may not be used in any advertising or
  15.  * publicity relating to the software without the specific, prior written
  16.  * permission of Sam Leffler and Silicon Graphics.
  17.  * 
  18.  * THE SOFTWARE IS PROVIDED "AS-IS" AND WITHOUT WARRANTY OF ANY KIND, 
  19.  * EXPRESS, IMPLIED OR OTHERWISE, INCLUDING WITHOUT LIMITATION, ANY 
  20.  * WARRANTY OF MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE.  
  21.  * 
  22.  * IN NO EVENT SHALL SAM LEFFLER OR SILICON GRAPHICS BE LIABLE FOR
  23.  * ANY SPECIAL, INCIDENTAL, INDIRECT OR CONSEQUENTIAL DAMAGES OF ANY KIND,
  24.  * OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
  25.  * WHETHER OR NOT ADVISED OF THE POSSIBILITY OF DAMAGE, AND ON ANY THEORY OF 
  26.  * LIABILITY, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE 
  27.  * OF THIS SOFTWARE.
  28.  */
  29. #include "tif_config.h.in"
  30. #include <getopt.h>
  31. #include <fcntl.h>
  32. #include <stdio.h>
  33. #include <stdlib.h>
  34. #include <string.h>
  35. #include <ctype.h>
  36. #include <sys/types.h>
  37. #include <sys/stat.h>
  38. #ifdef HAVE_UNISTD_H
  39. # include <unistd.h>
  40. #endif
  41. #if HAVE_FCNTL_H
  42. # include <fcntl.h>
  43. #endif
  44. #if HAVE_SYS_TYPES_H
  45. # include <sys/types.h>
  46. #endif
  47. #if HAVE_IO_H
  48. # include <io.h>
  49. #endif
  50. #include "tiffio.h"
  51. #ifndef O_BINARY
  52. # define O_BINARY 0
  53. #endif
  54. enum BMPType
  55. {
  56.     BMPT_WIN4,      /* BMP used in Windows 3.0/NT 3.51/95 */
  57.     BMPT_WIN5,      /* BMP used in Windows NT 4.0/98/Me/2000/XP */
  58.     BMPT_OS21,      /* BMP used in OS/2 PM 1.x */
  59.     BMPT_OS22       /* BMP used in OS/2 PM 2.x */
  60. };
  61. /*
  62.  * Bitmap file consists of a BMPFileHeader structure followed by a
  63.  * BMPInfoHeader structure. An array of BMPColorEntry structures (also called
  64.  * a colour table) follows the bitmap information header structure. The colour
  65.  * table is followed by a second array of indexes into the colour table (the
  66.  * actual bitmap data). Data may be comressed, for 4-bpp and 8-bpp used RLE
  67.  * compression.
  68.  *
  69.  * +---------------------+
  70.  * | BMPFileHeader       |
  71.  * +---------------------+
  72.  * | BMPInfoHeader       |
  73.  * +---------------------+
  74.  * | BMPColorEntry array |
  75.  * +---------------------+
  76.  * | Colour-index array  |
  77.  * +---------------------+
  78.  *
  79.  * All numbers stored in Intel order with least significant byte first.
  80.  */
  81. enum BMPComprMethod
  82. {
  83.     BMPC_RGB = 0L,          /* Uncompressed */
  84.     BMPC_RLE8 = 1L,         /* RLE for 8 bpp images */
  85.     BMPC_RLE4 = 2L,         /* RLE for 4 bpp images */
  86.     BMPC_BITFIELDS = 3L,    /* Bitmap is not compressed and the colour table
  87.      * consists of three DWORD color masks that specify
  88.      * the red, green, and blue components of each
  89.      * pixel. This is valid when used with
  90.      * 16- and 32-bpp bitmaps. */
  91.     BMPC_JPEG = 4L,         /* Indicates that the image is a JPEG image. */
  92.     BMPC_PNG = 5L           /* Indicates that the image is a PNG image. */
  93. };
  94. enum BMPLCSType                 /* Type of logical color space. */
  95. {
  96.     BMPLT_CALIBRATED_RGB = 0, /* This value indicates that endpoints and
  97.  * gamma values are given in the appropriate
  98.  * fields. */
  99.     BMPLT_DEVICE_RGB = 1,
  100.     BMPLT_DEVICE_CMYK = 2
  101. };
  102. typedef struct
  103. {
  104.     int32   iCIEX;
  105.     int32   iCIEY;
  106.     int32   iCIEZ;
  107. } BMPCIEXYZ;
  108. typedef struct                  /* This structure contains the x, y, and z */
  109. { /* coordinates of the three colors that */
  110. /* correspond */
  111.     BMPCIEXYZ   iCIERed;        /* to the red, green, and blue endpoints for */
  112.     BMPCIEXYZ   iCIEGreen;      /* a specified logical color space. */
  113.     BMPCIEXYZ iCIEBlue;
  114. } BMPCIEXYZTriple;
  115. typedef struct
  116. {
  117.     char bType[2];       /* Signature "BM" */
  118.     uint32 iSize;          /* Size in bytes of the bitmap file. Should
  119.  * always be ignored while reading because
  120.  * of error in Windows 3.0 SDK's description
  121.  * of this field */
  122.     uint16 iReserved1;     /* Reserved, set as 0 */
  123.     uint16 iReserved2;     /* Reserved, set as 0 */
  124.     uint32 iOffBits;       /* Offset of the image from file start in bytes */
  125. } BMPFileHeader;
  126. /* File header size in bytes: */
  127. const int       BFH_SIZE = 14;
  128. typedef struct
  129. {
  130.     uint32 iSize;          /* Size of BMPInfoHeader structure in bytes.
  131.  * Should be used to determine start of the
  132.  * colour table */
  133.     int32 iWidth;         /* Image width */
  134.     int32 iHeight;        /* Image height. If positive, image has bottom
  135.  * left origin, if negative --- top left. */
  136.     int16 iPlanes;        /* Number of image planes (must be set to 1) */
  137.     int16 iBitCount;      /* Number of bits per pixel (1, 4, 8, 16, 24
  138.  * or 32). If 0 then the number of bits per
  139.  * pixel is specified or is implied by the
  140.  * JPEG or PNG format. */
  141.     uint32 iCompression; /* Compression method */
  142.     uint32 iSizeImage;     /* Size of uncomressed image in bytes. May
  143.  * be 0 for BMPC_RGB bitmaps. If iCompression
  144.  * is BI_JPEG or BI_PNG, iSizeImage indicates
  145.  * the size of the JPEG or PNG image buffer. */
  146.     int32 iXPelsPerMeter; /* X resolution, pixels per meter (0 if not used) */
  147.     int32 iYPelsPerMeter; /* Y resolution, pixels per meter (0 if not used) */
  148.     uint32 iClrUsed;       /* Size of colour table. If 0, iBitCount should
  149.  * be used to calculate this value
  150.  * (1<<iBitCount). This value should be
  151.  * unsigned for proper shifting. */
  152.     int32 iClrImportant;  /* Number of important colours. If 0, all
  153.  * colours are required */
  154.     /*
  155.      * Fields above should be used for bitmaps, compatible with Windows NT 3.51
  156.      * and earlier. Windows 98/Me, Windows 2000/XP introduces additional fields:
  157.      */
  158.     int32 iRedMask;       /* Colour mask that specifies the red component
  159.  * of each pixel, valid only if iCompression
  160.  * is set to BI_BITFIELDS. */
  161.     int32 iGreenMask;     /* The same for green component */
  162.     int32 iBlueMask;      /* The same for blue component */
  163.     int32 iAlphaMask;     /* Colour mask that specifies the alpha
  164.  * component of each pixel. */
  165.     uint32 iCSType;        /* Colour space of the DIB. */
  166.     BMPCIEXYZTriple sEndpoints; /* This member is ignored unless the iCSType
  167.  * member specifies BMPLT_CALIBRATED_RGB. */
  168.     int32 iGammaRed;      /* Toned response curve for red. This member
  169.  * is ignored unless color values are
  170.  * calibrated RGB values and iCSType is set to
  171.  * BMPLT_CALIBRATED_RGB. Specified
  172.  * in 16^16 format. */
  173.     int32 iGammaGreen;    /* Toned response curve for green. */
  174.     int32 iGammaBlue;     /* Toned response curve for blue. */
  175. } BMPInfoHeader;
  176. /*
  177.  * Info header size in bytes:
  178.  */
  179. const unsigned int  BIH_WIN4SIZE = 40; /* for BMPT_WIN4 */
  180. const unsigned int  BIH_WIN5SIZE = 57; /* for BMPT_WIN5 */
  181. const unsigned int  BIH_OS21SIZE = 12; /* for BMPT_OS21 */
  182. const unsigned int  BIH_OS22SIZE = 64; /* for BMPT_OS22 */
  183. /*
  184.  * We will use plain byte array instead of this structure, but declaration
  185.  * provided for reference
  186.  */
  187. typedef struct
  188. {
  189.     char       bBlue;
  190.     char       bGreen;
  191.     char       bRed;
  192.     char       bReserved;      /* Must be 0 */
  193. } BMPColorEntry;
  194. static uint16 compression = (uint16) -1;
  195. static int jpegcolormode = JPEGCOLORMODE_RGB;
  196. static int quality = 75; /* JPEG quality */
  197. static uint16 predictor = 0;
  198. static void usage(void);
  199. static int processCompressOptions(char*);
  200. static void rearrangePixels(char *, uint32, uint32);
  201. int
  202. main(int argc, char* argv[])
  203. {
  204. uint32 width, length;
  205. uint16 nbands = 1; /* number of bands in input image */
  206.         uint16 depth = 8; /* bits per pixel in input image */
  207. uint32 rowsperstrip = (uint32) -1;
  208.         uint16 photometric = PHOTOMETRIC_MINISBLACK;
  209. int fd;
  210. struct stat instat;
  211. char *outfilename = NULL, *infilename = NULL;
  212. TIFF *out = NULL;
  213. BMPFileHeader file_hdr;
  214.         BMPInfoHeader info_hdr;
  215.         int     bmp_type;
  216.         uint32  clr_tbl_size, n_clr_elems = 3;
  217.         unsigned char *clr_tbl;
  218. unsigned short *red_tbl = NULL, *green_tbl = NULL, *blue_tbl = NULL;
  219. uint32 row, clr;
  220. int c;
  221. extern int optind;
  222. extern char* optarg;
  223. while ((c = getopt(argc, argv, "c:r:o:h")) != -1) {
  224. switch (c) {
  225. case 'c': /* compression scheme */
  226. if (!processCompressOptions(optarg))
  227. usage();
  228. break;
  229. case 'r': /* rows/strip */
  230. rowsperstrip = atoi(optarg);
  231. break;
  232. case 'o':
  233. outfilename = optarg;
  234. break;
  235. case 'h':
  236. usage();
  237. default:
  238. break;
  239. }
  240. }
  241. if (argc - optind < 2)
  242. usage();
  243. infilename = argv[optind];
  244. fd = open(infilename, O_RDONLY|O_BINARY, 0);
  245. if (fd < 0) {
  246. TIFFError(infilename, "Cannot open input file");
  247. return -1;
  248. }
  249. read(fd, file_hdr.bType, 2);
  250. if(file_hdr.bType[0] != 'B' || file_hdr.bType[1] != 'M') {
  251. TIFFError(infilename, "File is not BMP");
  252. goto bad;
  253. }
  254. /* -------------------------------------------------------------------- */
  255. /*      Read the BMPFileHeader. We need iOffBits value only             */
  256. /* -------------------------------------------------------------------- */
  257. lseek(fd, 10, SEEK_SET);
  258. read(fd, &file_hdr.iOffBits, 4);
  259. #ifdef WORDS_BIGENDIAN
  260.         TIFFSwabLong(&file_hdr.iOffBits);
  261. #endif
  262. fstat(fd, &instat);
  263. file_hdr.iSize = instat.st_size;
  264. /* -------------------------------------------------------------------- */
  265. /*      Read the BMPInfoHeader.                                         */
  266. /* -------------------------------------------------------------------- */
  267.         lseek(fd, BFH_SIZE, SEEK_SET);
  268.         read(fd, &info_hdr.iSize, 4);
  269. #ifdef WORDS_BIGENDIAN
  270.         TIFFSwabLong(&info_hdr.iSize);
  271. #endif
  272.         if (info_hdr.iSize == BIH_WIN4SIZE)
  273.                 bmp_type = BMPT_WIN4;
  274.         else if (info_hdr.iSize == BIH_OS21SIZE)
  275.                 bmp_type = BMPT_OS21;
  276.         else if (info_hdr.iSize == BIH_OS22SIZE || info_hdr.iSize == 16)
  277.                 bmp_type = BMPT_OS22;
  278.         else
  279.                 bmp_type = BMPT_WIN5;
  280.         if (bmp_type == BMPT_WIN4 || bmp_type == BMPT_WIN5 || bmp_type == BMPT_OS22) {
  281.                 read(fd, &info_hdr.iWidth, 4);
  282.                 read(fd, &info_hdr.iHeight, 4);
  283.                 read(fd, &info_hdr.iPlanes, 2);
  284.                 read(fd, &info_hdr.iBitCount, 2);
  285.                 read(fd, &info_hdr.iCompression, 4);
  286.                 read(fd, &info_hdr.iSizeImage, 4);
  287.                 read(fd, &info_hdr.iXPelsPerMeter, 4);
  288.                 read(fd, &info_hdr.iYPelsPerMeter, 4);
  289.                 read(fd, &info_hdr.iClrUsed, 4);
  290.                 read(fd, &info_hdr.iClrImportant, 4);
  291. #ifdef WORDS_BIGENDIAN
  292.                 TIFFSwabLong((uint32*) &info_hdr.iWidth);
  293.                 TIFFSwabLong((uint32*) &info_hdr.iHeight);
  294.                 TIFFSwabShort((uint16*) &info_hdr.iPlanes);
  295.                 TIFFSwabShort((uint16*) &info_hdr.iBitCount);
  296.                 TIFFSwabLong((uint32*) &info_hdr.iCompression);
  297.                 TIFFSwabLong((uint32*) &info_hdr.iSizeImage);
  298.                 TIFFSwabLong((uint32*) &info_hdr.iXPelsPerMeter);
  299.                 TIFFSwabLong((uint32*) &info_hdr.iYPelsPerMeter);
  300.                 TIFFSwabLong((uint32*) &info_hdr.iClrUsed);
  301.                 TIFFSwabLong((uint32*) &info_hdr.iClrImportant);
  302. #endif
  303.                 n_clr_elems = 4;
  304.         }
  305. if (bmp_type == BMPT_OS22) {
  306. /* 
  307.  * FIXME: different info in different documents
  308.  * regarding this!
  309.  */
  310.                  n_clr_elems = 3;
  311.         }
  312. if (bmp_type == BMPT_OS21) {
  313.                 int16  iShort;
  314.                 read(fd, &iShort, 2);
  315. #ifdef WORDS_BIGENDIAN
  316.                 TIFFSwabShort((uint16*) &iShort);
  317. #endif
  318.                 info_hdr.iWidth = iShort;
  319.                 read(fd, &iShort, 2);
  320. #ifdef WORDS_BIGENDIAN
  321.                 TIFFSwabShort((uint16*) &iShort);
  322. #endif
  323.                 info_hdr.iHeight = iShort;
  324.                 read(fd, &iShort, 2);
  325. #ifdef WORDS_BIGENDIAN
  326.                 TIFFSwabShort((uint16*) &iShort);
  327. #endif
  328.                 info_hdr.iPlanes = iShort;
  329.                 read(fd, &iShort, 2);
  330. #ifdef WORDS_BIGENDIAN
  331.                 TIFFSwabShort((uint16*) &iShort);
  332. #endif
  333.                 info_hdr.iBitCount = iShort;
  334. info_hdr.iCompression = BMPC_RGB;
  335.                 n_clr_elems = 3;
  336.         }
  337.         if (info_hdr.iBitCount != 1  && info_hdr.iBitCount != 4  &&
  338.             info_hdr.iBitCount != 8  && info_hdr.iBitCount != 16 &&
  339.             info_hdr.iBitCount != 24 && info_hdr.iBitCount != 32) {
  340.             TIFFError(infilename, "Cannot process BMP file with bit count %d",
  341.       info_hdr.iBitCount);
  342.             close(fd);
  343.             return 0;
  344.         }
  345.         width = info_hdr.iWidth;
  346.         length = (info_hdr.iHeight > 0) ? info_hdr.iHeight : -info_hdr.iHeight;
  347. switch (info_hdr.iBitCount)
  348.         {
  349.                 case 1:
  350.                 case 4:
  351.                 case 8:
  352.                         nbands = 1;
  353. depth = info_hdr.iBitCount;
  354.                         photometric = PHOTOMETRIC_PALETTE;
  355.                         /* Allocate memory for colour table and read it. */
  356.                         if (info_hdr.iClrUsed)
  357.                             clr_tbl_size = ((uint32)(1 << depth) < info_hdr.iClrUsed) ?
  358.     (uint32) (1 << depth) : info_hdr.iClrUsed;
  359.                         else
  360.                             clr_tbl_size = 1 << depth;
  361.                         clr_tbl = (unsigned char *)
  362. _TIFFmalloc(n_clr_elems * clr_tbl_size);
  363. if (!clr_tbl) {
  364. TIFFError(infilename,
  365. "Can't allocate space for color table");
  366. goto bad;
  367. }
  368. lseek(fd, BFH_SIZE + info_hdr.iSize, SEEK_SET);
  369.                         read(fd, clr_tbl, n_clr_elems * clr_tbl_size);
  370. red_tbl = (unsigned short*)
  371. _TIFFmalloc(1<<depth * sizeof(unsigned short));
  372. if (!red_tbl) {
  373. TIFFError(infilename,
  374. "Can't allocate space for red component table");
  375. _TIFFfree(clr_tbl);
  376. goto bad1;
  377. }
  378. green_tbl = (unsigned short*)
  379. _TIFFmalloc(1<<depth * sizeof(unsigned short));
  380. if (!green_tbl) {
  381. TIFFError(infilename,
  382. "Can't allocate space for green component table");
  383. _TIFFfree(clr_tbl);
  384. goto bad2;
  385. }
  386. blue_tbl = (unsigned short*)
  387. _TIFFmalloc(1<<depth * sizeof(unsigned short));
  388. if (!blue_tbl) {
  389. TIFFError(infilename,
  390. "Can't allocate space for blue component table");
  391. _TIFFfree(clr_tbl);
  392. goto bad3;
  393. }
  394.                         for(clr = 0; clr < clr_tbl_size; clr++) {
  395.                             red_tbl[clr] = 257 * clr_tbl[clr*n_clr_elems+2];
  396.                             green_tbl[clr] = 257 * clr_tbl[clr*n_clr_elems+1];
  397.                             blue_tbl[clr] = 257 * clr_tbl[clr*n_clr_elems];
  398.                         }
  399.                         _TIFFfree(clr_tbl);
  400.                         break;
  401.                 case 16:
  402.                 case 24:
  403.                         nbands = 3;
  404. depth = info_hdr.iBitCount / nbands;
  405.                         photometric = PHOTOMETRIC_RGB;
  406.                         break;
  407.                 case 32:
  408.                         nbands = 3;
  409. depth = 8;
  410.                         photometric = PHOTOMETRIC_RGB;
  411.                         break;
  412.                 default:
  413.                         break;
  414.         }
  415. /* -------------------------------------------------------------------- */
  416. /*  Create output file.                                                 */
  417. /* -------------------------------------------------------------------- */
  418. if (outfilename == NULL)
  419. outfilename = argv[optind+1];
  420. out = TIFFOpen(outfilename, "w");
  421. if (out == NULL) {
  422. TIFFError(infilename, "Cannot open file %s for output",
  423.   outfilename);
  424. goto bad3;
  425. }
  426. TIFFSetField(out, TIFFTAG_IMAGEWIDTH, width);
  427. TIFFSetField(out, TIFFTAG_IMAGELENGTH, length);
  428. TIFFSetField(out, TIFFTAG_ORIENTATION, ORIENTATION_TOPLEFT);
  429. TIFFSetField(out, TIFFTAG_SAMPLESPERPIXEL, nbands);
  430. TIFFSetField(out, TIFFTAG_BITSPERSAMPLE, depth);
  431. TIFFSetField(out, TIFFTAG_PLANARCONFIG, PLANARCONFIG_CONTIG);
  432. TIFFSetField(out, TIFFTAG_PHOTOMETRIC, photometric);
  433.         TIFFSetField(out, TIFFTAG_ROWSPERSTRIP,
  434.                      TIFFDefaultStripSize(out, rowsperstrip));
  435. if (red_tbl && green_tbl && blue_tbl)
  436. TIFFSetField(out, TIFFTAG_COLORMAP, red_tbl, green_tbl, blue_tbl);
  437. if (compression == (uint16) -1)
  438. compression = COMPRESSION_PACKBITS;
  439. TIFFSetField(out, TIFFTAG_COMPRESSION, compression);
  440. switch (compression) {
  441. case COMPRESSION_JPEG:
  442. if (photometric == PHOTOMETRIC_RGB
  443.     && jpegcolormode == JPEGCOLORMODE_RGB)
  444. photometric = PHOTOMETRIC_YCBCR;
  445. TIFFSetField(out, TIFFTAG_JPEGQUALITY, quality);
  446. TIFFSetField(out, TIFFTAG_JPEGCOLORMODE, jpegcolormode);
  447. break;
  448. case COMPRESSION_LZW:
  449. case COMPRESSION_DEFLATE:
  450. if (predictor != 0)
  451. TIFFSetField(out, TIFFTAG_PREDICTOR, predictor);
  452. break;
  453. }
  454. /* -------------------------------------------------------------------- */
  455. /*  Read uncompressed image data.                                       */
  456. /* -------------------------------------------------------------------- */
  457.         if (info_hdr.iCompression == BMPC_RGB) {
  458.                 uint32 offset, size;
  459.                 char *scanbuf;
  460. /* XXX: Avoid integer overflow. We can calculate size in one
  461.  * step using
  462.  *
  463.  *   size = ((width * info_hdr.iBitCount + 31) & ~31) / 8
  464.  *
  465.  * formulae, but we should check for overflow conditions
  466.  * during calculation.
  467.  */
  468. size = width * info_hdr.iBitCount + 31;
  469. if (!width || !info_hdr.iBitCount
  470.     || (size - 31) / info_hdr.iBitCount != width ) {
  471. TIFFError(infilename,
  472.   "Wrong image parameters; "
  473.   "can't allocate space for scanline buffer");
  474. goto bad3;
  475. }
  476.                 size = (size & ~31) / 8;
  477.                 scanbuf = (char *) _TIFFmalloc(size);
  478. if (!scanbuf) {
  479. TIFFError(infilename,
  480.   "Can't allocate space for scanline buffer");
  481. goto bad3;
  482. }
  483.                 for (row = 0; row < length; row++) {
  484.                         if (info_hdr.iHeight > 0)
  485.                                 offset = file_hdr.iOffBits + (length - row - 1) * size;
  486.                         else
  487.                                 offset = file_hdr.iOffBits + row * size;
  488.                         if (lseek(fd, offset, SEEK_SET) == (off_t)-1) {
  489. TIFFError(infilename,
  490.   "scanline %lu: Seek error",
  491.   (unsigned long) row);
  492. break;
  493.                         }
  494. if (read(fd, scanbuf, size) < 0) {
  495. TIFFError(infilename,
  496.   "scanline %lu: Read error",
  497.   (unsigned long) row);
  498. break;
  499.                         }
  500.                         rearrangePixels(scanbuf, width, info_hdr.iBitCount);
  501.                         if (TIFFWriteScanline(out, scanbuf, row, 0) < 0) {
  502. TIFFError(infilename,
  503.   "scanline %lu: Write error",
  504.   (unsigned long) row);
  505. break;
  506.                         }
  507.                 }
  508.                 _TIFFfree(scanbuf);
  509. /* -------------------------------------------------------------------- */
  510. /*  Read compressed image data.                                         */
  511. /* -------------------------------------------------------------------- */
  512.         } else if ( info_hdr.iCompression == BMPC_RLE8
  513.     || info_hdr.iCompression == BMPC_RLE4 ) {
  514. uint32 i, j, k, runlength;
  515. uint32 compr_size, uncompr_size;
  516. unsigned char   *comprbuf;
  517. unsigned char   *uncomprbuf;
  518. compr_size = file_hdr.iSize - file_hdr.iOffBits;
  519. uncompr_size = width * length;
  520. comprbuf = (unsigned char *) _TIFFmalloc( compr_size );
  521. if (!comprbuf) {
  522. TIFFError(infilename,
  523. "Can't allocate space for compressed scanline buffer");
  524. goto bad3;
  525. }
  526. uncomprbuf = (unsigned char *) _TIFFmalloc( uncompr_size );
  527. if (!uncomprbuf) {
  528. TIFFError(infilename,
  529. "Can't allocate space for uncompressed scanline buffer");
  530. goto bad3;
  531. }
  532. lseek(fd, file_hdr.iOffBits, SEEK_SET);
  533. read(fd, comprbuf, compr_size);
  534. i = 0;
  535. j = 0;
  536. if (info_hdr.iBitCount == 8) {     /* RLE8 */
  537.     while( j < uncompr_size && i < compr_size ) {
  538. if ( comprbuf[i] ) {
  539.     runlength = comprbuf[i++];
  540.     while( runlength > 0
  541.    && j < uncompr_size
  542.    && i < compr_size ) {
  543. uncomprbuf[j++] = comprbuf[i];
  544. runlength--;
  545.     }
  546.     i++;
  547. } else {
  548.     i++;
  549.     if ( comprbuf[i] == 0 )         /* Next scanline */
  550. i++;
  551.     else if ( comprbuf[i] == 1 )    /* End of image */
  552. break;
  553.     else if ( comprbuf[i] == 2 ) {  /* Move to... */
  554. i++;
  555. if ( i < compr_size - 1 ) {
  556.     j += comprbuf[i] + comprbuf[i+1] * width;
  557.     i += 2;
  558. }
  559. else
  560.     break;
  561.     } else {                         /* Absolute mode */
  562. runlength = comprbuf[i++];
  563. for ( k = 0; k < runlength && j < uncompr_size && i < compr_size; k++ )
  564.     uncomprbuf[j++] = comprbuf[i++];
  565. if ( k & 0x01 )
  566.     i++;
  567.     }
  568. }
  569.     }
  570. }
  571. else {     /* RLE4 */
  572.     while( j < uncompr_size && i < compr_size ) {
  573. if ( comprbuf[i] ) {
  574.     runlength = comprbuf[i++];
  575.     while( runlength > 0 && j < uncompr_size && i < compr_size ) {
  576. if ( runlength & 0x01 )
  577.     uncomprbuf[j++] = (comprbuf[i] & 0xF0) >> 4;
  578. else
  579.     uncomprbuf[j++] = comprbuf[i] & 0x0F;
  580. runlength--;
  581.     }
  582.     i++;
  583. } else {
  584.     i++;
  585.     if ( comprbuf[i] == 0 )         /* Next scanline */
  586. i++;
  587.     else if ( comprbuf[i] == 1 )    /* End of image */
  588. break;
  589.     else if ( comprbuf[i] == 2 ) {  /* Move to... */
  590. i++;
  591. if ( i < compr_size - 1 ) {
  592.     j += comprbuf[i] + comprbuf[i+1] * width;
  593.     i += 2;
  594. }
  595. else
  596.     break;
  597.     } else {                        /* Absolute mode */
  598. runlength = comprbuf[i++];
  599. for ( k = 0; k < runlength && j < uncompr_size && i < compr_size; k++) {
  600.     if ( k & 0x01 )
  601. uncomprbuf[j++] = comprbuf[i++] & 0x0F;
  602.     else
  603. uncomprbuf[j++] = (comprbuf[i] & 0xF0) >> 4;
  604. }
  605. if ( k & 0x01 )
  606.     i++;
  607.     }
  608. }
  609.     }
  610. }
  611. _TIFFfree(comprbuf);
  612. for (row = 0; row < length; row++) {
  613.                         if (TIFFWriteScanline(out, uncomprbuf + (length - row - 1) * width, row, 0) < 0) {
  614. TIFFError(infilename,
  615.   "scanline %lu: Write error.n",
  616.   (unsigned long) row);
  617.                         }
  618. }
  619. _TIFFfree(uncomprbuf);
  620. }
  621. bad3:
  622. if (blue_tbl)
  623. _TIFFfree(blue_tbl);
  624. bad2:
  625. if (green_tbl)
  626. _TIFFfree(green_tbl);
  627. bad1:
  628. if (red_tbl)
  629. _TIFFfree(red_tbl);
  630. bad:
  631.         close(fd);
  632. if (out)
  633. TIFFClose(out);
  634.         return 0;
  635. }
  636. /*
  637.  * Image data in BMP file stored in BGR (or ABGR) format. We should rearrange
  638.  * pixels to RGB (RGBA) format.
  639.  */
  640. static void
  641. rearrangePixels(char *buf, uint32 width, uint32 bit_count)
  642. {
  643. char tmp;
  644. uint32 i;
  645.         switch(bit_count) {
  646. case 16:    /* FIXME: need a sample file */
  647.                         break;
  648.                 case 24:
  649. for (i = 0; i < width; i++, buf += 3) {
  650. tmp = *buf;
  651. *buf = *(buf + 2);
  652. *(buf + 2) = tmp;
  653. }
  654.                         break;
  655.                 case 32:
  656. {
  657. char *buf1 = buf;
  658. for (i = 0; i < width; i++, buf += 4) {
  659. tmp = *buf;
  660. *buf1++ = *(buf + 2);
  661. *buf1++ = *(buf + 1);
  662. *buf1++ = tmp;
  663. }
  664. }
  665.                         break;
  666.                 default:
  667.                         break;
  668.         }
  669. }
  670. static int
  671. processCompressOptions(char* opt)
  672. {
  673. if (strcmp(opt, "none") == 0)
  674. compression = COMPRESSION_NONE;
  675. else if (strcmp(opt, "packbits") == 0)
  676. compression = COMPRESSION_PACKBITS;
  677. else if (strncmp(opt, "jpeg", 4) == 0) {
  678. char* cp = strchr(opt, ':');
  679. if (cp && isdigit((int)cp[1]))
  680. quality = atoi(cp+1);
  681. if (cp && strchr(cp, 'r'))
  682. jpegcolormode = JPEGCOLORMODE_RAW;
  683. compression = COMPRESSION_JPEG;
  684. } else if (strncmp(opt, "lzw", 3) == 0) {
  685. char* cp = strchr(opt, ':');
  686. if (cp)
  687. predictor = atoi(cp+1);
  688. compression = COMPRESSION_LZW;
  689. } else if (strncmp(opt, "zip", 3) == 0) {
  690. char* cp = strchr(opt, ':');
  691. if (cp)
  692. predictor = atoi(cp+1);
  693. compression = COMPRESSION_DEFLATE;
  694. } else
  695. return (0);
  696. return (1);
  697. }
  698. static char* stuff[] = {
  699. "bmp2tiff --- convert Windows BMP files to TIFF",
  700. "usage: bmp2tiff [options] input.bmp output.tif",
  701. "where options are:",
  702. " -r # make each strip have no more than # rows",
  703. "",
  704. " -c lzw[:opts] compress output with Lempel-Ziv & Welch encoding",
  705. " -c zip[:opts] compress output with deflate encoding",
  706. " -c jpeg[:opts]compress output with JPEG encoding",
  707. " -c packbits compress output with packbits encoding",
  708. " -c none use no compression algorithm on output",
  709. "",
  710. "JPEG options:",
  711. " # set compression quality level (0-100, default 75)",
  712. " r output color image as RGB rather than YCbCr",
  713. "For example, -c jpeg:r:50 to get JPEG-encoded RGB data with 50% comp. quality",
  714. "",
  715. "LZW and deflate options:",
  716. " # set predictor value",
  717. "For example, -c lzw:2 to get LZW-encoded data with horizontal differencing",
  718. " -o out.tif write output to out.tif",
  719. " -h this help message",
  720. NULL
  721. };
  722. static void
  723. usage(void)
  724. {
  725. char buf[BUFSIZ];
  726. int i;
  727. setbuf(stderr, buf);
  728. for (i = 0; stuff[i] != NULL; i++)
  729. fprintf(stderr, "%sn", stuff[i]);
  730. exit(-1);
  731. }
  732. /* vim: set ts=8 sts=8 sw=8 noet: */