laag-libtiff 4.0.9.0

data/vendor/gitlab.com/libtiff/libtiff/contrib/dbs/README

@@ -0,0 +1,7 @@
+Wed May  9 09:11:35 PDT 1990
+
+This directory contains programs from Dan Sears
+(dbs@decwrl.dec.com).  Contact him directly if
+you have questions/problems.
+
+	Sam

data/vendor/gitlab.com/libtiff/libtiff/contrib/dbs/tiff-bi.c

@@ -0,0 +1,91 @@
+/* $Id: tiff-bi.c,v 1.3 2010-06-08 18:55:15 bfriesen Exp $ */
+
+/*
+ * tiff-bi.c -- create a Class B (bilevel) TIFF file
+ *
+ * Copyright 1990 by Digital Equipment Corporation, Maynard, Massachusetts.
+ *
+ *                        All Rights Reserved
+ *
+ * Permission to use, copy, modify, and distribute this software and its
+ * documentation for any purpose and without fee is hereby granted,
+ * provided that the above copyright notice appear in all copies and that
+ * both that copyright notice and this permission notice appear in
+ * supporting documentation, and that the name of Digital not be
+ * used in advertising or publicity pertaining to distribution of the
+ * software without specific, written prior permission.
+ *
+ * DIGITAL DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING
+ * ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL
+ * DIGITAL BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR
+ * ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
+ * WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION,
+ * ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
+ * SOFTWARE.
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+
+#include "tiffio.h"
+
+#define WIDTH       512
+#define HEIGHT      WIDTH
+
+int main(int argc, char **argv)
+{
+    int             i;
+    unsigned char * scan_line;
+    TIFF *          tif;
+
+    if (argc != 2) {
+        fprintf(stderr, "Usage: %s tiff-image\n", argv[0]);
+        return 0;
+    }
+
+    if ((tif = TIFFOpen(argv[1], "w")) == NULL) {
+        fprintf(stderr, "can't open %s as a TIFF file\n", argv[1]);
+        return 0;
+    }
+
+    TIFFSetField(tif, TIFFTAG_IMAGEWIDTH, WIDTH);
+    TIFFSetField(tif, TIFFTAG_IMAGELENGTH, HEIGHT);
+    TIFFSetField(tif, TIFFTAG_BITSPERSAMPLE, 1);
+    TIFFSetField(tif, TIFFTAG_COMPRESSION, COMPRESSION_NONE);
+    TIFFSetField(tif, TIFFTAG_PHOTOMETRIC, PHOTOMETRIC_MINISBLACK);
+    TIFFSetField(tif, TIFFTAG_SAMPLESPERPIXEL, 1);
+    TIFFSetField(tif, TIFFTAG_ROWSPERSTRIP, 1);
+    TIFFSetField(tif, TIFFTAG_PLANARCONFIG, PLANARCONFIG_CONTIG);
+    TIFFSetField(tif, TIFFTAG_RESOLUTIONUNIT, RESUNIT_NONE);
+
+    scan_line = (unsigned char *) malloc(WIDTH / 8);
+
+    for (i = 0; i < (WIDTH / 8) / 2; i++)
+        scan_line[i] = 0;
+
+    for (i = (WIDTH / 8) / 2; i < (WIDTH / 8); i++)
+        scan_line[i] = 255;
+
+    for (i = 0; i < HEIGHT / 2; i++)
+        TIFFWriteScanline(tif, scan_line, i, 0);
+
+    for (i = 0; i < (WIDTH / 8) / 2; i++)
+        scan_line[i] = 255;
+
+    for (i = (WIDTH / 8) / 2; i < (WIDTH / 8); i++)
+        scan_line[i] = 0;
+
+    for (i = HEIGHT / 2; i < HEIGHT; i++)
+        TIFFWriteScanline(tif, scan_line, i, 0);
+
+    free(scan_line);
+    TIFFClose(tif);
+    return 0;
+}
+/*
+ * Local Variables:
+ * mode: c
+ * c-basic-offset: 8
+ * fill-column: 78
+ * End:
+ */

data/vendor/gitlab.com/libtiff/libtiff/contrib/dbs/tiff-grayscale.c

