1 /* $Id$ */
2
3 /*
4 * tiff-rgb.c -- create a 24-bit Class R (rgb) TIFF file
5 *
6 * Copyright 1990 by Digital Equipment Corporation, Maynard, Massachusetts.
7 *
8 * All Rights Reserved
9 *
10 * Permission to use, copy, modify, and distribute this software and its
11 * documentation for any purpose and without fee is hereby granted,
12 * provided that the above copyright notice appear in all copies and that
13 * both that copyright notice and this permission notice appear in
14 * supporting documentation, and that the name of Digital not be
15 * used in advertising or publicity pertaining to distribution of the
16 * software without specific, written prior permission.
17 *
18 * DIGITAL DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING
19 * ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL
20 * DIGITAL BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR
21 * ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
22 * WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION,
23 * ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
24 * SOFTWARE.
25 */
26
27 #include <math.h>
28 #include <stdio.h>
29 #include <stdlib.h>
30 #include <string.h>
31
32 #include "tiffio.h"
33
34 #define ROUND(x) (uint16) ((x) + 0.5)
35 #define CMSIZE 256
36 #define WIDTH 525
37 #define HEIGHT 512
38 #define TIFF_GAMMA 2.2
39
40 void Usage();
41 char * programName;
42
main(int argc,char ** argv)43 int main(int argc, char **argv)
44 {
45 char * input_file = NULL;
46 double image_gamma = TIFF_GAMMA;
47 int i, j;
48 TIFF * tif;
49 unsigned char * scan_line;
50 uint16 red[CMSIZE], green[CMSIZE], blue[CMSIZE];
51 float refblackwhite[2*3];
52
53 programName = argv[0];
54
55 switch (argc) {
56 case 2:
57 image_gamma = TIFF_GAMMA;
58 input_file = argv[1];
59 break;
60 case 4:
61 if (!strcmp(argv[1], "-gamma")) {
62 image_gamma = atof(argv[2]);
63 input_file = argv[3];
64 } else
65 Usage();
66 break;
67 default:
68 Usage();
69 }
70
71 for (i = 0; i < CMSIZE; i++) {
72 if (i == 0)
73 red[i] = green[i] = blue[i] = 0;
74 else {
75 red[i] = ROUND((pow(i / 255.0, 1.0 / image_gamma) * 65535.0));
76 green[i] = ROUND((pow(i / 255.0, 1.0 / image_gamma) * 65535.0));
77 blue[i] = ROUND((pow(i / 255.0, 1.0 / image_gamma) * 65535.0));
78 }
79 }
80 refblackwhite[0] = 0.0; refblackwhite[1] = 255.0;
81 refblackwhite[2] = 0.0; refblackwhite[3] = 255.0;
82 refblackwhite[4] = 0.0; refblackwhite[5] = 255.0;
83
84 if ((tif = TIFFOpen(input_file, "w")) == NULL) {
85 fprintf(stderr, "can't open %s as a TIFF file\n", input_file);
86 exit(0);
87 }
88
89 TIFFSetField(tif, TIFFTAG_IMAGEWIDTH, WIDTH);
90 TIFFSetField(tif, TIFFTAG_IMAGELENGTH, HEIGHT);
91 TIFFSetField(tif, TIFFTAG_BITSPERSAMPLE, 8);
92 TIFFSetField(tif, TIFFTAG_COMPRESSION, COMPRESSION_NONE);
93 TIFFSetField(tif, TIFFTAG_PHOTOMETRIC, PHOTOMETRIC_RGB);
94 TIFFSetField(tif, TIFFTAG_SAMPLESPERPIXEL, 3);
95 TIFFSetField(tif, TIFFTAG_ROWSPERSTRIP, 1);
96 TIFFSetField(tif, TIFFTAG_PLANARCONFIG, PLANARCONFIG_CONTIG);
97 TIFFSetField(tif, TIFFTAG_RESOLUTIONUNIT, RESUNIT_NONE);
98 #ifdef notdef
99 TIFFSetField(tif, TIFFTAG_WHITEPOINT, whitex, whitey);
100 TIFFSetField(tif, TIFFTAG_PRIMARYCHROMATICITIES, primaries);
101 #endif
102 TIFFSetField(tif, TIFFTAG_REFERENCEBLACKWHITE, refblackwhite);
103 TIFFSetField(tif, TIFFTAG_TRANSFERFUNCTION, red, green, blue);
104
105 scan_line = (unsigned char *) malloc(WIDTH * 3);
106
107 for (i = 0; i < 255; i++) {
108 for (j = 0; j < 75; j++) {
109 scan_line[j * 3] = 255;
110 scan_line[(j * 3) + 1] = 255 - i;
111 scan_line[(j * 3) + 2] = 255 - i;
112 }
113 for (j = 75; j < 150; j++) {
114 scan_line[j * 3] = 255 - i;
115 scan_line[(j * 3) + 1] = 255;
116 scan_line[(j * 3) + 2] = 255 - i;
117 }
118 for (j = 150; j < 225; j++) {
119 scan_line[j * 3] = 255 - i;
120 scan_line[(j * 3) + 1] = 255 - i;
121 scan_line[(j * 3) + 2] = 255;
122 }
123 for (j = 225; j < 300; j++) {
124 scan_line[j * 3] = (i - 1) / 2;
125 scan_line[(j * 3) + 1] = (i - 1) / 2;
126 scan_line[(j * 3) + 2] = (i - 1) / 2;
127 }
128 for (j = 300; j < 375; j++) {
129 scan_line[j * 3] = 255 - i;
130 scan_line[(j * 3) + 1] = 255;
131 scan_line[(j * 3) + 2] = 255;
132 }
133 for (j = 375; j < 450; j++) {
134 scan_line[j * 3] = 255;
135 scan_line[(j * 3) + 1] = 255 - i;
136 scan_line[(j * 3) + 2] = 255;
137 }
138 for (j = 450; j < 525; j++) {
139 scan_line[j * 3] = 255;
140 scan_line[(j * 3) + 1] = 255;
141 scan_line[(j * 3) + 2] = 255 - i;
142 }
143 TIFFWriteScanline(tif, scan_line, i, 0);
144 }
145 for (i = 255; i < 512; i++) {
146 for (j = 0; j < 75; j++) {
147 scan_line[j * 3] = i;
148 scan_line[(j * 3) + 1] = 0;
149 scan_line[(j * 3) + 2] = 0;
150 }
151 for (j = 75; j < 150; j++) {
152 scan_line[j * 3] = 0;
153 scan_line[(j * 3) + 1] = i;
154 scan_line[(j * 3) + 2] = 0;
155 }
156 for (j = 150; j < 225; j++) {
157 scan_line[j * 3] = 0;
158 scan_line[(j * 3) + 1] = 0;
159 scan_line[(j * 3) + 2] = i;
160 }
161 for (j = 225; j < 300; j++) {
162 scan_line[j * 3] = (i - 1) / 2;
163 scan_line[(j * 3) + 1] = (i - 1) / 2;
164 scan_line[(j * 3) + 2] = (i - 1) / 2;
165 }
166 for (j = 300; j < 375; j++) {
167 scan_line[j * 3] = 0;
168 scan_line[(j * 3) + 1] = i;
169 scan_line[(j * 3) + 2] = i;
170 }
171 for (j = 375; j < 450; j++) {
172 scan_line[j * 3] = i;
173 scan_line[(j * 3) + 1] = 0;
174 scan_line[(j * 3) + 2] = i;
175 }
176 for (j = 450; j < 525; j++) {
177 scan_line[j * 3] = i;
178 scan_line[(j * 3) + 1] = i;
179 scan_line[(j * 3) + 2] = 0;
180 }
181 TIFFWriteScanline(tif, scan_line, i, 0);
182 }
183
184 free(scan_line);
185 TIFFClose(tif);
186 exit(0);
187 }
188
189 void
Usage()190 Usage()
191 {
192 fprintf(stderr, "Usage: %s -gamma gamma tiff-image\n", programName);
193 exit(0);
194 }
195 /*
196 * Local Variables:
197 * mode: c
198 * c-basic-offset: 8
199 * fill-column: 78
200 * End:
201 */
202