projects/dwt-win: dwt/internal/image/GIFFileFormat.d annotate

author	Frank Benoit <benoit@tionex.de>
date	Wed, 23 Jan 2008 12:01:46 +0100
parents
children	92c102dd64a3

rev	line source
2 57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	1 /*******************************************************************************
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	2 * Copyright (c) 2000, 2005 IBM Corporation and others.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	3 * All rights reserved. This program and the accompanying materials
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	4 * are made available under the terms of the Eclipse Public License v1.0
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	5 * which accompanies this distribution, and is available at
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	6 * http://www.eclipse.org/legal/epl-v10.html
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	7 *
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	8 * Contributors:
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	9 * IBM Corporation - initial API and implementation
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	10 * Port to the D programming language:
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	11 * Frank Benoit <benoit@tionex.de>
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	12 *******************************************************************************/
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	13 module dwt.internal.image.GIFFileFormat;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	14
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	15 public import dwt.internal.image.FileFormat;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	16 public import dwt.graphics.PaletteData;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	17 import dwt.internal.image.LEDataInputStream;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	18 import dwt.internal.image.LZWCodec;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	19 import dwt.graphics.RGB;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	20 import dwt.DWT;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	21 import dwt.graphics.ImageData;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	22 import dwt.graphics.ImageLoaderEvent;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	23 import dwt.graphics.ImageLoader;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	24 import tango.core.Exception;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	25
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	26 ///FORTING_TYPE
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	27 class Image{}
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	28
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	29 final class GIFFileFormat : FileFormat {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	30 char[] signature;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	31 int screenWidth, screenHeight, backgroundPixel, bitsPerPixel, defaultDepth;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	32 int disposalMethod = 0;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	33 int delayTime = 0;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	34 int transparentPixel = -1;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	35 int repeatCount = 1;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	36
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	37 static final int GIF_APPLICATION_EXTENSION_BLOCK_ID = 0xFF;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	38 static final int GIF_GRAPHICS_CONTROL_BLOCK_ID = 0xF9;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	39 static final int GIF_PLAIN_TEXT_BLOCK_ID = 0x01;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	40 static final int GIF_COMMENT_BLOCK_ID = 0xFE;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	41 static final int GIF_EXTENSION_BLOCK_ID = 0x21;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	42 static final int GIF_IMAGE_BLOCK_ID = 0x2C;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	43 static final int GIF_TRAILER_ID = 0x3B;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	44 static final byte[] GIF89a = cast(byte[])"GIF89a";
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	45 static final byte[] NETSCAPE2_0 = cast(byte[])"NETSCAPE2.0";
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	46
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	47 /**
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	48 * Answer a palette containing numGrays
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	49 * shades of gray, ranging from black to white.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	50 */
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	51 static PaletteData grayRamp(int numGrays) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	52 int n = numGrays - 1;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	53 RGB[] colors = new RGB[numGrays];
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	54 for (int i = 0; i < numGrays; i++) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	55 int intensity = cast(byte)((i * 3) * 256 / n);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	56 colors[i] = new RGB(intensity, intensity, intensity);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	57 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	58 return new PaletteData(colors);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	59 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	60
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	61 bool isFileFormat(LEDataInputStream stream) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	62 try {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	63 byte[3] signature;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	64 stream.read(signature);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	65 stream.unread(signature);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	66 return cast(char[])signature == "GIF"; //$NON-NLS-1$
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	67 } catch (Exception e) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	68 return false;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	69 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	70 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	71
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	72 /**
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	73 * Load the GIF image(s) stored in the input stream.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	74 * Return an array of ImageData representing the image(s).
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	75 */
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	76 ImageData[] loadFromByteStream() {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	77 byte[3] signatureBytes;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	78 byte[3] versionBytes;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	79 byte[7] block;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	80 try {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	81 inputStream.read(signatureBytes);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	82 signature = cast(char[])signatureBytes.dup;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	83 if (signature != "GIF") //$NON-NLS-1$
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	84 DWT.error(DWT.ERROR_INVALID_IMAGE);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	85
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	86 inputStream.read(versionBytes);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	87
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	88 inputStream.read(block);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	89 } catch (IOException e) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	90 DWT.error(DWT.ERROR_IO, e);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	91 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	92 screenWidth = (block[0] & 0xFF) \| ((block[1] & 0xFF) << 8);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	93 loader.logicalScreenWidth = screenWidth;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	94 screenHeight = (block[2] & 0xFF) \| ((block[3] & 0xFF) << 8);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	95 loader.logicalScreenHeight = screenHeight;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	96 byte bitField = block[4];
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	97 backgroundPixel = block[5] & 0xFF;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	98 //aspect = block[6] & 0xFF;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	99 bitsPerPixel = ((bitField >> 4) & 0x07) + 1;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	100 defaultDepth = (bitField & 0x7) + 1;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	101 PaletteData palette = null;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	102 if ((bitField & 0x80) !is 0) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	103 // Global palette.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	104 //sorted = (bitField & 0x8) !is 0;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	105 palette = readPalette(1 << defaultDepth);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	106 } else {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	107 // No global palette.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	108 //sorted = false;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	109 backgroundPixel = -1;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	110 defaultDepth = bitsPerPixel;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	111 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	112 loader.backgroundPixel = backgroundPixel;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	113
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	114 getExtensions();
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	115 int id = readID();
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	116 ImageData[] images = new ImageData[0];
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	117 while (id is GIF_IMAGE_BLOCK_ID) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	118 ImageData image = readImageBlock(palette);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	119 if (loader.hasListeners()) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	120 loader.notifyListeners(new ImageLoaderEvent(loader, image, 3, true));
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	121 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	122 ImageData[] oldImages = images;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	123 images = new ImageData[oldImages.length + 1];
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	124 System.arraycopy(oldImages, 0, images, 0, oldImages.length);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	125 images[images.length - 1] = image;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	126 //images ~= image;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	127 try {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	128 /* Read the 0-byte terminator at the end of the image. */
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	129 id = inputStream.read();
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	130 if (id > 0) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	131 /* We read the terminator earlier. */
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	132 byte[1] arr;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	133 arr[0] = id;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	134 inputStream.unread( arr );
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	135 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	136 } catch (IOException e) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	137 DWT.error(DWT.ERROR_IO, e);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	138 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	139 getExtensions();
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	140 id = readID();
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	141 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	142 return images;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	143 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	144
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	145 /**
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	146 * Read and return the next block or extension identifier from the file.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	147 */
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	148 int readID() {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	149 try {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	150 return inputStream.read();
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	151 } catch (IOException e) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	152 DWT.error(DWT.ERROR_IO, e);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	153 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	154 return -1;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	155 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	156
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	157 /**
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	158 * Read extensions until an image descriptor appears.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	159 * In the future, if we care about the extensions, they
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	160 * should be properly grouped with the image data before
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	161 * which they appeared. Right now, the interesting parts
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	162 * of some extensions are kept, but the rest is discarded.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	163 * Throw an error if an error occurs.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	164 */
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	165 void getExtensions() {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	166 int id = readID();
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	167 while (id !is GIF_IMAGE_BLOCK_ID && id !is GIF_TRAILER_ID && id > 0) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	168 if (id is GIF_EXTENSION_BLOCK_ID) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	169 readExtension();
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	170 } else {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	171 DWT.error(DWT.ERROR_INVALID_IMAGE);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	172 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	173 id = readID();
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	174 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	175 if (id is GIF_IMAGE_BLOCK_ID \|\| id is GIF_TRAILER_ID) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	176 try {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	177 byte[1] arr;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	178 arr[0] = id;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	179 inputStream.unread(arr);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	180 } catch (IOException e) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	181 DWT.error(DWT.ERROR_IO, e);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	182 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	183 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	184 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	185
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	186 /**
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	187 * Read a control extension.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	188 * Return the extension block data.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	189 */
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	190 byte[] readExtension() {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	191 int extensionID = readID();
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	192 if (extensionID is GIF_COMMENT_BLOCK_ID)
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	193 return readCommentExtension();
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	194 if (extensionID is GIF_PLAIN_TEXT_BLOCK_ID)
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	195 return readPlainTextExtension();
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	196 if (extensionID is GIF_GRAPHICS_CONTROL_BLOCK_ID)
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	197 return readGraphicsControlExtension();
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	198 if (extensionID is GIF_APPLICATION_EXTENSION_BLOCK_ID)
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	199 return readApplicationExtension();
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	200 // Otherwise, we don't recognize the block. If the
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	201 // field size is correct, we can just skip over
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	202 // the block contents.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	203 try {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	204 int extSize = inputStream.read();
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	205 if (extSize < 0) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	206 DWT.error(DWT.ERROR_INVALID_IMAGE);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	207 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	208 byte[] ext = new byte[extSize];
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	209 inputStream.read(ext, 0, extSize);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	210 return ext;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	211 } catch (IOException e) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	212 DWT.error(DWT.ERROR_IO, e);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	213 return null;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	214 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	215 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	216
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	217 /**
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	218 * We have just read the Comment extension identifier
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	219 * from the input stream. Read in the rest of the comment
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	220 * and return it. GIF comment blocks are variable size.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	221 */
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	222 byte[] readCommentExtension() {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	223 try {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	224 byte[] comment = new byte[0];
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	225 byte[] block = new byte[255];
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	226 int size = inputStream.read();
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	227 while ((size > 0) && (inputStream.read(block, 0, size) !is -1)) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	228 byte[] oldComment = comment;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	229 comment = new byte[oldComment.length + size];
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	230 System.arraycopy(oldComment, 0, comment, 0, oldComment.length);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	231 System.arraycopy(block, 0, comment, oldComment.length, size);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	232 //comment ~= block[ 0 .. size ];
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	233 size = inputStream.read();
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	234 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	235 return comment;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	236 } catch (TracedException e) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	237 DWT.error(DWT.ERROR_IO, e);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	238 return null;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	239 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	240 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	241
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	242 /**
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	243 * We have just read the PlainText extension identifier
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	244 * from the input stream. Read in the plain text info and text,
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	245 * and return the text. GIF plain text blocks are variable size.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	246 */
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	247 byte[] readPlainTextExtension() {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	248 try {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	249 // Read size of block = 0x0C.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	250 inputStream.read();
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	251 // Read the text information (x, y, width, height, colors).
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	252 byte[] info = new byte[12];
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	253 inputStream.read(info);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	254 // Read the text.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	255 byte[] text = new byte[0];
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	256 byte[] block = new byte[255];
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	257 int size = inputStream.read();
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	258 while ((size > 0) && (inputStream.read(block, 0, size) !is -1)) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	259 byte[] oldText = text;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	260 text = new byte[oldText.length + size];
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	261 System.arraycopy(oldText, 0, text, 0, oldText.length);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	262 System.arraycopy(block, 0, text, oldText.length, size);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	263 //text ~= block[ 0 .. size ];
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	264 size = inputStream.read();
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	265 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	266 return text;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	267 } catch (TracedException e) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	268 DWT.error(DWT.ERROR_IO, e);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	269 return null;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	270 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	271 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	272
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	273 /**
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	274 * We have just read the GraphicsControl extension identifier
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	275 * from the input stream. Read in the control information, store
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	276 * it, and return it.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	277 */
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	278 byte[] readGraphicsControlExtension() {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	279 try {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	280 // Read size of block = 0x04.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	281 inputStream.read();
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	282 // Read the control block.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	283 byte[] controlBlock = new byte[4];
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	284 inputStream.read(controlBlock);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	285 byte bitField = controlBlock[0];
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	286 // Store the user input field.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	287 //userInput = (bitField & 0x02) !is 0;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	288 // Store the disposal method.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	289 disposalMethod = (bitField >> 2) & 0x07;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	290 // Store the delay time.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	291 delayTime = (controlBlock[1] & 0xFF) \| ((controlBlock[2] & 0xFF) << 8);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	292 // Store the transparent color.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	293 if ((bitField & 0x01) !is 0) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	294 transparentPixel = controlBlock[3] & 0xFF;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	295 } else {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	296 transparentPixel = -1;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	297 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	298 // Read block terminator.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	299 inputStream.read();
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	300 return controlBlock;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	301 } catch (TracedException e) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	302 DWT.error(DWT.ERROR_IO, e);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	303 return null;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	304 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	305 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	306
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	307 /**
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	308 * We have just read the Application extension identifier
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	309 * from the input stream. Read in the rest of the extension,
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	310 * look for and store 'number of repeats', and return the data.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	311 */
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	312 byte[] readApplicationExtension() {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	313 try {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	314 // Read size of block = 0x0B.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	315 inputStream.read();
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	316 // Read application identifier.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	317 byte[] applicationBytes = new byte[8];
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	318 inputStream.read(applicationBytes);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	319 char[] application = cast(char[])(applicationBytes.dup);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	320 // Read authentication code.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	321 byte[] authenticationBytes = new byte[3];
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	322 inputStream.read(authenticationBytes);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	323 char[] authentication = cast(char[])(authenticationBytes.dup);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	324 // Read application data.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	325 byte[] data = new byte[0];
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	326 byte[] block = new byte[255];
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	327 int size = inputStream.read();
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	328 while ((size > 0) && (inputStream.read(block, 0, size) !is -1)) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	329 byte[] oldData = data;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	330 data = new byte[oldData.length + size];
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	331 System.arraycopy(oldData, 0, data, 0, oldData.length);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	332 System.arraycopy(block, 0, data, oldData.length, size);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	333 //data ~= block[ 0 .. size ];
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	334 size = inputStream.read();
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	335 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	336 // Look for the NETSCAPE 'repeat count' field for an animated GIF.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	337 if (application=="NETSCAPE" && authentication=="2.0" && data[0] is 01) { //$NON-NLS-1$ //$NON-NLS-2$
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	338 repeatCount = (data[1] & 0xFF) \| ((data[2] & 0xFF) << 8);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	339 loader.repeatCount = repeatCount;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	340 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	341 return data;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	342 } catch (TracedException e) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	343 DWT.error(DWT.ERROR_IO, e);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	344 return null;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	345 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	346 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	347
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	348 /**
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	349 * Return a DeviceIndependentImage representing the
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	350 * image block at the current position in the input stream.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	351 * Throw an error if an error occurs.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	352 */
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	353 ImageData readImageBlock(PaletteData defaultPalette) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	354 int depth;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	355 PaletteData palette;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	356 byte[] block = new byte[9];
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	357 try {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	358 inputStream.read(block);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	359 } catch (IOException e) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	360 DWT.error(DWT.ERROR_IO, e);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	361 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	362 int left = (block[0] & 0xFF) \| ((block[1] & 0xFF) << 8);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	363 int top = (block[2] & 0xFF) \| ((block[3] & 0xFF) << 8);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	364 int width = (block[4] & 0xFF) \| ((block[5] & 0xFF) << 8);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	365 int height = (block[6] & 0xFF) \| ((block[7] & 0xFF) << 8);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	366 byte bitField = block[8];
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	367 bool interlaced = (bitField & 0x40) !is 0;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	368 //bool sorted = (bitField & 0x20) !is 0;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	369 if ((bitField & 0x80) !is 0) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	370 // Local palette.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	371 depth = (bitField & 0x7) + 1;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	372 palette = readPalette(1 << depth);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	373 } else {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	374 // No local palette.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	375 depth = defaultDepth;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	376 palette = defaultPalette;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	377 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	378 /* Work around: Ignore the case where a GIF specifies an
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	379 * invalid index for the transparent pixel that is larger
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	380 * than the number of entries in the palette. */
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	381 if (transparentPixel > 1 << depth) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	382 transparentPixel = -1;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	383 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	384 // Promote depth to next highest supported value.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	385 if (!(depth is 1 \|\| depth is 4 \|\| depth is 8)) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	386 if (depth < 4)
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	387 depth = 4;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	388 else
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	389 depth = 8;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	390 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	391 if (palette is null) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	392 palette = grayRamp(1 << depth);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	393 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	394 int initialCodeSize = -1;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	395 try {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	396 initialCodeSize = inputStream.read();
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	397 } catch (IOException e) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	398 DWT.error(DWT.ERROR_IO, e);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	399 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	400 if (initialCodeSize < 0) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	401 DWT.error(DWT.ERROR_INVALID_IMAGE);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	402 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	403 ImageData image = ImageData.internal_new(
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	404 width,
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	405 height,
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	406 depth,
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	407 palette,
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	408 4,
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	409 null,
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	410 0,
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	411 null,
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	412 null,
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	413 -1,
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	414 transparentPixel,
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	415 DWT.IMAGE_GIF,
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	416 left,
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	417 top,
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	418 disposalMethod,
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	419 delayTime);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	420 LZWCodec codec = new LZWCodec();
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	421 codec.decode(inputStream, loader, image, interlaced, initialCodeSize);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	422 return image;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	423 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	424
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	425 /**
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	426 * Read a palette from the input stream.
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	427 */
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	428 PaletteData readPalette(int numColors) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	429 byte[] bytes = new byte[numColors * 3];
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	430 try {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	431 if (inputStream.read(bytes) !is bytes.length)
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	432 DWT.error(DWT.ERROR_INVALID_IMAGE);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	433 } catch (IOException e) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	434 DWT.error(DWT.ERROR_IO, e);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	435 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	436 RGB[] colors = new RGB[numColors];
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	437 for (int i = 0; i < numColors; i++)
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	438 colors[i] = new RGB(bytes[i*3] & 0xFF,
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	439 bytes[i3+1] & 0xFF, bytes[i3+2] & 0xFF);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	440 return new PaletteData(colors);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	441 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	442
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	443 void unloadIntoByteStream(ImageLoader loader) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	444
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	445 /* Step 1: Acquire GIF parameters. */
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	446 ImageData[] data = loader.data;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	447 int frameCount = data.length;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	448 bool multi = frameCount > 1;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	449 ImageData firstImage = data[0];
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	450 int logicalScreenWidth = multi ? loader.logicalScreenWidth : firstImage.width;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	451 int logicalScreenHeight = multi ? loader.logicalScreenHeight : firstImage.height;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	452 int backgroundPixel = loader.backgroundPixel;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	453 int depth = firstImage.depth;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	454 PaletteData palette = firstImage.palette;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	455 RGB[] colors = palette.getRGBs();
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	456 short globalTable = 1;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	457
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	458 /* Step 2: Check for validity and global/local color map. */
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	459 if (!(depth is 1 \|\| depth is 4 \|\| depth is 8)) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	460 DWT.error(DWT.ERROR_UNSUPPORTED_DEPTH);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	461 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	462 for (int i=0; i<frameCount; i++) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	463 if (data[i].palette.isDirect) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	464 DWT.error(DWT.ERROR_INVALID_IMAGE);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	465 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	466 if (multi) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	467 if (!(data[i].height <= logicalScreenHeight && data[i].width <= logicalScreenWidth && data[i].depth is depth)) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	468 DWT.error(DWT.ERROR_INVALID_IMAGE);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	469 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	470 if (globalTable is 1) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	471 RGB rgbs[] = data[i].palette.getRGBs();
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	472 if (rgbs.length !is colors.length) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	473 globalTable = 0;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	474 } else {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	475 for (int j=0; j<colors.length; j++) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	476 if (!(rgbs[j].red is colors[j].red &&
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	477 rgbs[j].green is colors[j].green &&
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	478 rgbs[j].blue is colors[j].blue))
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	479 globalTable = 0;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	480 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	481 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	482 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	483 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	484 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	485
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	486 try {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	487 /* Step 3: Write the GIF89a Header and Logical Screen Descriptor. */
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	488 outputStream.write(GIF89a);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	489 int bitField = globalTable128 + (depth-1)16 + depth-1;
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	490 outputStream.writeShort(cast(short)logicalScreenWidth);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	491 outputStream.writeShort(cast(short)logicalScreenHeight);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	492 outputStream.write(bitField);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	493 outputStream.write(backgroundPixel);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	494 outputStream.write(0); // Aspect ratio is 1:1
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	495 } catch (IOException e) {
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	496 DWT.error(DWT.ERROR_IO, e);
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	497 }
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	498
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	499 /* Step 4: Write Global Color Table if applicable. */
57151e2793a2 More common modules from dwt-linux Frank Benoit <benoit@tionex.de> parents: diff changeset	500 if (globalTable is 1) {

2

57151e2793a2 More common modules from dwt-linux