@@ -0,0 +1,147 @@
+/* $Id: tiff-grayscale.c,v 1.6 2010-06-08 18:55:15 bfriesen Exp $ */
+
+/*
+ * tiff-grayscale.c -- create a Class G (grayscale) TIFF file
+ *      with a gray response curve in linear optical density
+ *
+ * Copyright 1990 by Digital Equipment Corporation, Maynard, Massachusetts.
+ *
+ *                        All Rights Reserved
+ *
+ * Permission to use, copy, modify, and distribute this software and its
+ * documentation for any purpose and without fee is hereby granted,
+ * provided that the above copyright notice appear in all copies and that
+ * both that copyright notice and this permission notice appear in
+ * supporting documentation, and that the name of Digital not be
+ * used in advertising or publicity pertaining to distribution of the
+ * software without specific, written prior permission.
+ *
+ * DIGITAL DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING
+ * ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL
+ * DIGITAL BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR
+ * ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
+ * WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION,
+ * ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
+ * SOFTWARE.
+ */
+
+#include <math.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+
+#include "tiffio.h"
+
+#define WIDTH       512
+#define HEIGHT      WIDTH
+
+char *              programName;
+void                Usage();
+
+int main(int argc, char **argv)
+{
+    int             bits_per_pixel = 8, cmsize, i, j, k,
+                    gray_index, chunk_size = 32, nchunks = 16;
+    unsigned char * scan_line;
+    uint16 *        gray;
+    float           refblackwhite[2*1];
+    TIFF *          tif;
+
+    programName = argv[0];
+
+    if (argc != 4)
+        Usage();
+
+    if (!strcmp(argv[1], "-depth"))
+         bits_per_pixel = atoi(argv[2]);
+    else
+         Usage();
+
+    switch (bits_per_pixel) {
+        case 8:
+            nchunks = 16;
+            chunk_size = 32;
+            break;
+        case 4:
+            nchunks = 4;
+            chunk_size = 128;
+            break;
+        case 2:
+            nchunks = 2;
+            chunk_size = 256;
+            break;
+        default:
+            Usage();
+    }
+
+    cmsize = nchunks * nchunks;
+    gray = (uint16 *) malloc(cmsize * sizeof(uint16));
+
+    gray[0] = 3000;
+    for (i = 1; i < cmsize; i++)
+        gray[i] = (uint16) (-log10((double) i / (cmsize - 1)) * 1000);
+
+    refblackwhite[0] = 0.0;
+    refblackwhite[1] = (float)((1L<<bits_per_pixel) - 1);
+
+    if ((tif = TIFFOpen(argv[3], "w")) == NULL) {
+        fprintf(stderr, "can't open %s as a TIFF file\n", argv[3]);
+		free(gray);
+        return 0;
+    }
+
+    TIFFSetField(tif, TIFFTAG_IMAGEWIDTH, WIDTH);
+    TIFFSetField(tif, TIFFTAG_IMAGELENGTH, HEIGHT);
+    TIFFSetField(tif, TIFFTAG_BITSPERSAMPLE, bits_per_pixel);
+    TIFFSetField(tif, TIFFTAG_COMPRESSION, COMPRESSION_NONE);
+    TIFFSetField(tif, TIFFTAG_PHOTOMETRIC, PHOTOMETRIC_MINISBLACK);
+    TIFFSetField(tif, TIFFTAG_SAMPLESPERPIXEL, 1);
+    TIFFSetField(tif, TIFFTAG_ROWSPERSTRIP, 1);
+    TIFFSetField(tif, TIFFTAG_PLANARCONFIG, PLANARCONFIG_CONTIG);
+    TIFFSetField(tif, TIFFTAG_REFERENCEBLACKWHITE, refblackwhite);
+    TIFFSetField(tif, TIFFTAG_TRANSFERFUNCTION, gray);
+    TIFFSetField(tif, TIFFTAG_RESOLUTIONUNIT, RESUNIT_NONE);
+
+    scan_line = (unsigned char *) malloc(WIDTH / (8 / bits_per_pixel));
+
+    for (i = 0; i < HEIGHT; i++) {
+        for (j = 0, k = 0; j < WIDTH;) {
+            gray_index = (j / chunk_size) + ((i / chunk_size) * nchunks);
+
+            switch (bits_per_pixel) {
+            case 8:
+                scan_line[k++] = gray_index;
+                j++;
+                break;
+            case 4:
+                scan_line[k++] = (gray_index << 4) + gray_index;
+                j += 2;
+                break;
+            case 2:
+                scan_line[k++] = (gray_index << 6) + (gray_index << 4)
+                    + (gray_index << 2) + gray_index;
+                j += 4;
+                break;
+            }
+        }
+        TIFFWriteScanline(tif, scan_line, i, 0);
+    }
+
+    free(scan_line);
+    TIFFClose(tif);
+    return 0;
+}
+
+void
+Usage()
+{
+    fprintf(stderr, "Usage: %s -depth (8 | 4 | 2) tiff-image\n", programName);
+    exit(0);
+}
+/*
+ * Local Variables:
+ * mode: c
+ * c-basic-offset: 8
+ * fill-column: 78
+ * End:
+ */

