Mercurial > projects > dwt-linux
annotate dwt/internal/image/TIFFFileFormat.d @ 259:c0d810de7093
Update SWT 3.4M7 to 3.4
author | Frank Benoit <benoit@tionex.de> |
---|---|
date | Sun, 29 Jun 2008 14:33:38 +0200 |
parents | de2578a843a7 |
children |
rev | line source |
---|---|
152
17f8449522fd
overloads second walkthrough
Frank Benoit <benoit@tionex.de>
parents:
131
diff
changeset
|
1 /******************************************************************************* |
259 | 2 * Copyright (c) 2000, 2008 IBM Corporation and others. |
13 | 3 * All rights reserved. This program and the accompanying materials |
4 * are made available under the terms of the Eclipse Public License v1.0 | |
5 * which accompanies this distribution, and is available at | |
6 * http://www.eclipse.org/legal/epl-v10.html | |
7 * | |
8 * Contributors: | |
9 * IBM Corporation - initial API and implementation | |
108 | 10 * Port to the D programming language: |
11 * Frank Benoit <benoit@tionex.de> | |
13 | 12 *******************************************************************************/ |
13 module dwt.internal.image.TIFFFileFormat; | |
14 | |
15 import dwt.internal.image.TIFFRandomFileAccess; | |
16 import dwt.internal.image.TIFFDirectory; | |
71 | 17 import dwt.DWT; |
13 | 18 import dwt.graphics.ImageData; |
19 import dwt.graphics.ImageLoader; | |
20 import dwt.internal.image.FileFormat; | |
21 | |
22 import tango.core.Exception; | |
23 | |
24 /** | |
25 * Baseline TIFF decoder revision 6.0 | |
26 * Extension T4-encoding CCITT T.4 1D | |
27 */ | |
28 final class TIFFFileFormat : FileFormat { | |
29 | |
152
17f8449522fd
overloads second walkthrough
Frank Benoit <benoit@tionex.de>
parents:
131
diff
changeset
|
30 override bool isFileFormat(LEDataInputStream stream) { |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
31 try { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
32 byte[] header = new byte[4]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
33 stream.read(header); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
34 stream.unread(header); |
131 | 35 if (header[0] !is header[1]) return false; |
36 if (!(header[0] is 0x49 && header[2] is 42 && header[3] is 0) && | |
37 !(header[0] is 0x4d && header[2] is 0 && header[3] is 42)) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
38 return false; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
39 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
40 return true; |
158
de2578a843a7
Tango update to rev 3158, TracedException>Exception, fromUtf8z>fromStringz,Fix Bug in MenuItem Thanx to nascent for the report.
Frank Benoit <benoit@tionex.de>
parents:
152
diff
changeset
|
41 } catch (Exception e) { |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
42 return false; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
43 } |
13 | 44 } |
45 | |
152
17f8449522fd
overloads second walkthrough
Frank Benoit <benoit@tionex.de>
parents:
131
diff
changeset
|
46 override ImageData[] loadFromByteStream() { |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
47 byte[] header = new byte[8]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
48 bool isLittleEndian; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
49 ImageData[] images = new ImageData[0]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
50 TIFFRandomFileAccess file = new TIFFRandomFileAccess(inputStream); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
51 try { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
52 file.read(header); |
131 | 53 if (header[0] !is header[1]) DWT.error(DWT.ERROR_INVALID_IMAGE); |
54 if (!(header[0] is 0x49 && header[2] is 42 && header[3] is 0) && | |
55 !(header[0] is 0x4d && header[2] is 0 && header[3] is 42)) { | |
71 | 56 DWT.error(DWT.ERROR_INVALID_IMAGE); |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
57 } |
131 | 58 isLittleEndian = header[0] is 0x49; |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
59 int offset = isLittleEndian ? |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
60 (header[4] & 0xFF) | ((header[5] & 0xFF) << 8) | ((header[6] & 0xFF) << 16) | ((header[7] & 0xFF) << 24) : |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
61 (header[7] & 0xFF) | ((header[6] & 0xFF) << 8) | ((header[5] & 0xFF) << 16) | ((header[4] & 0xFF) << 24); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
62 file.seek(offset); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
63 TIFFDirectory directory = new TIFFDirectory(file, isLittleEndian, loader); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
64 ImageData image = directory.read(); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
65 /* A baseline reader is only expected to read the first directory */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
66 images = [image]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
67 } catch (IOException e) { |
71 | 68 DWT.error(DWT.ERROR_IO, e); |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
69 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
70 return images; |
13 | 71 } |
72 | |
152
17f8449522fd
overloads second walkthrough
Frank Benoit <benoit@tionex.de>
parents:
131
diff
changeset
|
73 override void unloadIntoByteStream(ImageLoader loader) { |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
74 /* We do not currently support writing multi-page tiff, |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
75 * so we use the first image data in the loader's array. */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
76 ImageData image = loader.data[0]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
77 TIFFDirectory directory = new TIFFDirectory(image); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
78 try { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
79 directory.writeToStream(outputStream); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
80 } catch (IOException e) { |
71 | 81 DWT.error(DWT.ERROR_IO, e); |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
13
diff
changeset
|
82 } |
13 | 83 } |
84 | |
85 } |