octave-libtiff: scripts/io/Tiff.m annotate

annotate scripts/io/Tiff.m @ 31170:72a159bc5a4c

Tiff: added readRGBAImage method to read image using the RGBA interface * __tiff__.cc(F__tiff_reag_rgba_image__): implemented logic for reading images using LibTIFF's RGBA interface. * Tiff.m: added method readRGBAImage and added unit tests for the new method.

author	magedrifaat <magedrifaat@gmail.com>
date	Sat, 13 Aug 2022 17:36:12 +0200
parents	ae41e14bf5c7
children	8bf3fa6b6977

rev	line source
31161 b731c8f6db95 Tiff: added setLibTIFFErrorsEnabled method to enable/disable LibTIFF errors magedrifaat <magedrifaat@gmail.com> parents: 31159 diff changeset	1 ## PKG_ADD: __tiff_set_errors_enabled__ (false);
b731c8f6db95 Tiff: added setLibTIFFErrorsEnabled method to enable/disable LibTIFF errors magedrifaat <magedrifaat@gmail.com> parents: 31159 diff changeset	2
31141 af4519cbfcae Tiff.m: prevented calling methods after the image file is closed. magedrifaat <magedrifaat@gmail.com> parents: 31140 diff changeset	3 classdef Tiff < handle
31132 c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	4 properties (Constant = true)
31159 e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	5 TagID = struct (
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	6 "SubFileType", 254,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	7 "ImageWidth", 256,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	8 "ImageLength", 257,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	9 "BitsPerSample", 258,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	10 "Compression", 259,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	11 "Photometric", 262,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	12 "Thresholding", 263,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	13 "FillOrder", 266,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	14 "DocumentName", 269,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	15 "ImageDescription", 270,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	16 "Make", 271,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	17 "Model", 272,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	18 "StripOffsets", 273,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	19 "Orientation", 274,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	20 "SamplesPerPixel", 277,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	21 "RowsPerStrip", 278,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	22 "StripByteCounts", 279,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	23 "MinSampleValue", 280,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	24 "MaxSampleValue", 281,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	25 "XResolution", 282,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	26 "YResolution", 283,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	27 "PlanarConfiguration", 284,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	28 "PageName", 285,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	29 "XPosition", 286,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	30 "YPosition", 287,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	31 "GrayResponseUnit", 290,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	32 'GrayResponseCurve', 291,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	33 "Group3Options", 292,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	34 "Group4Options", 293,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	35 "ResolutionUnit", 296,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	36 "PageNumber", 297,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	37 "TransferFunction", 301,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	38 "Software", 305,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	39 "DateTime", 306,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	40 "Artist", 315,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	41 "HostComputer", 316,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	42 "WhitePoint", 318,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	43 "PrimaryChromaticities", 319,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	44 "ColorMap", 320,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	45 "HalfToneHints", 321,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	46 "TileWidth", 322,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	47 "TileLength", 323,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	48 "TileOffsets", 324,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	49 "TileByteCounts", 325,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	50 "SubIFD", 330,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	51 "InkSet", 332,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	52 "InkNames", 333,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	53 "NumberOfInks", 334,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	54 "DotRange", 336,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	55 "TargetPrinter", 337,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	56 "ExtraSamples", 338,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	57 "SampleFormat", 339,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	58 "SMinSampleValue", 340,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	59 "SMaxSampleValue", 341,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	60 "YCbCrCoefficients", 529,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	61 "YCbCrSubSampling", 530,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	62 "YCbCrPositioning", 531,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	63 "ReferenceBlackWhite", 532,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	64 "XMP", 700,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	65 "ImageDepth", 32997,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	66 "Copyright", 33432,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	67 "RichTIFFIPTC", 33723,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	68 "Photoshop", 34377,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	69 "ICCProfile", 34675,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	70 "SToNits", 37439,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	71 "JPEGQuality", 65537,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	72 "JPEGColorMode", 65538,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	73 "ZipQuality", 65557,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	74 "SGILogDataFmt", 65560
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	75 );
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	76
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	77 Compression = struct (
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	78 "None", 1,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	79 "CCITTRLE", 2,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	80 "CCITTFax3", 3,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	81 "CCITTFax4", 4,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	82 "LZW", 5,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	83 "OJPEG", 6,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	84 "JPEG", 7,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	85 "AdobeDeflate", 8,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	86 "Next", 32766,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	87 "CCITTRLEW", 32771,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	88 "PackBits", 32773,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	89 "Thunderscan", 32809,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	90 "IT8CTPad", 32895,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	91 "IT8LW", 32896,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	92 "IT8MP", 32897,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	93 "IT8BL", 32898,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	94 "PixarFilm", 32908,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	95 "PixarLog", 32909,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	96 "Deflate", 32946,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	97 "DCS", 32947,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	98 "JBIG", 34661,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	99 "SGILog", 34676,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	100 "SGILog24", 34677,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	101 "JPEG2000", 34712,
31161 b731c8f6db95 Tiff: added setLibTIFFErrorsEnabled method to enable/disable LibTIFF errors magedrifaat <magedrifaat@gmail.com> parents: 31159 diff changeset	102 # Not defined in LibTIFF, only in matlab
b731c8f6db95 Tiff: added setLibTIFFErrorsEnabled method to enable/disable LibTIFF errors magedrifaat <magedrifaat@gmail.com> parents: 31159 diff changeset	103 # TODO(maged): test these compression methods
31159 e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	104 "JPEG2000_SVS_YCbCr", 33003,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	105 "JPEG2000_SVS_RGB", 33005
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	106 );
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	107
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	108 ExtraSamples = struct (
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	109 "Unspecified", 0,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	110 "AssociatedAlpha", 1,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	111 "UnassociatedAlpha", 2
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	112 );
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	113
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	114 Group3Options = struct (
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	115 "Encoding2D", 1,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	116 "Uncompressed", 2,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	117 "FillBits", 4
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	118 );
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	119
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	120 InkSet = struct (
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	121 "CMYK", 1,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	122 "MultiInk", 2
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	123 );
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	124
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	125 JPEGColorMode = struct (
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	126 "Raw", 0,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	127 "RGB", 1
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	128 );
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	129
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	130 Orientation = struct (
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	131 "TopLeft", 1,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	132 "TopRight", 2,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	133 "BottomRight", 3,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	134 "BottomLeft", 4,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	135 "LeftTop", 5,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	136 "RightTop", 6,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	137 "RightBottom", 7,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	138 "LeftBottom", 8
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	139 );
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	140
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	141 Photometric = struct (
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	142 "MinIsWhite", 0,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	143 "MinIsBlack", 1,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	144 "RGB", 2,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	145 "Palette", 3,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	146 "Mask", 4,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	147 "Separated", 5,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	148 "YCbCr", 6,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	149 "CIELab", 8,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	150 "ICCLab", 9,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	151 "ITULab", 10,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	152 "LogL", 32844,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	153 "LogLUV", 32845,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	154 "CFA", 32803,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	155 "LinearRaw", 34892
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	156 );
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	157
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	158 PlanarConfiguration = struct (
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	159 "Chunky", 1,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	160 "Separate", 2
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	161 );
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	162
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	163 ResolutionUnit = struct (
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	164 "None", 1,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	165 "Inch", 2,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	166 "Centimeter", 3
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	167 );
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	168
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	169 SampleFormat = struct (
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	170 "UInt", 1,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	171 "Int", 2,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	172 "IEEEFP", 3
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	173 );
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	174
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	175 SGILogDataFmt = struct (
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	176 "Float", 0,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	177 "Bits8", 3
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	178 );
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	179
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	180 SubFileType = struct (
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	181 "Default", 0,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	182 "ReducedImage", 1,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	183 "Page", 2,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	184 "Mask", 4
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	185 );
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	186
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	187 Thresholding = struct (
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	188 "BiLevel", 1,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	189 "HalfTone", 2,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	190 "ErrorDiffuse", 3
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	191 );
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	192
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	193 YCbCrPositioning = struct (
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	194 "Centered", 1,
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	195 "Cosited", 2
e960e3a3b3f6 Tiff.m: added structs for tag value enums to the Tiff class. magedrifaat <magedrifaat@gmail.com> parents: 31158 diff changeset	196 );
31132 c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	197 endproperties
31092 a736190ce738 Added the Tiff classdef files to octave magedrifaat <magedrifaat@gmail.com> parents: diff changeset	198
31132 c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	199 properties (Access = private)
31141 af4519cbfcae Tiff.m: prevented calling methods after the image file is closed. magedrifaat <magedrifaat@gmail.com> parents: 31140 diff changeset	200 tiff_handle;
af4519cbfcae Tiff.m: prevented calling methods after the image file is closed. magedrifaat <magedrifaat@gmail.com> parents: 31140 diff changeset	201 closed=false;
31132 c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	202 endproperties
c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	203
c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	204 methods
c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	205 function t = Tiff (filename, mode="r")
c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	206 if (nargin == 0 \|\| nargin > 2)
c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	207 % print_usage();
c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	208 error("Usage: Tiff(filename[, mode])");
c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	209 endif
31092 a736190ce738 Added the Tiff classdef files to octave magedrifaat <magedrifaat@gmail.com> parents: diff changeset	210
31132 c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	211 t.tiff_handle = __open_tiff__ (filename, mode);
c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	212 endfunction
c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	213
c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	214 function close (t)
31141 af4519cbfcae Tiff.m: prevented calling methods after the image file is closed. magedrifaat <magedrifaat@gmail.com> parents: 31140 diff changeset	215 if (! t.closed)
af4519cbfcae Tiff.m: prevented calling methods after the image file is closed. magedrifaat <magedrifaat@gmail.com> parents: 31140 diff changeset	216 __close_tiff__ (t.tiff_handle);
af4519cbfcae Tiff.m: prevented calling methods after the image file is closed. magedrifaat <magedrifaat@gmail.com> parents: 31140 diff changeset	217 t.closed = true;
af4519cbfcae Tiff.m: prevented calling methods after the image file is closed. magedrifaat <magedrifaat@gmail.com> parents: 31140 diff changeset	218 endif
31132 c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	219 endfunction
31092 a736190ce738 Added the Tiff classdef files to octave magedrifaat <magedrifaat@gmail.com> parents: diff changeset	220
31132 c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	221 function tag = getTag (t, tag_name)
31141 af4519cbfcae Tiff.m: prevented calling methods after the image file is closed. magedrifaat <magedrifaat@gmail.com> parents: 31140 diff changeset	222 if (t.closed)
af4519cbfcae Tiff.m: prevented calling methods after the image file is closed. magedrifaat <magedrifaat@gmail.com> parents: 31140 diff changeset	223 error ("Image file was closed");
af4519cbfcae Tiff.m: prevented calling methods after the image file is closed. magedrifaat <magedrifaat@gmail.com> parents: 31140 diff changeset	224 endif
31132 c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	225 tag = __tiff_get_tag__ (t.tiff_handle, tag_name);
c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	226 endfunction
31092 a736190ce738 Added the Tiff classdef files to octave magedrifaat <magedrifaat@gmail.com> parents: diff changeset	227
31140 5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	228 function setTag (t, varargin)
31141 af4519cbfcae Tiff.m: prevented calling methods after the image file is closed. magedrifaat <magedrifaat@gmail.com> parents: 31140 diff changeset	229 if (t.closed)
af4519cbfcae Tiff.m: prevented calling methods after the image file is closed. magedrifaat <magedrifaat@gmail.com> parents: 31140 diff changeset	230 error ("Image file was closed");
af4519cbfcae Tiff.m: prevented calling methods after the image file is closed. magedrifaat <magedrifaat@gmail.com> parents: 31140 diff changeset	231 endif
31140 5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	232 __tiff_set_tag__ (t.tiff_handle, varargin{:});
31132 c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	233 endfunction
31126 7851c5b9c950 Tiff: implemented writeEncodedStrip function for writing a strip to an image magedrifaat <magedrifaat@gmail.com> parents: 31124 diff changeset	234
31132 c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	235 function argout = read (t)
31141 af4519cbfcae Tiff.m: prevented calling methods after the image file is closed. magedrifaat <magedrifaat@gmail.com> parents: 31140 diff changeset	236 if (t.closed)
af4519cbfcae Tiff.m: prevented calling methods after the image file is closed. magedrifaat <magedrifaat@gmail.com> parents: 31140 diff changeset	237 error ("Image file was closed");
af4519cbfcae Tiff.m: prevented calling methods after the image file is closed. magedrifaat <magedrifaat@gmail.com> parents: 31140 diff changeset	238 endif
31132 c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	239 argout = __tiff_read__ (t.tiff_handle);
c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	240 endfunction
31092 a736190ce738 Added the Tiff classdef files to octave magedrifaat <magedrifaat@gmail.com> parents: diff changeset	241
31157 dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	242 function stripData = readEncodedStrip (t, stripNumber)
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	243 if (t.closed)
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	244 error ("Image file was closed");
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	245 endif
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	246 stripData = __tiff_read_encoded_strip__ (t.tiff_handle, stripNumber);
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	247 endfunction
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	248
31158 f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	249 function tileData = readEncodedTile (t, tileNumber)
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	250 if (t.closed)
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	251 error ("Image file was closed");
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	252 endif
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	253 tileData = __tiff_read_encoded_tile__ (t.tiff_handle, tileNumber);
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	254 endfunction
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	255
31170 72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	256 function [RGB, alpha] = readRGBAImage (t)
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	257 if (t.closed)
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	258 error ("Image file was closed");
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	259 endif
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	260 [RGB, alpha] = __tiff_read_rgba_image__ (t.tiff_handle);
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	261 endfunction
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	262
31153 c66d6c7f025e Tiff: implemented write method for stripped images magedrifaat <magedrifaat@gmail.com> parents: 31151 diff changeset	263 function write (t, imageData)
c66d6c7f025e Tiff: implemented write method for stripped images magedrifaat <magedrifaat@gmail.com> parents: 31151 diff changeset	264 if (t.closed)
c66d6c7f025e Tiff: implemented write method for stripped images magedrifaat <magedrifaat@gmail.com> parents: 31151 diff changeset	265 error ("Image file was closed");
c66d6c7f025e Tiff: implemented write method for stripped images magedrifaat <magedrifaat@gmail.com> parents: 31151 diff changeset	266 endif
c66d6c7f025e Tiff: implemented write method for stripped images magedrifaat <magedrifaat@gmail.com> parents: 31151 diff changeset	267 __tiff_write__ (t.tiff_handle, imageData);
c66d6c7f025e Tiff: implemented write method for stripped images magedrifaat <magedrifaat@gmail.com> parents: 31151 diff changeset	268 endfunction
c66d6c7f025e Tiff: implemented write method for stripped images magedrifaat <magedrifaat@gmail.com> parents: 31151 diff changeset	269
31132 c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	270 function writeEncodedStrip (t, stripNumber, imageData)
31141 af4519cbfcae Tiff.m: prevented calling methods after the image file is closed. magedrifaat <magedrifaat@gmail.com> parents: 31140 diff changeset	271 if (t.closed)
af4519cbfcae Tiff.m: prevented calling methods after the image file is closed. magedrifaat <magedrifaat@gmail.com> parents: 31140 diff changeset	272 error ("Image file was closed");
af4519cbfcae Tiff.m: prevented calling methods after the image file is closed. magedrifaat <magedrifaat@gmail.com> parents: 31140 diff changeset	273 endif
31132 c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	274 __tiff_write_encoded_strip__ (t.tiff_handle, stripNumber, imageData);
c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	275 endfunction
c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	276
31146 50402b8dfb4a Tiff: added writeEncodedTile function for writing tiled images magedrifaat <magedrifaat@gmail.com> parents: 31145 diff changeset	277 function writeEncodedTile (t, tileNumber, imageData)
50402b8dfb4a Tiff: added writeEncodedTile function for writing tiled images magedrifaat <magedrifaat@gmail.com> parents: 31145 diff changeset	278 if (t.closed)
50402b8dfb4a Tiff: added writeEncodedTile function for writing tiled images magedrifaat <magedrifaat@gmail.com> parents: 31145 diff changeset	279 error ("Image file was closed");
50402b8dfb4a Tiff: added writeEncodedTile function for writing tiled images magedrifaat <magedrifaat@gmail.com> parents: 31145 diff changeset	280 endif
50402b8dfb4a Tiff: added writeEncodedTile function for writing tiled images magedrifaat <magedrifaat@gmail.com> parents: 31145 diff changeset	281 __tiff_write_encoded_tile__ (t.tiff_handle, tileNumber, imageData);
50402b8dfb4a Tiff: added writeEncodedTile function for writing tiled images magedrifaat <magedrifaat@gmail.com> parents: 31145 diff changeset	282 endfunction
50402b8dfb4a Tiff: added writeEncodedTile function for writing tiled images magedrifaat <magedrifaat@gmail.com> parents: 31145 diff changeset	283
31148 4bc9a1938f9a Tiff: added isTiled method to check if the image is tiled or stripped magedrifaat <magedrifaat@gmail.com> parents: 31147 diff changeset	284 function tf = isTiled (t)
4bc9a1938f9a Tiff: added isTiled method to check if the image is tiled or stripped magedrifaat <magedrifaat@gmail.com> parents: 31147 diff changeset	285 if (t.closed)
4bc9a1938f9a Tiff: added isTiled method to check if the image is tiled or stripped magedrifaat <magedrifaat@gmail.com> parents: 31147 diff changeset	286 error ("Image file was closed");
4bc9a1938f9a Tiff: added isTiled method to check if the image is tiled or stripped magedrifaat <magedrifaat@gmail.com> parents: 31147 diff changeset	287 endif
31150 6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	288 tf = __tiff_is_tiled__ (t.tiff_handle);
31148 4bc9a1938f9a Tiff: added isTiled method to check if the image is tiled or stripped magedrifaat <magedrifaat@gmail.com> parents: 31147 diff changeset	289 endfunction
4bc9a1938f9a Tiff: added isTiled method to check if the image is tiled or stripped magedrifaat <magedrifaat@gmail.com> parents: 31147 diff changeset	290
31149 d4dbc69f301e Tiff: implemented numberOfStrips method magedrifaat <magedrifaat@gmail.com> parents: 31148 diff changeset	291 function numStrips = numberOfStrips (t)
d4dbc69f301e Tiff: implemented numberOfStrips method magedrifaat <magedrifaat@gmail.com> parents: 31148 diff changeset	292 if (t.closed)
d4dbc69f301e Tiff: implemented numberOfStrips method magedrifaat <magedrifaat@gmail.com> parents: 31148 diff changeset	293 error ("Image file was closed");
d4dbc69f301e Tiff: implemented numberOfStrips method magedrifaat <magedrifaat@gmail.com> parents: 31148 diff changeset	294 endif
31150 6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	295 numStrips = __tiff_number_of_strips__ (t.tiff_handle);
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	296 endfunction
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	297
31151 6fb54834aa93 Tiff: added numberOfTiles and getVersion methods magedrifaat <magedrifaat@gmail.com> parents: 31150 diff changeset	298 function numTiles = numberOfTiles (t)
6fb54834aa93 Tiff: added numberOfTiles and getVersion methods magedrifaat <magedrifaat@gmail.com> parents: 31150 diff changeset	299 if (t.closed)
6fb54834aa93 Tiff: added numberOfTiles and getVersion methods magedrifaat <magedrifaat@gmail.com> parents: 31150 diff changeset	300 error ("Image file was closed");
6fb54834aa93 Tiff: added numberOfTiles and getVersion methods magedrifaat <magedrifaat@gmail.com> parents: 31150 diff changeset	301 endif
6fb54834aa93 Tiff: added numberOfTiles and getVersion methods magedrifaat <magedrifaat@gmail.com> parents: 31150 diff changeset	302 numTiles = __tiff_number_of_tiles__ (t.tiff_handle);
6fb54834aa93 Tiff: added numberOfTiles and getVersion methods magedrifaat <magedrifaat@gmail.com> parents: 31150 diff changeset	303 endfunction
6fb54834aa93 Tiff: added numberOfTiles and getVersion methods magedrifaat <magedrifaat@gmail.com> parents: 31150 diff changeset	304
31150 6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	305 function stripNumber = computeStrip (t, varargin)
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	306 if (t.closed)
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	307 error ("Image file was closed");
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	308 endif
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	309 stripNumber = __tiff_compute_strip__ (t.tiff_handle, varargin{:});
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	310 endfunction
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	311
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	312 function tileNumber = computeTile (t, varargin)
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	313 if (t.closed)
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	314 error ("Image file was closed");
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	315 endif
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	316 tileNumber = __tiff_compute_tile__ (t.tiff_handle, varargin{:});
31149 d4dbc69f301e Tiff: implemented numberOfStrips method magedrifaat <magedrifaat@gmail.com> parents: 31148 diff changeset	317 endfunction
d4dbc69f301e Tiff: implemented numberOfStrips method magedrifaat <magedrifaat@gmail.com> parents: 31148 diff changeset	318
31132 c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	319 % TODO(maged): add documentation and make print_usage work
c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	320 endmethods
31151 6fb54834aa93 Tiff: added numberOfTiles and getVersion methods magedrifaat <magedrifaat@gmail.com> parents: 31150 diff changeset	321
6fb54834aa93 Tiff: added numberOfTiles and getVersion methods magedrifaat <magedrifaat@gmail.com> parents: 31150 diff changeset	322 methods (Static = true)
6fb54834aa93 Tiff: added numberOfTiles and getVersion methods magedrifaat <magedrifaat@gmail.com> parents: 31150 diff changeset	323 function versionString = getVersion()
6fb54834aa93 Tiff: added numberOfTiles and getVersion methods magedrifaat <magedrifaat@gmail.com> parents: 31150 diff changeset	324 versionString = __tiff_version__ ();
6fb54834aa93 Tiff: added numberOfTiles and getVersion methods magedrifaat <magedrifaat@gmail.com> parents: 31150 diff changeset	325 endfunction
31161 b731c8f6db95 Tiff: added setLibTIFFErrorsEnabled method to enable/disable LibTIFF errors magedrifaat <magedrifaat@gmail.com> parents: 31159 diff changeset	326
b731c8f6db95 Tiff: added setLibTIFFErrorsEnabled method to enable/disable LibTIFF errors magedrifaat <magedrifaat@gmail.com> parents: 31159 diff changeset	327 function setLibTIFFErrorsEnabled(state)
b731c8f6db95 Tiff: added setLibTIFFErrorsEnabled method to enable/disable LibTIFF errors magedrifaat <magedrifaat@gmail.com> parents: 31159 diff changeset	328 __tiff_set_errors_enabled__ (state);
b731c8f6db95 Tiff: added setLibTIFFErrorsEnabled method to enable/disable LibTIFF errors magedrifaat <magedrifaat@gmail.com> parents: 31159 diff changeset	329 endfunction
31151 6fb54834aa93 Tiff: added numberOfTiles and getVersion methods magedrifaat <magedrifaat@gmail.com> parents: 31150 diff changeset	330 endmethods
31132 c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	331 endclassdef
31124 e8d1cc309bc9 Tiff: added initial implementation of setTag function for scalar tags magedrifaat <magedrifaat@gmail.com> parents: 31116 diff changeset	332
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	333 %!function file_wrapper (fn)
31132 c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	334 %! filename = [tempname() ".tif"];
c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	335 %! unwind_protect
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	336 %! fn (filename);
31132 c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	337 %! unwind_protect_cleanup
c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	338 %! unlink (filename);
c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	339 %! end_unwind_protect
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	340 %!endfunction
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	341
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	342 %!function verify_data (filename, data, ex_size)
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	343 %! img = Tiff (filename, "r");
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	344 %! data2 = img.read ();
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	345 %! assert (size (data2), ex_size);
31153 c66d6c7f025e Tiff: implemented write method for stripped images magedrifaat <magedrifaat@gmail.com> parents: 31151 diff changeset	346 %! assert (data2, resize (data, size (data2)));
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	347 %! img.close ();
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	348 %!endfunction
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	349
31143 a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	350 ## test setTag and getTag for scalar tags
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	351 %!testif HAVE_TIFF
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	352 %! function test_fn (filename)
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	353 %! img = Tiff (filename, "w");
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	354 %! setTag (img, "ImageWidth", 2);
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	355 %! val = getTag (img, "ImageWidth");
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	356 %! assert (val, 2);
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	357 %! assert (class (val), "double");
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	358 %! endfunction
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	359 %! file_wrapper (@test_fn);
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	360
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	361 ## test failure setTag and getTag unknown tag
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	362 %!testif HAVE_TIFF
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	363 %! function test_fn (filename)
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	364 %! img = Tiff (filename, "w");
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	365 %! fail ("getTag (img, \"ImageWidt\")", "Tiff tag not found");
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	366 %! fail ("getTag (img, 999999)", "Tiff tag not found");
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	367 %! fail ("setTag (img, \"ImageWidt\", 2)", "Tiff tag not found");
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	368 %! fail ("setTag (img, 999999, 2)", "Tiff tag not found");
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	369 %! endfunction
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	370 %! file_wrapper (@test_fn);
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	371
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	372 ## test setTag structure input
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	373 %!testif HAVE_TIFF
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	374 %! function test_fn (filename)
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	375 %! img = Tiff (filename, "w");
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	376 %! setTag (img, struct ("ImageLength", 2, "ImageWidth", 2));
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	377 %! assert (getTag (img, "ImageLength"), 2);
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	378 %! assert (getTag (img, "ImageWidth"), 2);
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	379 %! endfunction
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	380 %! file_wrapper (@test_fn);
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	381
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	382 ## test failure setTag structure unknown tag
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	383 %!testif HAVE_TIFF
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	384 %! function test_fn (filename)
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	385 %! img = Tiff (filename, "w");
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	386 %! setTag (img, "ImageLength", 1);
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	387 %! setTag (img, "ImageWidth", 1);
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	388 %! fail ("setTag (img, struct (\"ImageLength\", 2, \"a\", 1, \"ImageWidth\", 2))",
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	389 %! "Tag a not found");
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	390 %! assert (getTag (img, "ImageLength"), 2);
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	391 %! assert (getTag (img, "ImageWidth"), 1);
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	392 %! endfunction
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	393 %! file_wrapper (@test_fn);
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	394
31169 ae41e14bf5c7 Tiff.m: added tests for array and special tags. magedrifaat <magedrifaat@gmail.com> parents: 31161 diff changeset	395 ## test setTag array field
ae41e14bf5c7 Tiff.m: added tests for array and special tags. magedrifaat <magedrifaat@gmail.com> parents: 31161 diff changeset	396 %!testif HAVE_TIFF
ae41e14bf5c7 Tiff.m: added tests for array and special tags. magedrifaat <magedrifaat@gmail.com> parents: 31161 diff changeset	397 %! function test_fn (filename)
ae41e14bf5c7 Tiff.m: added tests for array and special tags. magedrifaat <magedrifaat@gmail.com> parents: 31161 diff changeset	398 %! img = Tiff (filename, "w");
ae41e14bf5c7 Tiff.m: added tests for array and special tags. magedrifaat <magedrifaat@gmail.com> parents: 31161 diff changeset	399 %! setTag (img, "YCbCrCoefficients", [1.5, 2.5, 3.5]);
ae41e14bf5c7 Tiff.m: added tests for array and special tags. magedrifaat <magedrifaat@gmail.com> parents: 31161 diff changeset	400 %! data = getTag (img, "YCbCrCoefficients");
ae41e14bf5c7 Tiff.m: added tests for array and special tags. magedrifaat <magedrifaat@gmail.com> parents: 31161 diff changeset	401 %! assert (data, [1.5, 2.5, 3.5]);
ae41e14bf5c7 Tiff.m: added tests for array and special tags. magedrifaat <magedrifaat@gmail.com> parents: 31161 diff changeset	402 %! endfunction
ae41e14bf5c7 Tiff.m: added tests for array and special tags. magedrifaat <magedrifaat@gmail.com> parents: 31161 diff changeset	403 %! file_wrapper (@test_fn);
ae41e14bf5c7 Tiff.m: added tests for array and special tags. magedrifaat <magedrifaat@gmail.com> parents: 31161 diff changeset	404
ae41e14bf5c7 Tiff.m: added tests for array and special tags. magedrifaat <magedrifaat@gmail.com> parents: 31161 diff changeset	405 ## test setTag special field
ae41e14bf5c7 Tiff.m: added tests for array and special tags. magedrifaat <magedrifaat@gmail.com> parents: 31161 diff changeset	406 %!testif HAVE_TIFF
ae41e14bf5c7 Tiff.m: added tests for array and special tags. magedrifaat <magedrifaat@gmail.com> parents: 31161 diff changeset	407 %! function test_fn (filename)
ae41e14bf5c7 Tiff.m: added tests for array and special tags. magedrifaat <magedrifaat@gmail.com> parents: 31161 diff changeset	408 %! img = Tiff (filename, "w");
ae41e14bf5c7 Tiff.m: added tests for array and special tags. magedrifaat <magedrifaat@gmail.com> parents: 31161 diff changeset	409 %! setTag (img, "BitsPerSample", 8);
ae41e14bf5c7 Tiff.m: added tests for array and special tags. magedrifaat <magedrifaat@gmail.com> parents: 31161 diff changeset	410 %! cmap = reshape (1:768, [256, 3]) / 1024.0;
ae41e14bf5c7 Tiff.m: added tests for array and special tags. magedrifaat <magedrifaat@gmail.com> parents: 31161 diff changeset	411 %! setTag (img, "ColorMap", cmap);
ae41e14bf5c7 Tiff.m: added tests for array and special tags. magedrifaat <magedrifaat@gmail.com> parents: 31161 diff changeset	412 %! assert (getTag (img, "ColorMap"), cmap, 1e-5);
ae41e14bf5c7 Tiff.m: added tests for array and special tags. magedrifaat <magedrifaat@gmail.com> parents: 31161 diff changeset	413 %! endfunction
ae41e14bf5c7 Tiff.m: added tests for array and special tags. magedrifaat <magedrifaat@gmail.com> parents: 31161 diff changeset	414 %! file_wrapper (@test_fn);
ae41e14bf5c7 Tiff.m: added tests for array and special tags. magedrifaat <magedrifaat@gmail.com> parents: 31161 diff changeset	415
31143 a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	416 ## test failure invalid open mode/ invalid filename
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	417 %!testif HAVE_TIFF
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	418 %! fail ("Tiff (\"test.tif\", \"rh\")",
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	419 %! "Invalid mode for openning Tiff file: rh");
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	420 %! fail ("Tiff ([tempname() \".tif\"], \"r\")", "Failed to open Tiff file");
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	421
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	422 ## test one-pixel grayscale image
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	423 %!testif HAVE_TIFF
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	424 %! function test_fn (filename)
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	425 %! img = Tiff (filename, "w");
31140 5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	426 %! setTag (img, struct ("ImageLength", 1, "ImageWidth", 1,
31147 7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	427 %! "BitsPerSample", 8));
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	428 %! data = uint8 (randi (intmax ("uint8"), 1, 1));
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	429 %! writeEncodedStrip (img, 1, data);
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	430 %! img.close ();
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	431 %! verify_data (filename, data, [1, 1]);
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	432 %! endfunction
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	433 %! file_wrapper (@test_fn);
31132 c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	434
c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	435 ## test failure to write to image without dimensions
c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	436 %!testif HAVE_TIFF
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	437 %! function test_fn (filename)
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	438 %! img = Tiff (filename, "w");
31134 fc0366e009dd Tiff.m: added tests for 8-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31132 diff changeset	439 %! data = uint8 (randi (intmax ("uint8"), 1, 1));
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	440 %! fail ("writeEncodedStrip (img, 1, data)", "Failed to read image width");
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	441 %! img.close ();
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	442 %! endfunction
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	443 %! file_wrapper (@test_fn);
31132 c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	444
31134 fc0366e009dd Tiff.m: added tests for 8-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31132 diff changeset	445 ## test one row grayscale image
31132 c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	446 %!testif HAVE_TIFF
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	447 %! function test_fn (filename)
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	448 %! img = Tiff (filename, "w");
31140 5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	449 %! setTag (img, struct ("ImageLength", 1, "ImageWidth", 10,
31147 7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	450 %! "BitsPerSample", 8));
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	451 %! data = uint8 (reshape (1:10, [1, 10]));
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	452 %! writeEncodedStrip (img, 1, data);
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	453 %! img.close ();
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	454 %! verify_data (filename, data, [1, 10]);
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	455 %! endfunction
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	456 %! file_wrapper (@test_fn);
31132 c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	457
31137 233130c0b1f6 Tiff writeEncodedStrip: changed strip dimension check behavior to mimic matlab magedrifaat <magedrifaat@gmail.com> parents: 31136 diff changeset	458 ## test wrong size of row
31132 c66f7c227e50 Tiff.m: added a test function and some base-case tests. magedrifaat <magedrifaat@gmail.com> parents: 31131 diff changeset	459 %!testif HAVE_TIFF
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	460 %! function test_fn (filename)
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	461 %! img = Tiff (filename, "w");
31140 5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	462 %! setTag (img, struct ("ImageLength", 1, "ImageWidth", 10,
31147 7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	463 %! "BitsPerSample", 8));
31145 2e11f9cb30b8 Tiff writeEncodedStrip: added warning for input data larger than the size of the strip. magedrifaat <magedrifaat@gmail.com> parents: 31143 diff changeset	464 %! data = uint8 (reshape (1:13, [1, 13]));
2e11f9cb30b8 Tiff writeEncodedStrip: added warning for input data larger than the size of the strip. magedrifaat <magedrifaat@gmail.com> parents: 31143 diff changeset	465 %! fail ("writeEncodedStrip (img, 1, data)", "warning",
2e11f9cb30b8 Tiff writeEncodedStrip: added warning for input data larger than the size of the strip. magedrifaat <magedrifaat@gmail.com> parents: 31143 diff changeset	466 %! "The image width is 10 but the input has 13 columns.");
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	467 %! img.close ();
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	468 %! verify_data (filename, data, [1, 10]);
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	469 %! endfunction
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	470 %! file_wrapper (@test_fn);
31134 fc0366e009dd Tiff.m: added tests for 8-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31132 diff changeset	471
fc0366e009dd Tiff.m: added tests for 8-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31132 diff changeset	472 ## test one strip grayscale image
fc0366e009dd Tiff.m: added tests for 8-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31132 diff changeset	473 %!testif HAVE_TIFF
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	474 %! function test_fn (filename)
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	475 %! img = Tiff (filename, "w");
31140 5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	476 %! setTag (img, struct ("ImageLength", 10, "ImageWidth", 10,
31147 7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	477 %! "BitsPerSample", 8));
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	478 %! data = uint8 (reshape (1:100, [10, 10]));
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	479 %! writeEncodedStrip (img, 1, data);
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	480 %! img.close ();
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	481 %! verify_data (filename, data, [10, 10]);
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	482 %! endfunction
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	483 %! file_wrapper (@test_fn);
31134 fc0366e009dd Tiff.m: added tests for 8-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31132 diff changeset	484
31137 233130c0b1f6 Tiff writeEncodedStrip: changed strip dimension check behavior to mimic matlab magedrifaat <magedrifaat@gmail.com> parents: 31136 diff changeset	485 ## test wrong height of strip
31134 fc0366e009dd Tiff.m: added tests for 8-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31132 diff changeset	486 %!testif HAVE_TIFF
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	487 %! function test_fn (filename)
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	488 %! img = Tiff (filename, "w");
31140 5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	489 %! setTag (img, struct ("ImageLength", 10, "ImageWidth", 10,
31147 7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	490 %! "BitsPerSample", 8));
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	491 %! data = uint8 (reshape (1:110, [11, 10]));
31145 2e11f9cb30b8 Tiff writeEncodedStrip: added warning for input data larger than the size of the strip. magedrifaat <magedrifaat@gmail.com> parents: 31143 diff changeset	492 %! fail ("writeEncodedStrip (img, 1, data)", "warning",
2e11f9cb30b8 Tiff writeEncodedStrip: added warning for input data larger than the size of the strip. magedrifaat <magedrifaat@gmail.com> parents: 31143 diff changeset	493 %! "The strip is composed of 10 rows but the input has 11 rows.");
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	494 %! img.close ();
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	495 %! verify_data (filename, data, [10, 10]);
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	496 %! endfunction
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	497 %! file_wrapper (@test_fn);
31134 fc0366e009dd Tiff.m: added tests for 8-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31132 diff changeset	498
31135 b7ffe64e0287 Tiff.m: added test for 16- and 32-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31134 diff changeset	499 ## test one strip RGB image chunky planes (RGBRGBRGB)
31134 fc0366e009dd Tiff.m: added tests for 8-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31132 diff changeset	500 %!testif HAVE_TIFF
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	501 %! function test_fn (filename)
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	502 %! img = Tiff (filename, "w");
31140 5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	503 %! setTag (img, struct ("ImageLength", 10, "ImageWidth", 10,
5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	504 %! "BitsPerSample", 8, "SamplesPerPixel", 3,
5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	505 %! "PlanarConfiguration", 1,
5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	506 %! "PhotometricInterpretation", 2));
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	507 %! data = uint8 (reshape (1:300, [10, 10, 3]));
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	508 %! writeEncodedStrip (img, 1, data);
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	509 %! img.close ();
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	510 %! verify_data (filename, data, [10, 10, 3]);
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	511 %! endfunction
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	512 %! file_wrapper (@test_fn);
31134 fc0366e009dd Tiff.m: added tests for 8-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31132 diff changeset	513
31137 233130c0b1f6 Tiff writeEncodedStrip: changed strip dimension check behavior to mimic matlab magedrifaat <magedrifaat@gmail.com> parents: 31136 diff changeset	514 ## test wrong number of channels
31134 fc0366e009dd Tiff.m: added tests for 8-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31132 diff changeset	515 %!testif HAVE_TIFF
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	516 %! function test_fn (filename)
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	517 %! img = Tiff (filename, "w");
31140 5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	518 %! setTag (img, struct ("ImageLength", 10, "ImageWidth", 10,
5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	519 %! "BitsPerSample", 8, "SamplesPerPixel", 3,
5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	520 %! "PlanarConfiguration", 1,
5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	521 %! "PhotometricInterpretation", 2));
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	522 %! data = uint8 (reshape (1:400, [10, 10, 4]));
31145 2e11f9cb30b8 Tiff writeEncodedStrip: added warning for input data larger than the size of the strip. magedrifaat <magedrifaat@gmail.com> parents: 31143 diff changeset	523 %! fail ("writeEncodedStrip (img, 1, data)", "warning",
2e11f9cb30b8 Tiff writeEncodedStrip: added warning for input data larger than the size of the strip. magedrifaat <magedrifaat@gmail.com> parents: 31143 diff changeset	524 %! "The strip is composed of 3 channels but the input has 4 channels.");
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	525 %! img.close ();
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	526 %! verify_data (filename, data, [10, 10, 3]);
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	527 %! endfunction
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	528 %! file_wrapper (@test_fn);
31135 b7ffe64e0287 Tiff.m: added test for 16- and 32-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31134 diff changeset	529
b7ffe64e0287 Tiff.m: added test for 16- and 32-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31134 diff changeset	530 ## test one strip RGB image separate planes (RRRGGGBBB)
b7ffe64e0287 Tiff.m: added test for 16- and 32-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31134 diff changeset	531 %!testif HAVE_TIFF
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	532 %! function test_fn (filename)
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	533 %! img = Tiff (filename, "w");
31140 5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	534 %! setTag (img, struct ("ImageLength", 10, "ImageWidth", 10,
5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	535 %! "BitsPerSample", 8, "SamplesPerPixel", 3,
5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	536 %! "PlanarConfiguration", 2,
5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	537 %! "PhotometricInterpretation", 2));
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	538 %! data = uint8 (reshape (1:300, [10, 10, 3]));
31135 b7ffe64e0287 Tiff.m: added test for 16- and 32-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31134 diff changeset	539 %! for i = 1:3
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	540 %! writeEncodedStrip (img, i, data(:,:,i));
31135 b7ffe64e0287 Tiff.m: added test for 16- and 32-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31134 diff changeset	541 %! endfor
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	542 %! img.close ();
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	543 %! verify_data (filename, data, [10, 10, 3]);
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	544 %! endfunction
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	545 %! file_wrapper (@test_fn);
31135 b7ffe64e0287 Tiff.m: added test for 16- and 32-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31134 diff changeset	546
31147 7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	547 ## test 1-bit BiLevel image
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	548 %!testif HAVE_TIFF
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	549 %! function test_fn (filename)
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	550 %! img = Tiff (filename, "w");
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	551 %! setTag (img, struct ("ImageLength", 10, "ImageWidth", 10));
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	552 %! data = logical (repmat ([1,0,0,0,1,0,1,1,1,0], [10, 1]));
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	553 %! writeEncodedStrip (img, 1, data);
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	554 %! img.close ();
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	555 %! verify_data (filename, data, [10, 10]);
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	556 %! endfunction
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	557 %! file_wrapper (@test_fn);
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	558
31135 b7ffe64e0287 Tiff.m: added test for 16- and 32-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31134 diff changeset	559 ## test 16-bit grayscale image
b7ffe64e0287 Tiff.m: added test for 16- and 32-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31134 diff changeset	560 %!testif HAVE_TIFF
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	561 %! function test_fn (filename)
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	562 %! img = Tiff (filename, "w");
31140 5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	563 %! setTag (img, struct ("ImageLength", 20, "ImageWidth", 20,
31147 7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	564 %! "BitsPerSample", 16));
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	565 %! data = uint16 (reshape (1:400, [20, 20]));
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	566 %! writeEncodedStrip (img, 1, data);
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	567 %! img.close ();
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	568 %! verify_data (filename, data, [20, 20]);
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	569 %! endfunction
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	570 %! file_wrapper (@test_fn);
31135 b7ffe64e0287 Tiff.m: added test for 16- and 32-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31134 diff changeset	571
b7ffe64e0287 Tiff.m: added test for 16- and 32-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31134 diff changeset	572 ## test 32-bit grayscale image
b7ffe64e0287 Tiff.m: added test for 16- and 32-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31134 diff changeset	573 %!testif HAVE_TIFF
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	574 %! function test_fn (filename)
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	575 %! img = Tiff (filename, "w");
31140 5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	576 %! setTag (img, struct ("ImageLength", 20, "ImageWidth", 20,
31147 7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	577 %! "BitsPerSample", 32));
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	578 %! data = uint32 (reshape (1:400, [20, 20]));
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	579 %! writeEncodedStrip (img, 1, data);
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	580 %! img.close ();
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	581 %! verify_data (filename, data, [20, 20]);
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	582 %! endfunction
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	583 %! file_wrapper (@test_fn);
31135 b7ffe64e0287 Tiff.m: added test for 16- and 32-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31134 diff changeset	584
b7ffe64e0287 Tiff.m: added test for 16- and 32-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31134 diff changeset	585 ## test 16-bit RGB image
b7ffe64e0287 Tiff.m: added test for 16- and 32-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31134 diff changeset	586 %!testif HAVE_TIFF
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	587 %! function test_fn (filename)
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	588 %! img = Tiff (filename, "w");
31140 5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	589 %! setTag (img, struct ("ImageLength", 20, "ImageWidth", 20,
5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	590 %! "BitsPerSample", 16, "SamplesPerPixel", 3,
5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	591 %! "PlanarConfiguration", 1,
5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	592 %! "PhotometricInterpretation", 2));
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	593 %! data = uint16 (reshape (1:1200, [20, 20, 3]));
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	594 %! writeEncodedStrip (img, 1, data);
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	595 %! img.close ();
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	596 %! verify_data (filename, data, [20, 20, 3]);
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	597 %! endfunction
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	598 %! file_wrapper (@test_fn);
31135 b7ffe64e0287 Tiff.m: added test for 16- and 32-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31134 diff changeset	599
b7ffe64e0287 Tiff.m: added test for 16- and 32-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31134 diff changeset	600 ## test 32-bit RGB image
b7ffe64e0287 Tiff.m: added test for 16- and 32-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31134 diff changeset	601 %!testif HAVE_TIFF
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	602 %! function test_fn (filename)
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	603 %! img = Tiff (filename, "w");
31140 5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	604 %! setTag (img, struct ("ImageLength", 20, "ImageWidth", 20,
5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	605 %! "BitsPerSample", 32, "SamplesPerPixel", 3,
5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	606 %! "PlanarConfiguration", 1,
5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	607 %! "PhotometricInterpretation", 2));
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	608 %! data = uint32 (reshape (1:1200, [20, 20, 3]));
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	609 %! writeEncodedStrip (img, 1, data);
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	610 %! img.close ();
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	611 %! verify_data (filename, data, [20, 20, 3]);
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	612 %! endfunction
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	613 %! file_wrapper (@test_fn);
31135 b7ffe64e0287 Tiff.m: added test for 16- and 32-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31134 diff changeset	614
31143 a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	615 ## test failure unsupported bit-depth
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	616 %!testif HAVE_TIFF
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	617 %! function test_fn (filename)
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	618 %! img = Tiff (filename, "w");
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	619 %! setTag (img, struct ("ImageLength", 20, "ImageWidth", 20,
31147 7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	620 %! "BitsPerSample", 24));
31143 a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	621 %! data = uint16 (reshape (1:400, [20, 20]));
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	622 %! fail ("writeEncodedStrip (img, 1, data)", "Unsupported bit depth");
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	623 %! img.close ();
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	624 %! endfunction
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	625 %! file_wrapper (@test_fn);
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	626
31147 7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	627 ## test failure unsupported BiLevel number of channels
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	628 %!testif HAVE_TIFF
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	629 %! function test_fn (filename)
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	630 %! img = Tiff (filename, "w");
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	631 %! setTag (img, struct ("ImageLength", 10, "ImageWidth", 10,
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	632 %! "SamplesPerPixel", 3));
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	633 %! data = logical (repmat ([1,0,0,0,1,0,1,1,1,0], [10, 1]));
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	634 %! fail ("writeEncodedStrip (img, 1, data)",
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	635 %! "Bi-Level images must have one channel only");
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	636 %! img.close ();
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	637 %! endfunction
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	638 %! file_wrapper (@test_fn);
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	639
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	640 ## test multi-strip BiLevel image
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	641 %!testif HAVE_TIFF
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	642 %! function test_fn (filename)
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	643 %! img = Tiff (filename, "w");
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	644 %! setTag (img, struct ("ImageLength", 10, "ImageWidth", 10,
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	645 %! "RowsPerStrip", 2));
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	646 %! data = logical (repmat ([1,0,0,0,1,0,1,1,1,0], [10, 1]));
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	647 %! for strip = 1:5
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	648 %! writeEncodedStrip (img, strip, data(strip * 2 - 1: strip * 2, :));
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	649 %! endfor
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	650 %! img.close ();
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	651 %! verify_data (filename, data, [10, 10]);
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	652 %! endfunction
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	653 %! file_wrapper (@test_fn);
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	654
31143 a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	655 ## test multi-strip grayscale image
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	656 %!testif HAVE_TIFF
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	657 %! function test_fn (filename)
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	658 %! img = Tiff (filename, "w");
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	659 %! setTag (img, struct ("ImageLength", 20, "ImageWidth", 20,
31153 c66d6c7f025e Tiff: implemented write method for stripped images magedrifaat <magedrifaat@gmail.com> parents: 31151 diff changeset	660 %! "BitsPerSample", 16, "RowsPerStrip", 3));
31143 a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	661 %! data = uint16 (reshape (1:400, [20, 20]));
31153 c66d6c7f025e Tiff: implemented write method for stripped images magedrifaat <magedrifaat@gmail.com> parents: 31151 diff changeset	662 %! for strip = 1:7
c66d6c7f025e Tiff: implemented write method for stripped images magedrifaat <magedrifaat@gmail.com> parents: 31151 diff changeset	663 %! writeEncodedStrip (img, strip, data(strip * 3 - 2: min(strip * 3, 20), :));
31143 a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	664 %! endfor
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	665 %! img.close ();
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	666 %! verify_data (filename, data, [20, 20]);
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	667 %! endfunction
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	668 %! file_wrapper (@test_fn);
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	669
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	670 ## test multi-strip RGB image
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	671 %!testif HAVE_TIFF
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	672 %! function test_fn (filename)
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	673 %! img = Tiff (filename, "w");
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	674 %! setTag (img, struct ("ImageLength", 20, "ImageWidth", 20,
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	675 %! "BitsPerSample", 16, "SamplesPerPixel", 3,
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	676 %! "RowsPerStrip", 2, "PlanarConfiguration", 1,
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	677 %! "PhotometricInterpretation", 2));
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	678 %! data = uint16 (reshape (1:1200, [20, 20, 3]));
31147 7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	679 %! for strip = 1:10
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	680 %! writeEncodedStrip (img, strip, data(strip * 2 - 1: strip * 2, :, :));
31143 a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	681 %! endfor
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	682 %! img.close ();
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	683 %! verify_data (filename, data, [20, 20, 3]);
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	684 %! endfunction
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	685 %! file_wrapper (@test_fn);
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	686
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	687 ## test multi-strip RGB separate planes image
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	688 %!testif HAVE_TIFF
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	689 %! function test_fn (filename)
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	690 %! img = Tiff (filename, "w");
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	691 %! setTag (img, struct ("ImageLength", 20, "ImageWidth", 20,
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	692 %! "BitsPerSample", 16, "SamplesPerPixel", 3,
31153 c66d6c7f025e Tiff: implemented write method for stripped images magedrifaat <magedrifaat@gmail.com> parents: 31151 diff changeset	693 %! "RowsPerStrip", 3, "PlanarConfiguration", 2,
31143 a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	694 %! "PhotometricInterpretation", 2));
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	695 %! data = uint16 (reshape (1:1200, [20, 20, 3]));
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	696 %! strip = 1;
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	697 %! for sample = 1:3
31153 c66d6c7f025e Tiff: implemented write method for stripped images magedrifaat <magedrifaat@gmail.com> parents: 31151 diff changeset	698 %! for row = 1:3:20
c66d6c7f025e Tiff: implemented write method for stripped images magedrifaat <magedrifaat@gmail.com> parents: 31151 diff changeset	699 %! writeEncodedStrip (img, strip, data(row: min(row + 2, 20), :, sample));
31143 a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	700 %! strip = strip + 1;
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	701 %! endfor
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	702 %! endfor
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	703 %! img.close ();
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	704 %! verify_data (filename, data, [20, 20, 3]);
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	705 %! endfunction
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	706 %! file_wrapper (@test_fn);
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	707
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	708 ## test single-precision image
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	709 %!testif HAVE_TIFF
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	710 %! function test_fn (filename)
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	711 %! img = Tiff (filename, "w");
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	712 %! setTag (img, struct ("ImageLength", 20, "ImageWidth", 20,
31147 7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	713 %! "BitsPerSample", 32, "SampleFormat", 3));
31143 a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	714 %! data = single (reshape (1:400, [20, 20]));
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	715 %! writeEncodedStrip (img, 1, data);
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	716 %! img.close ();
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	717 %! verify_data (filename, data, [20, 20]);
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	718 %! endfunction
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	719 %! file_wrapper (@test_fn);
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	720
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	721 ## test double-precision image
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	722 %!testif HAVE_TIFF
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	723 %! function test_fn (filename)
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	724 %! img = Tiff (filename, "w");
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	725 %! setTag (img, struct ("ImageLength", 20, "ImageWidth", 20,
31147 7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	726 %! "BitsPerSample", 64, "SampleFormat", 3));
31143 a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	727 %! data = double (reshape (1:400, [20, 20]));
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	728 %! writeEncodedStrip (img, 1, data);
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	729 %! img.close ();
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	730 %! verify_data (filename, data, [20, 20]);
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	731 %! endfunction
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	732 %! file_wrapper (@test_fn);
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	733
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	734 ## test failure unsupported floating-point bit depth
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	735 %!testif HAVE_TIFF
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	736 %! function test_fn (filename)
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	737 %! img = Tiff (filename, "w");
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	738 %! setTag (img, struct ("ImageLength", 20, "ImageWidth", 20,
31147 7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	739 %! "BitsPerSample", 16, "SampleFormat", 3));
31143 a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	740 %! data = double (reshape (1:400, [20, 20]));
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	741 %! fail ("writeEncodedStrip (img, 1, data)",
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	742 %! "Floating point images are only supported for bit depths of 32 and 64");
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	743 %! img.close ();
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	744 %! endfunction
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	745 %! file_wrapper (@test_fn);
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	746
31135 b7ffe64e0287 Tiff.m: added test for 16- and 32-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31134 diff changeset	747 ## test failure data-type and bit-depth mismatch
b7ffe64e0287 Tiff.m: added test for 16- and 32-bit grayscale and RGB images. magedrifaat <magedrifaat@gmail.com> parents: 31134 diff changeset	748 %!testif HAVE_TIFF
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	749 %! function test_fn (filename)
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	750 %! img = Tiff (filename, "w");
31140 5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	751 %! setTag (img, struct ("ImageLength", 20, "ImageWidth", 20,
5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	752 %! "BitsPerSample", 16, "SamplesPerPixel", 3,
5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	753 %! "PlanarConfiguration", 1,
5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	754 %! "PhotometricInterpretation", 2));
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	755 %! data = uint8 (reshape (1:1200, [20, 20, 3]));
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	756 %! fail ("writeEncodedStrip (img, 1, data)", "Only uint16 data is allowed for uint images with bit depth of 16");
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	757 %! img.close ();
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	758 %! endfunction
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	759 %! file_wrapper (@test_fn);
31138 68762676dab1 Tiff writeEncodedStrip: prevent writing to a read-only file magedrifaat <magedrifaat@gmail.com> parents: 31137 diff changeset	760
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	761 ## test failure writing to img read-only file
31138 68762676dab1 Tiff writeEncodedStrip: prevent writing to a read-only file magedrifaat <magedrifaat@gmail.com> parents: 31137 diff changeset	762 %!testif HAVE_TIFF
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	763 %! function test_fn (filename)
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	764 %! img = Tiff (filename, "w");
31140 5f70efad6e2c Tiff setTag: added support for setting multiple tags at once using structs magedrifaat <magedrifaat@gmail.com> parents: 31139 diff changeset	765 %! setTag (img, struct ("ImageLength", 1, "ImageWidth", 1,
31147 7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	766 %! "BitsPerSample", 8));
31139 3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	767 %! data = uint8 (1);
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	768 %! writeEncodedStrip (img, 1, data);
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	769 %! img.close();
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	770 %! img = Tiff (filename, "r");
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	771 %! fail ("writeEncodedStrip(img, 1, [1])", "Can't write data to a file opened in read-only mode");
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	772 %! img.close();
3431a15b2c75 Tiff.m: refactored tests to use functions to reduce code repetition. magedrifaat <magedrifaat@gmail.com> parents: 31138 diff changeset	773 %! endfunction
31143 a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	774 %! file_wrapper (@test_fn);
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	775
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	776 ## test failure unsupported sample format
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	777 %!testif HAVE_TIFF
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	778 %! function test_fn (filename)
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	779 %! img = Tiff (filename, "w");
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	780 %! setTag (img, struct ("ImageLength", 20, "ImageWidth", 20,
31147 7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	781 %! "BitsPerSample", 16, "SampleFormat", 5));
31143 a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	782 %! data = double (reshape (1:400, [20, 20]));
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	783 %! fail ("writeEncodedStrip (img, 1, data)", "Unsupported sample format");
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	784 %! img.close ();
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	785 %! endfunction
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	786 %! file_wrapper (@test_fn);
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	787
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	788 ## test failure wrong strip number
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	789 %!testif HAVE_TIFF
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	790 %! function test_fn (filename)
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	791 %! img = Tiff (filename, "w");
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	792 %! setTag (img, struct ("ImageLength", 20, "ImageWidth", 20,
31147 7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	793 %! "BitsPerSample", 16, "RowsPerStrip", 5));
31143 a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	794 %! strip_data = uint16 (reshape (1:100, [5, 20]));
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	795 %! fail ("writeEncodedStrip (img, 5, strip_data)",
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	796 %! "Strip number out of range");
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	797 %! img.close ();
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	798 %! endfunction
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	799 %! file_wrapper (@test_fn);
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	800
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	801 ## test failure writing strips to tiled image
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	802 %!testif HAVE_TIFF
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	803 %! function test_fn (filename)
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	804 %! img = Tiff (filename, "w");
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	805 %! setTag (img, struct ("ImageLength", 20, "ImageWidth", 20,
31147 7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	806 %! "BitsPerSample", 16, "TileLength", 16,
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	807 %! "TileWidth", 16));
31143 a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	808 %! data = uint8 (reshape (1:400, [20, 20]));
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	809 %! fail ("writeEncodedStrip (img, 1, data)",
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	810 %! "Can't write strips to a tiled image");
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	811 %! img.close ();
a68f2dadafee Tiff.m: added all remaining tests for implemented features. magedrifaat <magedrifaat@gmail.com> parents: 31141 diff changeset	812 %! endfunction
31147 7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	813 %! file_wrapper (@test_fn);
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	814
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	815 ## test tiled BiLevel image
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	816 %!testif HAVE_TIFF
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	817 %! function test_fn (filename)
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	818 %! img = Tiff (filename, "w");
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	819 %! setTag (img, struct ("ImageLength", 32, "ImageWidth", 32,
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	820 %! "TileLength", 16, "TileWidth", 16));
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	821 %! data = logical (repmat ([1,0,0,1,0,1,1,0], [32, 4]));
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	822 %! tile = 1;
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	823 %! for row = 1:16:32
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	824 %! for col = 1:16:32
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	825 %! writeEncodedTile (img, tile, data(row:row+15, col:col+15));
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	826 %! tile = tile + 1;
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	827 %! endfor
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	828 %! endfor
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	829 %! img.close ();
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	830 %! verify_data (filename, data, [32, 32]);
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	831 %! endfunction
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	832 %! file_wrapper (@test_fn);
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	833
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	834 ## test tiled grayscale image
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	835 %!testif HAVE_TIFF
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	836 %! function test_fn (filename)
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	837 %! img = Tiff (filename, "w");
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	838 %! setTag (img, struct ("ImageLength", 32, "ImageWidth", 32,
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	839 %! "BitsPerSample", 16, "TileLength", 16,
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	840 %! "TileWidth", 16));
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	841 %! data = uint16 (reshape (1:1024, [32, 32]));
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	842 %! tile = 1;
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	843 %! for row = 1:16:32
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	844 %! for col = 1:16:32
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	845 %! writeEncodedTile (img, tile, data(row:row+15, col:col+15));
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	846 %! tile = tile + 1;
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	847 %! endfor
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	848 %! endfor
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	849 %! img.close ();
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	850 %! verify_data (filename, data, [32, 32]);
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	851 %! endfunction
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	852 %! file_wrapper (@test_fn);
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	853
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	854 ## test tiled grayscale image with padding
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	855 %!testif HAVE_TIFF
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	856 %! function test_fn (filename)
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	857 %! img = Tiff (filename, "w");
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	858 %! setTag (img, struct ("ImageLength", 20, "ImageWidth", 20,
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	859 %! "BitsPerSample", 16, "TileLength", 16,
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	860 %! "TileWidth", 16));
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	861 %! data = uint16 (reshape (1:400, [20, 20]));
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	862 %! tile = 1;
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	863 %! for row = 1:16:32
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	864 %! for col = 1:16:32
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	865 %! writeEncodedTile (img, tile, data(row:min(row+15, 20),
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	866 %! col:min(col+15, 20)));
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	867 %! tile = tile + 1;
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	868 %! endfor
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	869 %! endfor
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	870 %! img.close ();
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	871 %! verify_data (filename, data, [20, 20]);
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	872 %! endfunction
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	873 %! file_wrapper (@test_fn);
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	874
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	875 ## test tiled RGB image
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	876 %!testif HAVE_TIFF
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	877 %! function test_fn (filename)
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	878 %! img = Tiff (filename, "w");
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	879 %! setTag (img, struct ("ImageLength", 20, "ImageWidth", 20,
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	880 %! "BitsPerSample", 16, "SamplesPerPixel", 3,
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	881 %! "PlanarConfiguration", 1, "TileLength", 16,
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	882 %! "TileWidth", 16, "PhotometricInterpretation", 2));
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	883 %! data = uint16 (reshape (1:1200, [20, 20, 3]));
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	884 %! tile = 1;
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	885 %! for row = 1:16:32
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	886 %! for col = 1:16:32
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	887 %! writeEncodedTile (img, tile, data(row:min(row+15,20),
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	888 %! col:min(col+15,20), :));
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	889 %! tile = tile + 1;
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	890 %! endfor
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	891 %! endfor
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	892 %! img.close ();
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	893 %! verify_data (filename, data, [20, 20, 3]);
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	894 %! endfunction
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	895 %! file_wrapper (@test_fn);
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	896
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	897 ## test tiled RGB image separate planes
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	898 %!testif HAVE_TIFF
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	899 %! function test_fn (filename)
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	900 %! img = Tiff (filename, "w");
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	901 %! setTag (img, struct ("ImageLength", 20, "ImageWidth", 20,
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	902 %! "BitsPerSample", 16, "SamplesPerPixel", 3,
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	903 %! "PlanarConfiguration", 2, "TileLength", 16,
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	904 %! "TileWidth", 16, "PhotometricInterpretation", 2));
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	905 %! data = uint16 (reshape (1:1200, [20, 20, 3]));
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	906 %! tile = 1;
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	907 %! for channel=1:3
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	908 %! for row = 1:16:32
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	909 %! for col = 1:16:32
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	910 %! writeEncodedTile (img, tile, data(row:min(row+15,20),
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	911 %! col:min(col+15,20), channel));
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	912 %! tile = tile + 1;
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	913 %! endfor
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	914 %! endfor
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	915 %! endfor
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	916 %! img.close ();
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	917 %! verify_data (filename, data, [20, 20, 3]);
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	918 %! endfunction
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	919 %! file_wrapper (@test_fn);
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	920
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	921 ## test failure writing tiles to stripped image
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	922 %!testif HAVE_TIFF
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	923 %! function test_fn (filename)
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	924 %! img = Tiff (filename, "w");
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	925 %! setTag (img, struct ("ImageLength", 20, "ImageWidth", 20,
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	926 %! "BitsPerSample", 16));
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	927 %! data = uint8 (reshape (1:400, [20, 20]));
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	928 %! fail ("writeEncodedTile (img, 1, data)",
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	929 %! "Can't write tiles to a stripped image");
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	930 %! img.close ();
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	931 %! endfunction
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	932 %! file_wrapper (@test_fn);
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	933
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	934 ## test tiled image wrong tile dimensions
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	935 %!testif HAVE_TIFF
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	936 %! function test_fn (filename)
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	937 %! img = Tiff (filename, "w");
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	938 %! setTag (img, struct ("ImageLength", 20, "ImageWidth", 20,
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	939 %! "BitsPerSample", 16, "SamplesPerPixel", 3,
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	940 %! "PlanarConfiguration", 1, "TileLength", 16,
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	941 %! "TileWidth", 16, "PhotometricInterpretation", 2));
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	942 %! data = uint16 (reshape (1:1600, [20, 20, 4]));
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	943 %! tile = 1;
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	944 %! for row = 1:16:32
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	945 %! for col = 1:16:32
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	946 %! writeEncodedTile (img, tile, data(row:min(row+15,20),
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	947 %! col:min(col+15,20), 1:3));
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	948 %! tile = tile + 1;
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	949 %! endfor
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	950 %! endfor
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	951 %! fail ("writeEncodedTile (img, 1, data(1:18,1:16,1:3))", "warning",
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	952 %! "The tile is composed of 16 rows but input has 18 rows");
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	953 %! fail ("writeEncodedTile (img, 1, data(1:16,1:20,1:3))", "warning",
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	954 %! "The tile is composed of 16 columns but input has 20 columns");
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	955 %! fail ("writeEncodedTile (img, 1, data(1:16,1:16,:))", "warning",
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	956 %! "The tile is composed of 3 channels but input has 4 channels");
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	957 %! img.close ();
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	958 %! verify_data (filename, data, [20, 20, 3]);
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	959 %! endfunction
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	960 %! file_wrapper (@test_fn);
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	961
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	962 ## test failure wrong tile number
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	963 %!testif HAVE_TIFF
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	964 %! function test_fn (filename)
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	965 %! img = Tiff (filename, "w");
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	966 %! setTag (img, struct ("ImageLength", 20, "ImageWidth", 20,
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	967 %! "BitsPerSample", 16, "TileWidth", 16,
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	968 %! "TileLength", 16));
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	969 %! tile_data = uint16 (reshape (1:256, [16, 16]));
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	970 %! fail ("writeEncodedTile (img, 5, tile_data)",
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	971 %! "Tile number out of range");
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	972 %! img.close ();
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	973 %! endfunction
7af78a63d3c3 Tiff.m: added test for writing and reading tiled images. magedrifaat <magedrifaat@gmail.com> parents: 31146 diff changeset	974 %! file_wrapper (@test_fn);
31148 4bc9a1938f9a Tiff: added isTiled method to check if the image is tiled or stripped magedrifaat <magedrifaat@gmail.com> parents: 31147 diff changeset	975
4bc9a1938f9a Tiff: added isTiled method to check if the image is tiled or stripped magedrifaat <magedrifaat@gmail.com> parents: 31147 diff changeset	976 ## test isTiled returns the correct value
4bc9a1938f9a Tiff: added isTiled method to check if the image is tiled or stripped magedrifaat <magedrifaat@gmail.com> parents: 31147 diff changeset	977 %!testif HAVE_TIFF
4bc9a1938f9a Tiff: added isTiled method to check if the image is tiled or stripped magedrifaat <magedrifaat@gmail.com> parents: 31147 diff changeset	978 %! function test_fn (filename)
4bc9a1938f9a Tiff: added isTiled method to check if the image is tiled or stripped magedrifaat <magedrifaat@gmail.com> parents: 31147 diff changeset	979 %! img = Tiff (filename, "w");
4bc9a1938f9a Tiff: added isTiled method to check if the image is tiled or stripped magedrifaat <magedrifaat@gmail.com> parents: 31147 diff changeset	980 %! assert (isTiled (img), logical (0));
4bc9a1938f9a Tiff: added isTiled method to check if the image is tiled or stripped magedrifaat <magedrifaat@gmail.com> parents: 31147 diff changeset	981 %! setTag (img, "TileLength", 16);
4bc9a1938f9a Tiff: added isTiled method to check if the image is tiled or stripped magedrifaat <magedrifaat@gmail.com> parents: 31147 diff changeset	982 %! setTag (img, "TileWidth", 16);
4bc9a1938f9a Tiff: added isTiled method to check if the image is tiled or stripped magedrifaat <magedrifaat@gmail.com> parents: 31147 diff changeset	983 %! assert (isTiled (img), logical (1));
4bc9a1938f9a Tiff: added isTiled method to check if the image is tiled or stripped magedrifaat <magedrifaat@gmail.com> parents: 31147 diff changeset	984 %! endfunction
31149 d4dbc69f301e Tiff: implemented numberOfStrips method magedrifaat <magedrifaat@gmail.com> parents: 31148 diff changeset	985 %! file_wrapper (@test_fn);
d4dbc69f301e Tiff: implemented numberOfStrips method magedrifaat <magedrifaat@gmail.com> parents: 31148 diff changeset	986
d4dbc69f301e Tiff: implemented numberOfStrips method magedrifaat <magedrifaat@gmail.com> parents: 31148 diff changeset	987 ## test numberOfStrips returns the correct value
d4dbc69f301e Tiff: implemented numberOfStrips method magedrifaat <magedrifaat@gmail.com> parents: 31148 diff changeset	988 %!testif HAVE_TIFF
d4dbc69f301e Tiff: implemented numberOfStrips method magedrifaat <magedrifaat@gmail.com> parents: 31148 diff changeset	989 %! function test_fn (filename)
d4dbc69f301e Tiff: implemented numberOfStrips method magedrifaat <magedrifaat@gmail.com> parents: 31148 diff changeset	990 %! img = Tiff (filename, "w");
d4dbc69f301e Tiff: implemented numberOfStrips method magedrifaat <magedrifaat@gmail.com> parents: 31148 diff changeset	991 %! setTag (img, struct ("ImageWidth", 10, "ImageLength", 10));
d4dbc69f301e Tiff: implemented numberOfStrips method magedrifaat <magedrifaat@gmail.com> parents: 31148 diff changeset	992 %! assert (numberOfStrips (img), 1);
d4dbc69f301e Tiff: implemented numberOfStrips method magedrifaat <magedrifaat@gmail.com> parents: 31148 diff changeset	993 %! setTag (img, "RowsPerStrip", 2);
d4dbc69f301e Tiff: implemented numberOfStrips method magedrifaat <magedrifaat@gmail.com> parents: 31148 diff changeset	994 %! assert (numberOfStrips (img), 5);
d4dbc69f301e Tiff: implemented numberOfStrips method magedrifaat <magedrifaat@gmail.com> parents: 31148 diff changeset	995 %! setTag (img, "RowsPerStrip", 4);
d4dbc69f301e Tiff: implemented numberOfStrips method magedrifaat <magedrifaat@gmail.com> parents: 31148 diff changeset	996 %! assert (numberOfStrips (img), 3);
d4dbc69f301e Tiff: implemented numberOfStrips method magedrifaat <magedrifaat@gmail.com> parents: 31148 diff changeset	997 %! setTag (img, "TileLength", 16);
d4dbc69f301e Tiff: implemented numberOfStrips method magedrifaat <magedrifaat@gmail.com> parents: 31148 diff changeset	998 %! setTag (img, "TileWidth", 16);
d4dbc69f301e Tiff: implemented numberOfStrips method magedrifaat <magedrifaat@gmail.com> parents: 31148 diff changeset	999 %! fail ("numberOfStrips (img)", "The image is tiled not stripped");
d4dbc69f301e Tiff: implemented numberOfStrips method magedrifaat <magedrifaat@gmail.com> parents: 31148 diff changeset	1000 %! endfunction
31150 6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1001 %! file_wrapper (@test_fn);
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1002
31151 6fb54834aa93 Tiff: added numberOfTiles and getVersion methods magedrifaat <magedrifaat@gmail.com> parents: 31150 diff changeset	1003 ## test numberOfTiles returns the correct value
6fb54834aa93 Tiff: added numberOfTiles and getVersion methods magedrifaat <magedrifaat@gmail.com> parents: 31150 diff changeset	1004 %!testif HAVE_TIFF
6fb54834aa93 Tiff: added numberOfTiles and getVersion methods magedrifaat <magedrifaat@gmail.com> parents: 31150 diff changeset	1005 %! function test_fn (filename)
6fb54834aa93 Tiff: added numberOfTiles and getVersion methods magedrifaat <magedrifaat@gmail.com> parents: 31150 diff changeset	1006 %! img = Tiff (filename, "w");
6fb54834aa93 Tiff: added numberOfTiles and getVersion methods magedrifaat <magedrifaat@gmail.com> parents: 31150 diff changeset	1007 %! setTag (img, struct ("ImageWidth", 20, "ImageLength", 20,
6fb54834aa93 Tiff: added numberOfTiles and getVersion methods magedrifaat <magedrifaat@gmail.com> parents: 31150 diff changeset	1008 %! "TileLength", 16, "TileWidth", 16));
6fb54834aa93 Tiff: added numberOfTiles and getVersion methods magedrifaat <magedrifaat@gmail.com> parents: 31150 diff changeset	1009 %! assert (numberOfTiles (img), 4);
6fb54834aa93 Tiff: added numberOfTiles and getVersion methods magedrifaat <magedrifaat@gmail.com> parents: 31150 diff changeset	1010 %! setTag (img, "TileLength", 32);
6fb54834aa93 Tiff: added numberOfTiles and getVersion methods magedrifaat <magedrifaat@gmail.com> parents: 31150 diff changeset	1011 %! assert (numberOfTiles (img), 2);
6fb54834aa93 Tiff: added numberOfTiles and getVersion methods magedrifaat <magedrifaat@gmail.com> parents: 31150 diff changeset	1012 %! setTag (img, "TileWidth", 32);
6fb54834aa93 Tiff: added numberOfTiles and getVersion methods magedrifaat <magedrifaat@gmail.com> parents: 31150 diff changeset	1013 %! assert (numberOfTiles (img), 1);
6fb54834aa93 Tiff: added numberOfTiles and getVersion methods magedrifaat <magedrifaat@gmail.com> parents: 31150 diff changeset	1014 %! img = Tiff (filename, "w");
6fb54834aa93 Tiff: added numberOfTiles and getVersion methods magedrifaat <magedrifaat@gmail.com> parents: 31150 diff changeset	1015 %! fail ("numberOfTiles (img)", "The image is stripped not tiled");
6fb54834aa93 Tiff: added numberOfTiles and getVersion methods magedrifaat <magedrifaat@gmail.com> parents: 31150 diff changeset	1016 %! endfunction
6fb54834aa93 Tiff: added numberOfTiles and getVersion methods magedrifaat <magedrifaat@gmail.com> parents: 31150 diff changeset	1017 %! file_wrapper (@test_fn);
6fb54834aa93 Tiff: added numberOfTiles and getVersion methods magedrifaat <magedrifaat@gmail.com> parents: 31150 diff changeset	1018
31150 6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1019 ## test computeStrip returns the correct value
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1020 %!testif HAVE_TIFF
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1021 %! function test_fn (filename)
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1022 %! img = Tiff (filename, "w");
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1023 %! setTag (img, struct ("ImageWidth", 10, "ImageLength", 10,
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1024 %! "RowsPerStrip", 2, "BitsPerSample", 8,
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1025 %! "SamplesPerPixel", 3, "PlanarConfiguration", 1));
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1026 %! assert (computeStrip (img, 1), 1);
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1027 %! assert (computeStrip (img, 2), 1);
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1028 %! assert (computeStrip (img, 0), 1);
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1029 %! assert (computeStrip (img, 10), 5);
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1030 %! assert (computeStrip (img, 11), 5);
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1031 %! setTag (img, "PlanarConfiguration", 2);
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1032 %! ## This is need for the tag to take effect, should be
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1033 %! ## replaced by rewriteDirectory
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1034 %! writeEncodedStrip (img, 1, uint8 (reshape (1:20, [2, 10])));
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1035 %! assert (computeStrip (img, 1, 2), 6);
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1036 %! assert (computeStrip (img, 100, 1), 5);
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1037 %! img = Tiff ("test.tif", "w");
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1038 %! setTag (img, "TileWidth", 16);
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1039 %! setTag (img, "TileLength", 16);
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1040 %! fail ("computeStrip (img, 1, 1)", "The image is tiled not stripped");
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1041 %! endfunction
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1042 %! file_wrapper (@test_fn);
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1043
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1044 ## test computeTile returns the correct value
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1045 %!testif HAVE_TIFF
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1046 %! function test_fn (filename)
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1047 %! img = Tiff (filename, "w");
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1048 %! setTag (img, struct ("ImageWidth", 20, "ImageLength", 20,
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1049 %! "BitsPerSample", 8, "SamplesPerPixel", 3,
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1050 %! "TileLength", 16, "TileWidth", 16,
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1051 %! "PlanarConfiguration", 1));
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1052 %! assert (computeTile (img, [1, 1]), 1);
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1053 %! assert (computeTile (img, [2, 2]), 1);
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1054 %! assert (computeTile (img, [0, 0]), 1);
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1055 %! assert (computeTile (img, [8, 17]), 2);
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1056 %! assert (computeTile (img, [19, 10]), 3);
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1057 %! assert (computeTile (img, [17, 17]), 4);
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1058 %! assert (computeTile (img, [100, 100]), 4);
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1059 %! setTag (img, "PlanarConfiguration", 2);
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1060 %! ## This is need for the tag to take effect, should be
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1061 %! ## replaced by rewriteDirectory
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1062 %! writeEncodedTile (img, 1, uint8 (reshape (1:256, [16, 16])));
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1063 %! assert (computeTile (img, [1, 1], 2), 5);
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1064 %! assert (computeTile (img, [100, 100], 1), 4);
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1065 %! img = Tiff ("test.tif", "w");
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1066 %! fail ("computeTile (img, 1, 1)", "The image is stripped not tiled");
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1067 %! endfunction
6bede2d6f273 Tiff: added computeStrip and computeTile methods magedrifaat <magedrifaat@gmail.com> parents: 31149 diff changeset	1068 %! file_wrapper (@test_fn);
31154 828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1069
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1070 ## test write method one pixel bilevel image
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1071 %!testif HAVE_TIFF
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1072 %! function test_fn (filename)
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1073 %! img = Tiff (filename, "w");
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1074 %! setTag(img, struct ("ImageLength", 1, "ImageWidth", 1));
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1075 %! write (img, logical ([1]));
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1076 %! img.close();
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1077 %! verify_data (filename, logical ([1]), [1, 1]);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1078 %! endfunction
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1079 %! file_wrapper (@test_fn);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1080
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1081 ## test write method one strip bilevel image
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1082 %!testif HAVE_TIFF
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1083 %! function test_fn (filename)
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1084 %! img = Tiff (filename, "w");
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1085 %! setTag(img, struct ("ImageLength", 10, "ImageWidth", 10));
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1086 %! data = logical (repmat ([1,0,0,0,1,0,1,1,1,0], [10, 1]));
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1087 %! write (img, data);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1088 %! img.close();
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1089 %! verify_data (filename, data, [10, 10]);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1090 %! endfunction
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1091 %! file_wrapper (@test_fn);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1092
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1093 ## test write method multi-strip bilevel image
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1094 %!testif HAVE_TIFF
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1095 %! function test_fn (filename)
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1096 %! img = Tiff (filename, "w");
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1097 %! setTag(img, struct ("ImageLength", 10, "ImageWidth", 10,
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1098 %! "RowsPerStrip", 3));
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1099 %! data = logical (repmat ([1,0,0,0,1,0,1,1,1,0], [10, 1]));
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1100 %! write (img, data);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1101 %! img.close();
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1102 %! verify_data (filename, data, [10, 10]);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1103 %! endfunction
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1104 %! file_wrapper (@test_fn);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1105
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1106 ## test write method one pixel grayscale image
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1107 %!testif HAVE_TIFF
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1108 %! function test_fn (filename)
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1109 %! img = Tiff (filename, "w");
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1110 %! setTag(img, struct ("ImageLength", 1, "ImageWidth", 1,
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1111 %! "BitsPerSample", 8));
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1112 %! write (img, uint8 ([255]));
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1113 %! img.close();
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1114 %! verify_data (filename, uint8 ([255]), [1, 1]);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1115 %! endfunction
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1116 %! file_wrapper (@test_fn);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1117
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1118 ## test write method one strip grayscale image
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1119 %!testif HAVE_TIFF
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1120 %! function test_fn (filename)
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1121 %! img = Tiff (filename, "w");
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1122 %! setTag(img, struct ("ImageLength", 10, "ImageWidth", 10,
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1123 %! "BitsPerSample", 8));
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1124 %! data = uint8 (reshape (1:100, [10, 10]));
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1125 %! write (img, data);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1126 %! img.close();
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1127 %! verify_data (filename, data, [10, 10]);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1128 %! endfunction
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1129 %! file_wrapper (@test_fn);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1130
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1131 ## test write method multi-strip grayscale image
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1132 %!testif HAVE_TIFF
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1133 %! function test_fn (filename)
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1134 %! img = Tiff (filename, "w");
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1135 %! setTag(img, struct ("ImageLength", 10, "ImageWidth", 10,
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1136 %! "BitsPerSample", 8, "RowsPerStrip", 3));
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1137 %! data = uint8 (reshape (1:100, [10, 10]));
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1138 %! write (img, data);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1139 %! img.close();
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1140 %! verify_data (filename, data, [10, 10]);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1141 %! endfunction
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1142 %! file_wrapper (@test_fn);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1143
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1144 ## test write method multi-strip RGB image chunky
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1145 %!testif HAVE_TIFF
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1146 %! function test_fn (filename)
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1147 %! img = Tiff (filename, "w");
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1148 %! setTag(img, struct ("ImageLength", 10, "ImageWidth", 10,
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1149 %! "BitsPerSample", 8, "RowsPerStrip", 3,
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1150 %! "SamplesPerPixel", 3, "PlanarConfiguration", 1,
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1151 %! "PhotometricInterpretation", 2));
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1152 %! data = uint8 (reshape (1:300, [10, 10, 3]));
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1153 %! write (img, data);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1154 %! img.close();
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1155 %! verify_data (filename, data, [10, 10, 3]);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1156 %! endfunction
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1157 %! file_wrapper (@test_fn);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1158
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1159 ## test write method multi-strip RGB image separate
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1160 %!testif HAVE_TIFF
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1161 %! function test_fn (filename)
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1162 %! img = Tiff (filename, "w");
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1163 %! setTag(img, struct ("ImageLength", 10, "ImageWidth", 10,
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1164 %! "BitsPerSample", 8, "RowsPerStrip", 3,
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1165 %! "SamplesPerPixel", 3, "PlanarConfiguration", 2,
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1166 %! "PhotometricInterpretation", 2));
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1167 %! data = uint8 (reshape (1:300, [10, 10, 3]));
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1168 %! write (img, data);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1169 %! img.close();
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1170 %! verify_data (filename, data, [10, 10, 3]);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1171 %! endfunction
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1172 %! file_wrapper (@test_fn);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1173
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1174 ## test write method 16-bit multi-strip image
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1175 %!testif HAVE_TIFF
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1176 %! function test_fn (filename)
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1177 %! img = Tiff (filename, "w");
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1178 %! setTag(img, struct ("ImageLength", 10, "ImageWidth", 10,
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1179 %! "BitsPerSample", 16, "RowsPerStrip", 3,
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1180 %! "SamplesPerPixel", 3, "PlanarConfiguration", 1,
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1181 %! "PhotometricInterpretation", 2));
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1182 %! data = uint16 (reshape (1:300, [10, 10, 3]));
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1183 %! write (img, data);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1184 %! img.close();
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1185 %! verify_data (filename, data, [10, 10, 3]);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1186 %! endfunction
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1187 %! file_wrapper (@test_fn);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1188
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1189 ## test write method 32-bit multi-strip image
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1190 %!testif HAVE_TIFF
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1191 %! function test_fn (filename)
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1192 %! img = Tiff (filename, "w");
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1193 %! setTag(img, struct ("ImageLength", 10, "ImageWidth", 10,
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1194 %! "BitsPerSample", 32, "RowsPerStrip", 3,
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1195 %! "SamplesPerPixel", 3, "PlanarConfiguration", 1,
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1196 %! "PhotometricInterpretation", 2));
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1197 %! data = uint32 (reshape (1:300, [10, 10, 3]));
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1198 %! write (img, data);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1199 %! img.close();
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1200 %! verify_data (filename, data, [10, 10, 3]);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1201 %! endfunction
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1202 %! file_wrapper (@test_fn);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1203
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1204 ## test write method single-precision image
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1205 %!testif HAVE_TIFF
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1206 %! function test_fn (filename)
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1207 %! img = Tiff (filename, "w");
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1208 %! setTag(img, struct ("ImageLength", 10, "ImageWidth", 10,
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1209 %! "BitsPerSample", 32, "RowsPerStrip", 3,
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1210 %! "SamplesPerPixel", 3, "PlanarConfiguration", 1,
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1211 %! "PhotometricInterpretation", 2, "SampleFormat", 3));
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1212 %! data = single (reshape (1:300, [10, 10, 3]));
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1213 %! write (img, data);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1214 %! img.close();
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1215 %! verify_data (filename, data, [10, 10, 3]);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1216 %! endfunction
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1217 %! file_wrapper (@test_fn);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1218
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1219 ## test write method single-precision image
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1220 %!testif HAVE_TIFF
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1221 %! function test_fn (filename)
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1222 %! img = Tiff (filename, "w");
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1223 %! setTag(img, struct ("ImageLength", 10, "ImageWidth", 10,
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1224 %! "BitsPerSample", 64, "RowsPerStrip", 3,
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1225 %! "SamplesPerPixel", 3, "PlanarConfiguration", 1,
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1226 %! "PhotometricInterpretation", 2, "SampleFormat", 3));
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1227 %! data = double (reshape (1:300, [10, 10, 3]));
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1228 %! write (img, data);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1229 %! img.close();
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1230 %! verify_data (filename, data, [10, 10, 3]);
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1231 %! endfunction
828b7cc9aa36 Tiff write: added support for BiLevel stripped images and added unit tests magedrifaat <magedrifaat@gmail.com> parents: 31153 diff changeset	1232 %! file_wrapper (@test_fn);
31156 1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1233
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1234 ## test write method tiled BiLevel image
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1235 %!testif HAVE_TIFF
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1236 %! function test_fn (filename)
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1237 %! img = Tiff (filename, "w");
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1238 %! setTag(img, struct ("ImageLength", 40, "ImageWidth", 40,
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1239 %! "TileWidth", 16, "TileLength", 16));
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1240 %! data = logical (repmat ([1,0,0,0,1,0,1,1,1,0], [40, 4]));
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1241 %! write (img, data);
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1242 %! img.close();
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1243 %! verify_data (filename, data, [40, 40]);
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1244 %! endfunction
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1245 %! file_wrapper (@test_fn);
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1246
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1247 ## test write method tiled grayscale image
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1248 %!testif HAVE_TIFF
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1249 %! function test_fn (filename)
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1250 %! img = Tiff (filename, "w");
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1251 %! setTag(img, struct ("ImageLength", 40, "ImageWidth", 40,
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1252 %! "TileWidth", 16, "TileLength", 16,
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1253 %! "BitsPerSample", 16));
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1254 %! data = uint16 (reshape (1:1600, [40, 40]));
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1255 %! write (img, data);
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1256 %! img.close();
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1257 %! verify_data (filename, data, [40, 40]);
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1258 %! endfunction
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1259 %! file_wrapper (@test_fn);
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1260
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1261 ## test write method tiled RGB image chunky
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1262 %!testif HAVE_TIFF
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1263 %! function test_fn (filename)
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1264 %! img = Tiff (filename, "w");
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1265 %! setTag(img, struct ("ImageLength", 40, "ImageWidth", 40,
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1266 %! "TileWidth", 16, "TileLength", 16,
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1267 %! "BitsPerSample", 16, "SamplesPerPixel", 3,
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1268 %! "PhotometricInterpretation", 2,
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1269 %! "PlanarConfiguration", 1));
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1270 %! data = uint16 (reshape (1:4800, [40, 40, 3]));
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1271 %! write (img, data);
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1272 %! img.close();
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1273 %! verify_data (filename, data, [40, 40, 3]);
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1274 %! endfunction
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1275 %! file_wrapper (@test_fn);
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1276
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1277 ## test write method tiled RGB image separate
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1278 %!testif HAVE_TIFF
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1279 %! function test_fn (filename)
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1280 %! img = Tiff (filename, "w");
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1281 %! setTag(img, struct ("ImageLength", 40, "ImageWidth", 40,
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1282 %! "TileWidth", 16, "TileLength", 16,
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1283 %! "BitsPerSample", 16, "SamplesPerPixel", 3,
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1284 %! "PhotometricInterpretation", 2,
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1285 %! "PlanarConfiguration", 2));
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1286 %! data = uint16 (reshape (1:4800, [40, 40, 3]));
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1287 %! write (img, data);
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1288 %! img.close();
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1289 %! verify_data (filename, data, [40, 40, 3]);
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1290 %! endfunction
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1291 %! file_wrapper (@test_fn);
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1292
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1293 ## test write method 32-bit tiled image
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1294 %!testif HAVE_TIFF
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1295 %! function test_fn (filename)
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1296 %! img = Tiff (filename, "w");
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1297 %! setTag(img, struct ("ImageLength", 40, "ImageWidth", 40,
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1298 %! "TileWidth", 16, "TileLength", 16,
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1299 %! "BitsPerSample", 32, "SamplesPerPixel", 3,
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1300 %! "PhotometricInterpretation", 2,
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1301 %! "PlanarConfiguration", 1));
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1302 %! data = uint32 (reshape (1:4800, [40, 40, 3]));
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1303 %! write (img, data);
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1304 %! img.close();
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1305 %! verify_data (filename, data, [40, 40, 3]);
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1306 %! endfunction
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1307 %! file_wrapper (@test_fn);
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1308
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1309 ## test write method single-precision tiled image
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1310 %!testif HAVE_TIFF
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1311 %! function test_fn (filename)
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1312 %! img = Tiff (filename, "w");
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1313 %! setTag(img, struct ("ImageLength", 40, "ImageWidth", 40,
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1314 %! "TileWidth", 16, "TileLength", 16,
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1315 %! "BitsPerSample", 32, "SamplesPerPixel", 3,
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1316 %! "PhotometricInterpretation", 2,
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1317 %! "PlanarConfiguration", 1, "SampleFormat", 3));
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1318 %! data = single (reshape (1:4800, [40, 40, 3]));
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1319 %! write (img, data);
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1320 %! img.close();
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1321 %! verify_data (filename, data, [40, 40, 3]);
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1322 %! endfunction
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1323 %! file_wrapper (@test_fn);
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1324
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1325 ## test write method double-precision tiled image
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1326 %!testif HAVE_TIFF
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1327 %! function test_fn (filename)
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1328 %! img = Tiff (filename, "w");
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1329 %! setTag(img, struct ("ImageLength", 40, "ImageWidth", 40,
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1330 %! "TileWidth", 16, "TileLength", 16,
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1331 %! "BitsPerSample", 64, "SamplesPerPixel", 3,
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1332 %! "PhotometricInterpretation", 2,
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1333 %! "PlanarConfiguration", 1, "SampleFormat", 3));
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1334 %! data = double (reshape (1:4800, [40, 40, 3]));
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1335 %! write (img, data);
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1336 %! img.close();
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1337 %! verify_data (filename, data, [40, 40, 3]);
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1338 %! endfunction
1e633a093faa Tiff write: added support for logical tile images and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31154 diff changeset	1339 %! file_wrapper (@test_fn);
31157 dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	1340
31158 f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1341 ## test readEncodedStrip BiLevel image
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1342 %!testif HAVE_TIFF
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1343 %! function test_fn (filename)
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1344 %! img = Tiff (filename, "w");
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1345 %! setTag(img, struct ("ImageLength", 10, "ImageWidth", 10,
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1346 %! "RowsPerStrip", 6));
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1347 %! data = logical (repmat ([1,0,0,0,1,0,1,1,1,0], [10, 1]));
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1348 %! write (img, data);
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1349 %! s1 = readEncodedStrip (img, 1);
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1350 %! s2 = readEncodedStrip (img, 2);
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1351 %! assert ([s1;s2], data);
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1352 %! img.close();
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1353 %! endfunction
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1354 %! file_wrapper (@test_fn);
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1355
31157 dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	1356 ## test readEncodedStrip RGB Chunky
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	1357 %!testif HAVE_TIFF
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	1358 %! function test_fn (filename)
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	1359 %! img = Tiff (filename, "w");
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	1360 %! setTag(img, struct ("ImageLength", 10, "ImageWidth", 10,
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	1361 %! "BitsPerSample", 16, "SamplesPerPixel", 3,
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	1362 %! "PhotometricInterpretation", 2, "RowsPerStrip", 6,
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	1363 %! "PlanarConfiguration", 1));
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	1364 %! data = uint16 (reshape (1:300, [10, 10, 3]));
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	1365 %! write (img, data);
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	1366 %! s1 = readEncodedStrip (img, 1);
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	1367 %! s2 = readEncodedStrip (img, 2);
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	1368 %! assert ([s1;s2], data);
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	1369 %! img.close();
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	1370 %! endfunction
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	1371 %! file_wrapper (@test_fn);
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	1372
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	1373 ## test readEncodedStrip RGB Separated
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	1374 %!testif HAVE_TIFF
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	1375 %! function test_fn (filename)
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	1376 %! img = Tiff (filename, "w");
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	1377 %! setTag(img, struct ("ImageLength", 10, "ImageWidth", 10,
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	1378 %! "BitsPerSample", 16, "SamplesPerPixel", 3,
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	1379 %! "PhotometricInterpretation", 2, "RowsPerStrip", 6,
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	1380 %! "PlanarConfiguration", 2));
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	1381 %! data = uint16 (reshape (1:300, [10, 10, 3]));
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	1382 %! write (img, data);
31158 f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1383 %! s = cell (6, 1);
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1384 %! for i=1:6
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1385 %! s{i} = readEncodedStrip (img, i);
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1386 %! endfor
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1387 %! data2 = cat (3, [s{1}; s{2}], [s{3}; s{4}], [s{5}; s{6}]);
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1388 %! assert (data2, data);
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1389 %! img.close();
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1390 %! endfunction
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1391 %! file_wrapper (@test_fn);
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1392
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1393 ## test readEncodedTile BiLevel image
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1394 %!testif HAVE_TIFF
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1395 %! function test_fn (filename)
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1396 %! img = Tiff (filename, "w");
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1397 %! setTag(img, struct ("ImageLength", 40, "ImageWidth", 40,
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1398 %! "TileWidth", 16, "TileLength", 16));
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1399 %! data = logical (repmat ([1,0,0,0,1,0,1,1,1,0], [40, 4]));
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1400 %! write (img, data);
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1401 %! t = cell (9, 1);
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1402 %! for i=1:9
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1403 %! t{i} = readEncodedTile (img, i);
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1404 %! endfor
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1405 %! data2 = cat(1, cat (2, t{1}, t{2}, t{3}), cat (2, t{4}, t{5}, t{6}),
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1406 %! cat (2, t{7}, t{8}, t{9}));
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1407 %! assert (data2, data);
31157 dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	1408 %! img.close();
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	1409 %! endfunction
dc3d2744916d Tiff: added readEncodedStrip method and corresponding unit tests magedrifaat <magedrifaat@gmail.com> parents: 31156 diff changeset	1410 %! file_wrapper (@test_fn);
31158 f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1411
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1412 ## test readEncodedTile RGB Chunky
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1413 %!testif HAVE_TIFF
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1414 %! function test_fn (filename)
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1415 %! img = Tiff (filename, "w");
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1416 %! setTag(img, struct ("ImageLength", 40, "ImageWidth", 40,
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1417 %! "TileWidth", 16, "TileLength", 16,
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1418 %! "BitsPerSample", 16, "SamplesPerPixel", 3,
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1419 %! "PhotometricInterpretation", 2,
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1420 %! "PlanarConfiguration", 1));
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1421 %! data = uint16 (reshape (1:4800, [40, 40, 3]));
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1422 %! write (img, data);
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1423 %! t = cell (9, 1);
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1424 %! for i=1:9
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1425 %! t{i} = readEncodedTile (img, i);
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1426 %! endfor
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1427 %! data2 = cat(1, cat (2, t{1}, t{2}, t{3}), cat (2, t{4}, t{5}, t{6}),
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1428 %! cat (2, t{7}, t{8}, t{9}));
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1429 %! assert (data2, data);
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1430 %! img.close();
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1431 %! endfunction
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1432 %! file_wrapper (@test_fn);
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1433
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1434 ## test readEncodedTile RGB Separated
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1435 %!testif HAVE_TIFF
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1436 %! function test_fn (filename)
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1437 %! img = Tiff (filename, "w");
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1438 %! setTag(img, struct ("ImageLength", 40, "ImageWidth", 40,
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1439 %! "TileWidth", 16, "TileLength", 16,
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1440 %! "BitsPerSample", 16, "SamplesPerPixel", 3,
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1441 %! "PhotometricInterpretation", 2,
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1442 %! "PlanarConfiguration", 2));
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1443 %! data = uint16 (reshape (1:4800, [40, 40, 3]));
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1444 %! write (img, data);
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1445 %! data2 = uint16 (zeros (40, 40, 3));
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1446 %! tile = 1;
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1447 %! for sample=1:3
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1448 %! for row=1:16:40
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1449 %! for col=1:16:40
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1450 %! data2(row: min(40, row + 15), col: min(40, col + 15), sample)...
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1451 %! = readEncodedTile(img, tile);
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1452 %! tile += 1;
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1453 %! endfor
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1454 %! endfor
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1455 %! endfor
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1456 %! assert (data2, data);
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1457 %! img.close();
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1458 %! endfunction
f2ae7763739a Tiff: added writeEncodedTile method to read tiles from image magedrifaat <magedrifaat@gmail.com> parents: 31157 diff changeset	1459 %! file_wrapper (@test_fn);
31170 72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1460
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1461 ## test readRGBAImage
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1462 %!testif HAVE_TIFF
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1463 %! function test_fn (filename)
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1464 %! img = Tiff (filename, "w");
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1465 %! setTag(img, struct (
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1466 %! "ImageLength", 10, "ImageWidth", 10,
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1467 %! "BitsPerSample", 8, "SamplesPerPixel", 3,
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1468 %! "PhotometricInterpretation", 2,
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1469 %! "PlanarConfiguration", 1
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1470 %! ));
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1471 %! data = uint8 (reshape (1:300, [10, 10, 3]));
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1472 %! write (img, data);
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1473 %! [rgb, alpha] = readRGBAImage (img);
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1474 %! assert (rgb, data);
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1475 %! assert (alpha, uint8 (repmat ([255], [10, 10])));
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1476 %! endfunction
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1477 %! file_wrapper (@test_fn);
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1478
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1479 ## test readRGBAImage with alpha
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1480 %!testif HAVE_TIFF
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1481 %! function test_fn (filename)
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1482 %! img = Tiff (filename, "w");
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1483 %! setTag(img, struct (
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1484 %! "ImageLength", 10, "ImageWidth", 10,
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1485 %! "BitsPerSample", 8, "SamplesPerPixel", 4,
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1486 %! "PhotometricInterpretation", 2,
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1487 %! "PlanarConfiguration", 1,
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1488 %! "ExtraSamples", 1
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1489 %! ));
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1490 %! data = uint8 (randi ([0,255], [10, 10, 4]));
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1491 %! write (img, data);
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1492 %! [rgb, alpha] = readRGBAImage (img);
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1493 %! assert (rgb, data(:,:,1:3));
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1494 %! assert (alpha, data(:,:,4));
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1495 %! endfunction
72a159bc5a4c Tiff: added readRGBAImage method to read image using the RGBA interface magedrifaat <magedrifaat@gmail.com> parents: 31169 diff changeset	1496 %! file_wrapper (@test_fn);

Mercurial > octave-libtiff

annotate scripts/io/Tiff.m @ 31170:72a159bc5a4c