data/vendor/gitlab.com/libtiff/libtiff/contrib/dbs/tiff-palette.c

@@ -0,0 +1,284 @@
+/* $Id: tiff-palette.c,v 1.5 2010-06-08 18:55:15 bfriesen Exp $ */
+
+/*
+ * tiff-palette.c -- create a Class P (palette) TIFF file
+ *
+ * Copyright 1990 by Digital Equipment Corporation, Maynard, Massachusetts.
+ *
+ *                        All Rights Reserved
+ *
+ * Permission to use, copy, modify, and distribute this software and its
+ * documentation for any purpose and without fee is hereby granted,
+ * provided that the above copyright notice appear in all copies and that
+ * both that copyright notice and this permission notice appear in
+ * supporting documentation, and that the name of Digital not be
+ * used in advertising or publicity pertaining to distribution of the
+ * software without specific, written prior permission.
+ *
+ * DIGITAL DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING
+ * ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL
+ * DIGITAL BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR
+ * ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
+ * WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION,
+ * ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
+ * SOFTWARE.
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+
+#include "tiffio.h"
+
+#define WIDTH       512
+#define HEIGHT      WIDTH
+#define SCALE(x)    ((x) * 257L)
+
+char *              programName;
+void                Usage();
+
+int main(int argc, char **argv)
+{
+    int             bits_per_pixel = 8, cmsize, i, j, k,
+                    cmap_index, chunk_size = 32, nchunks = 16;
+    unsigned char * scan_line;
+    uint16          *red, *green, *blue;
+    TIFF *          tif;
+
+    programName = argv[0];
+
+    if (argc != 4)
+        Usage();
+
+    if (!strcmp(argv[1], "-depth"))
+         bits_per_pixel = atoi(argv[2]);
+    else
+         Usage();
+
+    switch (bits_per_pixel) {
+        case 8:
+            nchunks = 16;
+            chunk_size = 32;
+            break;
+        case 4:
+            nchunks = 4;
+            chunk_size = 128;
+            break;
+        case 2:
+            nchunks = 2;
+            chunk_size = 256;
+            break;
+	case 1:
+	    nchunks = 2;
+	    chunk_size = 256;
+	    break;
+        default:
+            Usage();
+    }
+
+    if (bits_per_pixel != 1) {
+	cmsize = nchunks * nchunks;
+    } else {
+	cmsize = 2;
+    }
+    red = (uint16 *) malloc(cmsize * sizeof(uint16));
+    green = (uint16 *) malloc(cmsize * sizeof(uint16));
+    blue = (uint16 *) malloc(cmsize * sizeof(uint16));
+
+    switch (bits_per_pixel) {
+    case 8:
+        for (i = 0; i < cmsize; i++) {
+            if (i < 32)
+                red[i] = 0;
+            else if (i < 64)
+                red[i] = SCALE(36);
+            else if (i < 96)
+                red[i] = SCALE(73);
+            else if (i < 128)
+                red[i] = SCALE(109);
+            else if (i < 160)
+                red[i] = SCALE(146);
+            else if (i < 192)
+                red[i] = SCALE(182);
+            else if (i < 224)
+                red[i] = SCALE(219);
+            else if (i < 256)
+                red[i] = SCALE(255);
+
+            if ((i % 32) < 4)
+                green[i] = 0;
+            else if (i < 8)
+                green[i] = SCALE(36);
+            else if ((i % 32) < 12)
+                green[i] = SCALE(73);
+            else if ((i % 32) < 16)
+                green[i] = SCALE(109);
+            else if ((i % 32) < 20)
+                green[i] = SCALE(146);
+            else if ((i % 32) < 24)
+                green[i] = SCALE(182);
+            else if ((i % 32) < 28)
+                green[i] = SCALE(219);
+            else if ((i % 32) < 32)
+                green[i] = SCALE(255);
+
+            if ((i % 4) == 0)
+                blue[i] = SCALE(0);
+            else if ((i % 4) == 1)
+                blue[i] = SCALE(85);
+            else if ((i % 4) == 2)
+                blue[i] = SCALE(170);
+            else if ((i % 4) == 3)
+                blue[i] = SCALE(255);
+        }
+        break;
+    case 4:
+        red[0] = SCALE(255);
+        green[0] = 0;
+        blue[0] = 0;
+
+        red[1] = 0;
+        green[1] = SCALE(255);
+        blue[1] = 0;
+
+        red[2] = 0;
+        green[2] = 0;
+        blue[2] = SCALE(255);
+
+        red[3] = SCALE(255);
+        green[3] = SCALE(255);
+        blue[3] = SCALE(255);
+
+        red[4] = 0;
+        green[4] = SCALE(255);
+        blue[4] = SCALE(255);
+
+        red[5] = SCALE(255);
+        green[5] = 0;
+        blue[5] = SCALE(255);
+
+        red[6] = SCALE(255);
+        green[6] = SCALE(255);
+        blue[6] = 0;
+
+        red[7] = 0;
+        green[7] = 0;
+        blue[7] = 0;
+
+        red[8] = SCALE(176);
+        green[8] = SCALE(224);
+        blue[8] = SCALE(230);
+        red[9] = SCALE(100);
+        green[9] = SCALE(149);
+        blue[9] = SCALE(237);
+        red[10] = SCALE(46);
+        green[10] = SCALE(139);
+        blue[10] = SCALE(87);
+        red[11] = SCALE(160);
+        green[11] = SCALE(82);
+        blue[11] = SCALE(45);
+        red[12] = SCALE(238);
+        green[12] = SCALE(130);
+        blue[12] = SCALE(238);
+        red[13] = SCALE(176);
+        green[13] = SCALE(48);
+        blue[13] = SCALE(96);
+        red[14] = SCALE(50);
+        green[14] = SCALE(205);
+        blue[14] = SCALE(50);
+        red[15] = SCALE(240);
+        green[15] = SCALE(152);
+        blue[15] = SCALE(35);
+        break;
+    case 2:
+        red[0] = SCALE(255);
+        green[0] = 0;
+        blue[0] = 0;
+
+        red[1] = 0;
+        green[1] = SCALE(255);
+        blue[1] = 0;
+
+        red[2] = 0;
+        green[2] = 0;
+        blue[2] = SCALE(255);
+        red[3] = SCALE(255);
+        green[3] = SCALE(255);
+        blue[3] = SCALE(255);
+        break;
+    case 1:
+        red[0] = 0;
+        green[0] = 0;
+        blue[0] = 0;
+
+        red[1] = SCALE(255);
+        green[1] = SCALE(255);
+        blue[1] = SCALE(255);
+        break;
+    }
+
+    if ((tif = TIFFOpen(argv[3], "w")) == NULL) {
+        fprintf(stderr, "can't open %s as a TIFF file\n", argv[3]);
+		free(red);free(green);free(blue);
+        return 0;
+    }
+
+    TIFFSetField(tif, TIFFTAG_IMAGEWIDTH, WIDTH);
+    TIFFSetField(tif, TIFFTAG_IMAGELENGTH, HEIGHT);
+    TIFFSetField(tif, TIFFTAG_BITSPERSAMPLE, bits_per_pixel);
+    TIFFSetField(tif, TIFFTAG_COMPRESSION, COMPRESSION_NONE);
+    TIFFSetField(tif, TIFFTAG_PHOTOMETRIC, PHOTOMETRIC_PALETTE);
+    TIFFSetField(tif, TIFFTAG_SAMPLESPERPIXEL, 1);
+    TIFFSetField(tif, TIFFTAG_ROWSPERSTRIP, 1);
+    TIFFSetField(tif, TIFFTAG_PLANARCONFIG, PLANARCONFIG_CONTIG);
+    TIFFSetField(tif, TIFFTAG_RESOLUTIONUNIT, RESUNIT_NONE);
+    TIFFSetField(tif, TIFFTAG_COLORMAP, red, green, blue);
+
+    scan_line = (unsigned char *) malloc(WIDTH / (8 / bits_per_pixel));
+
+    for (i = 0; i < HEIGHT; i++) {
+        for (j = 0, k = 0; j < WIDTH;) {
+            cmap_index = (j / chunk_size) + ((i / chunk_size) * nchunks);
+
+            switch (bits_per_pixel) {
+            case 8:
+                scan_line[k++] = cmap_index;
+                j++;
+                break;
+            case 4:
+                scan_line[k++] = (cmap_index << 4) + cmap_index;
+                j += 2;
+                break;
+            case 2:
+                scan_line[k++] = (cmap_index << 6) + (cmap_index << 4)
+                    + (cmap_index << 2) + cmap_index;
+                j += 4;
+                break;
+	    case 1:
+		scan_line[k++] =
+			((j / chunk_size) == (i / chunk_size)) ? 0x00 : 0xff;
+		j += 8;
+		break;
+            }
+        }
+        TIFFWriteScanline(tif, scan_line, i, 0);
+    }
+
+    free(scan_line);
+    TIFFClose(tif);
+    return 0;
+}
+
+void
+Usage()
+{
+    fprintf(stderr, "Usage: %s -depth (8 | 4 | 2 | 1) tiff-image\n", programName);
+    exit(0);
+}
+/*
+ * Local Variables:
+ * mode: c
+ * c-basic-offset: 8
+ * fill-column: 78
+ * End:
+ */