2
* tiff-rgb.c -- create a 24-bit Class R (rgb) TIFF file
4
* Copyright 1990 by Digital Equipment Corporation, Maynard, Massachusetts.
8
* Permission to use, copy, modify, and distribute this software and its
9
* documentation for any purpose and without fee is hereby granted,
10
* provided that the above copyright notice appear in all copies and that
11
* both that copyright notice and this permission notice appear in
12
* supporting documentation, and that the name of Digital not be
13
* used in advertising or publicity pertaining to distribution of the
14
* software without specific, written prior permission.
16
* DIGITAL DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING
17
* ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL
18
* DIGITAL BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR
19
* ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
20
* WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION,
21
* ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
29
#define ROUND(x) (u_short) ((x) + 0.5)
33
#define TIFF_GAMMA 2.2
35
typedef unsigned char u_char;
36
typedef unsigned short u_short;
37
typedef unsigned long u_long;
52
u_short red[CMSIZE], green[CMSIZE], blue[CMSIZE];
53
u_long refblackwhite[2*3];
55
programName = argv[0];
59
image_gamma = TIFF_GAMMA;
63
if (!strcmp(argv[1], "-gamma")) {
64
image_gamma = atof(argv[2]);
73
for (i = 0; i < CMSIZE; i++) {
75
red[i] = green[i] = blue[i] = 0;
77
red[i] = ROUND((pow(i / 255.0, 1.0 / image_gamma) * 65535.0));
78
green[i] = ROUND((pow(i / 255.0, 1.0 / image_gamma) * 65535.0));
79
blue[i] = ROUND((pow(i / 255.0, 1.0 / image_gamma) * 65535.0));
82
refblackwhite[0] = 0; refblackwhite[1] = 255;
83
refblackwhite[2] = 0; refblackwhite[3] = 255;
84
refblackwhite[4] = 0; refblackwhite[5] = 255;
86
if ((tif = TIFFOpen(input_file, "w")) == NULL) {
87
fprintf(stderr, "can't open %s as a TIFF file\n", input_file);
91
TIFFSetField(tif, TIFFTAG_IMAGEWIDTH, WIDTH);
92
TIFFSetField(tif, TIFFTAG_IMAGELENGTH, HEIGHT);
93
TIFFSetField(tif, TIFFTAG_BITSPERSAMPLE, 8);
94
TIFFSetField(tif, TIFFTAG_COMPRESSION, COMPRESSION_NONE);
95
TIFFSetField(tif, TIFFTAG_PHOTOMETRIC, PHOTOMETRIC_RGB);
96
TIFFSetField(tif, TIFFTAG_SAMPLESPERPIXEL, 3);
97
TIFFSetField(tif, TIFFTAG_ROWSPERSTRIP, 1);
98
TIFFSetField(tif, TIFFTAG_PLANARCONFIG, PLANARCONFIG_CONTIG);
99
TIFFSetField(tif, TIFFTAG_RESOLUTIONUNIT, RESUNIT_NONE);
101
TIFFSetField(tif, TIFFTAG_WHITEPOINT, whitex, whitey);
102
TIFFSetField(tif, TIFFTAG_PRIMARYCHROMATICITIES, primaries);
104
TIFFSetField(tif, TIFFTAG_REFERENCEBLACKWHITE, refblackwhite);
105
TIFFSetField(tif, TIFFTAG_TRANSFERFUNCTION, red, green, blue);
107
scan_line = (u_char *) malloc(WIDTH * 3);
109
for (i = 0; i < 255; i++) {
110
for (j = 0; j < 75; j++) {
111
scan_line[j * 3] = 255;
112
scan_line[(j * 3) + 1] = 255 - i;
113
scan_line[(j * 3) + 2] = 255 - i;
115
for (j = 75; j < 150; j++) {
116
scan_line[j * 3] = 255 - i;
117
scan_line[(j * 3) + 1] = 255;
118
scan_line[(j * 3) + 2] = 255 - i;
120
for (j = 150; j < 225; j++) {
121
scan_line[j * 3] = 255 - i;
122
scan_line[(j * 3) + 1] = 255 - i;
123
scan_line[(j * 3) + 2] = 255;
125
for (j = 225; j < 300; j++) {
126
scan_line[j * 3] = (i - 1) / 2;
127
scan_line[(j * 3) + 1] = (i - 1) / 2;
128
scan_line[(j * 3) + 2] = (i - 1) / 2;
130
for (j = 300; j < 375; j++) {
131
scan_line[j * 3] = 255 - i;
132
scan_line[(j * 3) + 1] = 255;
133
scan_line[(j * 3) + 2] = 255;
135
for (j = 375; j < 450; j++) {
136
scan_line[j * 3] = 255;
137
scan_line[(j * 3) + 1] = 255 - i;
138
scan_line[(j * 3) + 2] = 255;
140
for (j = 450; j < 525; j++) {
141
scan_line[j * 3] = 255;
142
scan_line[(j * 3) + 1] = 255;
143
scan_line[(j * 3) + 2] = 255 - i;
145
TIFFWriteScanline(tif, scan_line, i, 0);
147
for (i = 255; i < 512; i++) {
148
for (j = 0; j < 75; j++) {
149
scan_line[j * 3] = i;
150
scan_line[(j * 3) + 1] = 0;
151
scan_line[(j * 3) + 2] = 0;
153
for (j = 75; j < 150; j++) {
154
scan_line[j * 3] = 0;
155
scan_line[(j * 3) + 1] = i;
156
scan_line[(j * 3) + 2] = 0;
158
for (j = 150; j < 225; j++) {
159
scan_line[j * 3] = 0;
160
scan_line[(j * 3) + 1] = 0;
161
scan_line[(j * 3) + 2] = i;
163
for (j = 225; j < 300; j++) {
164
scan_line[j * 3] = (i - 1) / 2;
165
scan_line[(j * 3) + 1] = (i - 1) / 2;
166
scan_line[(j * 3) + 2] = (i - 1) / 2;
168
for (j = 300; j < 375; j++) {
169
scan_line[j * 3] = 0;
170
scan_line[(j * 3) + 1] = i;
171
scan_line[(j * 3) + 2] = i;
173
for (j = 375; j < 450; j++) {
174
scan_line[j * 3] = i;
175
scan_line[(j * 3) + 1] = 0;
176
scan_line[(j * 3) + 2] = i;
178
for (j = 450; j < 525; j++) {
179
scan_line[j * 3] = i;
180
scan_line[(j * 3) + 1] = i;
181
scan_line[(j * 3) + 2] = 0;
183
TIFFWriteScanline(tif, scan_line, i, 0);
194
fprintf(stderr, "Usage: %s -gamma gamma tiff-image\n", programName);