octave-nkf: scripts/image/imread.m annotate

annotate scripts/image/imread.m @ 20373:a7770c66cb3d

Saturated red channel on RGB image, makes imread() return logical (bug #41584) * libinterp/dldfcn/__magick_read__.cc (get_depth): this function tries to second guess GM when reporting the actual bitdepth of an image in the file (see comments for full discussion). We assumed we could check only red from RGB but if the channel was saturated, it would return depth of 1, so we really need to check all 3 channels. Unfortunately, 3 saturated channels may still lead to images incorrectly read as logical. * scripts/image/imread.m: add test for this bug.

author	Carnë Draug <carandraug@octave.org>
date	Fri, 10 Jul 2015 16:46:24 +0100
parents	7503499a252b
children

rev	line source
19731 4197fc428c7d maint: Update copyright notices for 2015. John W. Eaton <jwe@octave.org> parents: 19312 diff changeset	1 ## Copyright (C) 2013-2015 Carnë Draug
4197fc428c7d maint: Update copyright notices for 2015. John W. Eaton <jwe@octave.org> parents: 19312 diff changeset	2 ## Copyright (C) 2008-2015 Thomas L. Scofield
16768 e2de3c8882be copyright notice fixes John W. Eaton <jwe@octave.org> parents: 14363 diff changeset	3 ## Copyright (C) 2008 Kristian Rumberg
e2de3c8882be copyright notice fixes John W. Eaton <jwe@octave.org> parents: 14363 diff changeset	4 ## Copyright (C) 2006 Thomas Weber
e2de3c8882be copyright notice fixes John W. Eaton <jwe@octave.org> parents: 14363 diff changeset	5 ## Copyright (C) 2005 Stefan van der Walt
8920 eb63fbe60fab update copyright notices John W. Eaton <jwe@octave.org> parents: 8664 diff changeset	6 ## Copyright (C) 2002 Andy Adler
7925 9316b59903c9 Add original imread() files (from octave-forge) to core octave. Thomas L. Scofield <scofield AT calvin DOT edu> parents: diff changeset	7 ##
9316b59903c9 Add original imread() files (from octave-forge) to core octave. Thomas L. Scofield <scofield AT calvin DOT edu> parents: diff changeset	8 ## This file is part of Octave.
9316b59903c9 Add original imread() files (from octave-forge) to core octave. Thomas L. Scofield <scofield AT calvin DOT edu> parents: diff changeset	9 ##
9316b59903c9 Add original imread() files (from octave-forge) to core octave. Thomas L. Scofield <scofield AT calvin DOT edu> parents: diff changeset	10 ## Octave is free software; you can redistribute it and/or modify it
9316b59903c9 Add original imread() files (from octave-forge) to core octave. Thomas L. Scofield <scofield AT calvin DOT edu> parents: diff changeset	11 ## under the terms of the GNU General Public License as published by
9316b59903c9 Add original imread() files (from octave-forge) to core octave. Thomas L. Scofield <scofield AT calvin DOT edu> parents: diff changeset	12 ## the Free Software Foundation; either version 3 of the License, or (at
9316b59903c9 Add original imread() files (from octave-forge) to core octave. Thomas L. Scofield <scofield AT calvin DOT edu> parents: diff changeset	13 ## your option) any later version.
9316b59903c9 Add original imread() files (from octave-forge) to core octave. Thomas L. Scofield <scofield AT calvin DOT edu> parents: diff changeset	14 ##
9316b59903c9 Add original imread() files (from octave-forge) to core octave. Thomas L. Scofield <scofield AT calvin DOT edu> parents: diff changeset	15 ## Octave is distributed in the hope that it will be useful, but
9316b59903c9 Add original imread() files (from octave-forge) to core octave. Thomas L. Scofield <scofield AT calvin DOT edu> parents: diff changeset	16 ## WITHOUT ANY WARRANTY; without even the implied warranty of
9316b59903c9 Add original imread() files (from octave-forge) to core octave. Thomas L. Scofield <scofield AT calvin DOT edu> parents: diff changeset	17 ## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
9316b59903c9 Add original imread() files (from octave-forge) to core octave. Thomas L. Scofield <scofield AT calvin DOT edu> parents: diff changeset	18 ## General Public License for more details.
9316b59903c9 Add original imread() files (from octave-forge) to core octave. Thomas L. Scofield <scofield AT calvin DOT edu> parents: diff changeset	19 ##
9316b59903c9 Add original imread() files (from octave-forge) to core octave. Thomas L. Scofield <scofield AT calvin DOT edu> parents: diff changeset	20 ## You should have received a copy of the GNU General Public License
9316b59903c9 Add original imread() files (from octave-forge) to core octave. Thomas L. Scofield <scofield AT calvin DOT edu> parents: diff changeset	21 ## along with Octave; see the file COPYING. If not, see
9316b59903c9 Add original imread() files (from octave-forge) to core octave. Thomas L. Scofield <scofield AT calvin DOT edu> parents: diff changeset	22 ## <http://www.gnu.org/licenses/>.
9316b59903c9 Add original imread() files (from octave-forge) to core octave. Thomas L. Scofield <scofield AT calvin DOT edu> parents: diff changeset	23
9316b59903c9 Add original imread() files (from octave-forge) to core octave. Thomas L. Scofield <scofield AT calvin DOT edu> parents: diff changeset	24 ## -- texinfo --
16944 1b3b3ee88284 Add optional extension argument to image IO functions. Carnë Draug <carandraug@octave.org> parents: 16913 diff changeset	25 ## @deftypefn {Function File} {[@var{img}, @var{map}, @var{alpha}] =} imread (@var{filename})
1b3b3ee88284 Add optional extension argument to image IO functions. Carnë Draug <carandraug@octave.org> parents: 16913 diff changeset	26 ## @deftypefnx {Function File} {[@dots{}] =} imread (@var{url})
18298 15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	27 ## @deftypefnx {Function File} {[@dots{}] =} imread (@dots{}, @var{ext})
16962 fb940d48c6f7 doc: document index argument for reading multipage images. Carnë Draug <carandraug@octave.org> parents: 16944 diff changeset	28 ## @deftypefnx {Function File} {[@dots{}] =} imread (@dots{}, @var{idx})
16984 997efb8d0b19 imread: implement options Index, Frames, and Info. Carnë Draug <carandraug@octave.org> parents: 16967 diff changeset	29 ## @deftypefnx {Function File} {[@dots{}] =} imread (@dots{}, @var{param1}, @var{val1}, @dots{})
7925 9316b59903c9 Add original imread() files (from octave-forge) to core octave. Thomas L. Scofield <scofield AT calvin DOT edu> parents: diff changeset	30 ## Read images from various file formats.
9316b59903c9 Add original imread() files (from octave-forge) to core octave. Thomas L. Scofield <scofield AT calvin DOT edu> parents: diff changeset	31 ##
20193 7503499a252b doc: Update docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19867 diff changeset	32 ## Read an image as a matrix from the file @var{filename}. If there is no file
7503499a252b doc: Update docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19867 diff changeset	33 ## @var{filename}, and @var{ext} was specified, it will look for a file with
7503499a252b doc: Update docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19867 diff changeset	34 ## the extension @var{ext}. Finally, it will attempt to download and read an
7503499a252b doc: Update docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19867 diff changeset	35 ## image from @var{url}.
16944 1b3b3ee88284 Add optional extension argument to image IO functions. Carnë Draug <carandraug@octave.org> parents: 16913 diff changeset	36 ##
20193 7503499a252b doc: Update docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19867 diff changeset	37 ## The size and class of the output depends on the format of the image. A
7503499a252b doc: Update docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19867 diff changeset	38 ## color image is returned as an @nospell{MxNx3} matrix. Gray-level and
7503499a252b doc: Update docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19867 diff changeset	39 ## black-and-white images are of size @nospell{MxN}. Multipage images will
7503499a252b doc: Update docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19867 diff changeset	40 ## have an additional 4th dimension.
17350 ba79ba4e83ab Rewrite of imfinfo. Carnë Draug <carandraug@octave.org> parents: 17338 diff changeset	41 ##
20193 7503499a252b doc: Update docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19867 diff changeset	42 ## The bit depth of the image determines the class of the output:
7503499a252b doc: Update docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19867 diff changeset	43 ## @qcode{"uint8"}, @qcode{"uint16"} or @qcode{"single"} for gray and color,
7503499a252b doc: Update docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19867 diff changeset	44 ## and @qcode{"logical"} for black and white. Note that indexed images always
7503499a252b doc: Update docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19867 diff changeset	45 ## return the indexes for a colormap, independent if @var{map} is a requested
7503499a252b doc: Update docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19867 diff changeset	46 ## output. To obtain the actual RGB image, use @code{ind2rgb}. When more
7503499a252b doc: Update docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19867 diff changeset	47 ## than one indexed image is being read, @var{map} is obtained from the
7503499a252b doc: Update docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19867 diff changeset	48 ## first. In some rare cases this may be incorrect and @code{imfinfo} can be
7503499a252b doc: Update docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19867 diff changeset	49 ## used to obtain the colormap of each image.
17350 ba79ba4e83ab Rewrite of imfinfo. Carnë Draug <carandraug@octave.org> parents: 17338 diff changeset	50 ##
16962 fb940d48c6f7 doc: document index argument for reading multipage images. Carnë Draug <carandraug@octave.org> parents: 16944 diff changeset	51 ## See the Octave manual for more information in representing images.
fb940d48c6f7 doc: document index argument for reading multipage images. Carnë Draug <carandraug@octave.org> parents: 16944 diff changeset	52 ##
20193 7503499a252b doc: Update docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19867 diff changeset	53 ## Some file formats, such as TIFF and GIF, are able to store multiple images
7503499a252b doc: Update docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19867 diff changeset	54 ## in a single file. @var{idx} can be a scalar or vector specifying the
7503499a252b doc: Update docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19867 diff changeset	55 ## index of the images to read. By default, Octave will only read the first
7503499a252b doc: Update docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19867 diff changeset	56 ## page.
8148 213dd524f96b Improve documentation for image I/O. sh@sh-laptop parents: 7931 diff changeset	57 ##
20193 7503499a252b doc: Update docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19867 diff changeset	58 ## Depending on the file format, it is possible to configure the reading of
7503499a252b doc: Update docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19867 diff changeset	59 ## images with @var{param}, @var{val} pairs. The following options are
7503499a252b doc: Update docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19867 diff changeset	60 ## supported:
16984 997efb8d0b19 imread: implement options Index, Frames, and Info. Carnë Draug <carandraug@octave.org> parents: 16967 diff changeset	61 ##
16996 a1d091243d11 Read alpha values from indexed images. Always read indexes from indexed images. Carnë Draug <carandraug@octave.org> parents: 16984 diff changeset	62 ## @table @samp
17281 bc924baa2c4e doc: Add new @qcode macro for code samples which are quoted. Rik <rik@octave.org> parents: 17171 diff changeset	63 ## @item @qcode{"Frames"} or @qcode{"Index"}
16984 997efb8d0b19 imread: implement options Index, Frames, and Info. Carnë Draug <carandraug@octave.org> parents: 16967 diff changeset	64 ## This is an alternative method to specify @var{idx}. When specifying it
17281 bc924baa2c4e doc: Add new @qcode macro for code samples which are quoted. Rik <rik@octave.org> parents: 17171 diff changeset	65 ## in this way, its value can also be the string @qcode{"all"}.
16984 997efb8d0b19 imread: implement options Index, Frames, and Info. Carnë Draug <carandraug@octave.org> parents: 16967 diff changeset	66 ##
17281 bc924baa2c4e doc: Add new @qcode macro for code samples which are quoted. Rik <rik@octave.org> parents: 17171 diff changeset	67 ## @item @qcode{"Info"}
17170 d6499c14021c doc: Periodic grammarcheck of documentation. Rik <rik@octave.org> parents: 17118 diff changeset	68 ## This option exists for @sc{matlab} compatibility and has no effect. For
20193 7503499a252b doc: Update docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19867 diff changeset	69 ## maximum performance while reading multiple images from a single file, use
7503499a252b doc: Update docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19867 diff changeset	70 ## the Index option.
17118 c97a26408ee0 Implement PixelRegion option for imread(). Carnë Draug <carandraug@octave.org> parents: 17086 diff changeset	71 ##
17281 bc924baa2c4e doc: Add new @qcode macro for code samples which are quoted. Rik <rik@octave.org> parents: 17171 diff changeset	72 ## @item @qcode{"PixelRegion"}
20193 7503499a252b doc: Update docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19867 diff changeset	73 ## Controls the image region that is read. Takes as value a cell array with
7503499a252b doc: Update docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19867 diff changeset	74 ## two arrays of 3 elements @code{@{@var{rows} @var{cols}@}}. The elements
7503499a252b doc: Update docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19867 diff changeset	75 ## in the array are the start, increment and end pixel to be read. If the
7503499a252b doc: Update docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19867 diff changeset	76 ## increment value is omitted, defaults to 1. For example, the following are
7503499a252b doc: Update docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19867 diff changeset	77 ## all equivalent:
18649 1b6f5917ae4b imread.m: expand documentation and add tests for the PixelRegion option. Carnë Draug <carandraug@octave.org> parents: 18298 diff changeset	78 ##
1b6f5917ae4b imread.m: expand documentation and add tests for the PixelRegion option. Carnë Draug <carandraug@octave.org> parents: 18298 diff changeset	79 ## @example
1b6f5917ae4b imread.m: expand documentation and add tests for the PixelRegion option. Carnë Draug <carandraug@octave.org> parents: 18298 diff changeset	80 ## @group
1b6f5917ae4b imread.m: expand documentation and add tests for the PixelRegion option. Carnë Draug <carandraug@octave.org> parents: 18298 diff changeset	81 ## imread (filename, "PixelRegion", @{[200 600] [300 700]@});
1b6f5917ae4b imread.m: expand documentation and add tests for the PixelRegion option. Carnë Draug <carandraug@octave.org> parents: 18298 diff changeset	82 ## imread (filename, "PixelRegion", @{[200 1 600] [300 1 700]@});
1b6f5917ae4b imread.m: expand documentation and add tests for the PixelRegion option. Carnë Draug <carandraug@octave.org> parents: 18298 diff changeset	83 ## imread (filename)(200:600, 300:700);
1b6f5917ae4b imread.m: expand documentation and add tests for the PixelRegion option. Carnë Draug <carandraug@octave.org> parents: 18298 diff changeset	84 ## @end group
1b6f5917ae4b imread.m: expand documentation and add tests for the PixelRegion option. Carnë Draug <carandraug@octave.org> parents: 18298 diff changeset	85 ## @end example
1b6f5917ae4b imread.m: expand documentation and add tests for the PixelRegion option. Carnë Draug <carandraug@octave.org> parents: 18298 diff changeset	86 ##
16984 997efb8d0b19 imread: implement options Index, Frames, and Info. Carnë Draug <carandraug@octave.org> parents: 16967 diff changeset	87 ## @end table
997efb8d0b19 imread: implement options Index, Frames, and Info. Carnë Draug <carandraug@octave.org> parents: 16967 diff changeset	88 ##
16944 1b3b3ee88284 Add optional extension argument to image IO functions. Carnë Draug <carandraug@octave.org> parents: 16913 diff changeset	89 ## @seealso{imwrite, imfinfo, imformats}
7925 9316b59903c9 Add original imread() files (from octave-forge) to core octave. Thomas L. Scofield <scofield AT calvin DOT edu> parents: diff changeset	90 ## @end deftypefn
9316b59903c9 Add original imread() files (from octave-forge) to core octave. Thomas L. Scofield <scofield AT calvin DOT edu> parents: diff changeset	91
16984 997efb8d0b19 imread: implement options Index, Frames, and Info. Carnë Draug <carandraug@octave.org> parents: 16967 diff changeset	92 ## Author: Carnë Draug <carandraug@octave.org>
16944 1b3b3ee88284 Add optional extension argument to image IO functions. Carnë Draug <carandraug@octave.org> parents: 16913 diff changeset	93 ## Author: Thomas L. Scofield <scofield@calvin.edu>
1b3b3ee88284 Add optional extension argument to image IO functions. Carnë Draug <carandraug@octave.org> parents: 16913 diff changeset	94 ## Author: Kristian Rumberg <kristianrumberg@gmail.com>
1b3b3ee88284 Add optional extension argument to image IO functions. Carnë Draug <carandraug@octave.org> parents: 16913 diff changeset	95 ## Author: Thomas Weber <thomas.weber.mail@gmail.com>
1b3b3ee88284 Add optional extension argument to image IO functions. Carnë Draug <carandraug@octave.org> parents: 16913 diff changeset	96 ## Author: Stefan van der Walt <stefan@sun.ac.za>
1b3b3ee88284 Add optional extension argument to image IO functions. Carnë Draug <carandraug@octave.org> parents: 16913 diff changeset	97 ## Author: Andy Adler
1b3b3ee88284 Add optional extension argument to image IO functions. Carnë Draug <carandraug@octave.org> parents: 16913 diff changeset	98
18298 15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	99 function [img, varargout] = imread (filename, varargin)
7925 9316b59903c9 Add original imread() files (from octave-forge) to core octave. Thomas L. Scofield <scofield AT calvin DOT edu> parents: diff changeset	100 if (nargin < 1)
7931 de26beacb20f imread.m: simplify; loadimage.m: deprecate John W. Eaton <jwe@octave.org> parents: 7925 diff changeset	101 print_usage ();
18298 15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	102 elseif (! ischar (filename))
11472 1740012184f9 Use uppercase for variable names in error() strings to match Info documentation. Only m-files done. Rik <octave@nomad.inbox5.com> parents: 10791 diff changeset	103 error ("imread: FILENAME must be a string");
7925 9316b59903c9 Add original imread() files (from octave-forge) to core octave. Thomas L. Scofield <scofield AT calvin DOT edu> parents: diff changeset	104 endif
16944 1b3b3ee88284 Add optional extension argument to image IO functions. Carnë Draug <carandraug@octave.org> parents: 16913 diff changeset	105
19867 9fc020886ae9 maint: Clean up m-files to follow Octave coding conventions. Rik <rik@octave.org> parents: 19731 diff changeset	106 [img, varargout{1:nargout-1}] = ...
9fc020886ae9 maint: Clean up m-files to follow Octave coding conventions. Rik <rik@octave.org> parents: 19731 diff changeset	107 imageIO ("imread", @__imread__, "read", filename, varargin{:});
9fc020886ae9 maint: Clean up m-files to follow Octave coding conventions. Rik <rik@octave.org> parents: 19731 diff changeset	108
7925 9316b59903c9 Add original imread() files (from octave-forge) to core octave. Thomas L. Scofield <scofield AT calvin DOT edu> parents: diff changeset	109 endfunction
9382 ab563d2adc10 image/imread.m Test added. Alexander Mamonov <mamonov@gmail.com> parents: 9268 diff changeset	110
11587 c792872f8942 all script files: untabify and strip trailing whitespace John W. Eaton <jwe@octave.org> parents: 11523 diff changeset	111 %!testif HAVE_MAGICK
9382 ab563d2adc10 image/imread.m Test added. Alexander Mamonov <mamonov@gmail.com> parents: 9268 diff changeset	112 %! vpng = [ ...
ab563d2adc10 image/imread.m Test added. Alexander Mamonov <mamonov@gmail.com> parents: 9268 diff changeset	113 %! 137, 80, 78, 71, 13, 10, 26, 10, 0, 0, ...
ab563d2adc10 image/imread.m Test added. Alexander Mamonov <mamonov@gmail.com> parents: 9268 diff changeset	114 %! 0, 13, 73, 72, 68, 82, 0, 0, 0, 3, ...
ab563d2adc10 image/imread.m Test added. Alexander Mamonov <mamonov@gmail.com> parents: 9268 diff changeset	115 %! 0, 0, 0, 3, 8, 2, 0, 0, 0, 217, ...
ab563d2adc10 image/imread.m Test added. Alexander Mamonov <mamonov@gmail.com> parents: 9268 diff changeset	116 %! 74, 34, 232, 0, 0, 0, 1, 115, 82, 71, ...
ab563d2adc10 image/imread.m Test added. Alexander Mamonov <mamonov@gmail.com> parents: 9268 diff changeset	117 %! 66, 0, 174, 206, 28, 233, 0, 0, 0, 4, ...
ab563d2adc10 image/imread.m Test added. Alexander Mamonov <mamonov@gmail.com> parents: 9268 diff changeset	118 %! 103, 65, 77, 65, 0, 0, 177, 143, 11, 252, ...
ab563d2adc10 image/imread.m Test added. Alexander Mamonov <mamonov@gmail.com> parents: 9268 diff changeset	119 %! 97, 5, 0, 0, 0, 32, 99, 72, 82, 77, ...
ab563d2adc10 image/imread.m Test added. Alexander Mamonov <mamonov@gmail.com> parents: 9268 diff changeset	120 %! 0, 0, 122, 38, 0, 0, 128, 132, 0, 0, ...
ab563d2adc10 image/imread.m Test added. Alexander Mamonov <mamonov@gmail.com> parents: 9268 diff changeset	121 %! 250, 0, 0, 0, 128, 232, 0, 0, 117, 48, ...
ab563d2adc10 image/imread.m Test added. Alexander Mamonov <mamonov@gmail.com> parents: 9268 diff changeset	122 %! 0, 0, 234, 96, 0, 0, 58, 152, 0, 0, ...
ab563d2adc10 image/imread.m Test added. Alexander Mamonov <mamonov@gmail.com> parents: 9268 diff changeset	123 %! 23, 112, 156, 186, 81, 60, 0, 0, 0, 25, ...
ab563d2adc10 image/imread.m Test added. Alexander Mamonov <mamonov@gmail.com> parents: 9268 diff changeset	124 %! 73, 68, 65, 84, 24, 87, 99, 96, 96, 96, ...
ab563d2adc10 image/imread.m Test added. Alexander Mamonov <mamonov@gmail.com> parents: 9268 diff changeset	125 %! 248, 255, 255, 63, 144, 4, 81, 111, 101, 84, ...
ab563d2adc10 image/imread.m Test added. Alexander Mamonov <mamonov@gmail.com> parents: 9268 diff changeset	126 %! 16, 28, 160, 16, 0, 197, 214, 13, 34, 74, ...
ab563d2adc10 image/imread.m Test added. Alexander Mamonov <mamonov@gmail.com> parents: 9268 diff changeset	127 %! 117, 213, 17, 0, 0, 0, 0, 73, 69, 78, ...
ab563d2adc10 image/imread.m Test added. Alexander Mamonov <mamonov@gmail.com> parents: 9268 diff changeset	128 %! 68, 174, 66, 96, 130];
19312 6ca096827123 Use tempname() rather than tmpnam() in core Octave. Rik <rik@octave.org> parents: 18649 diff changeset	129 %! filename = [tempname() ".png"];
16967 52c1b832d98e imread: make sure test file is removed if imread() errors. Carnë Draug <carandraug@octave.org> parents: 16962 diff changeset	130 %! unwind_protect
52c1b832d98e imread: make sure test file is removed if imread() errors. Carnë Draug <carandraug@octave.org> parents: 16962 diff changeset	131 %! fid = fopen (filename, "wb");
52c1b832d98e imread: make sure test file is removed if imread() errors. Carnë Draug <carandraug@octave.org> parents: 16962 diff changeset	132 %! fwrite (fid, vpng);
52c1b832d98e imread: make sure test file is removed if imread() errors. Carnë Draug <carandraug@octave.org> parents: 16962 diff changeset	133 %! fclose (fid);
52c1b832d98e imread: make sure test file is removed if imread() errors. Carnë Draug <carandraug@octave.org> parents: 16962 diff changeset	134 %! A = imread (filename);
52c1b832d98e imread: make sure test file is removed if imread() errors. Carnë Draug <carandraug@octave.org> parents: 16962 diff changeset	135 %! unwind_protect_cleanup
52c1b832d98e imread: make sure test file is removed if imread() errors. Carnë Draug <carandraug@octave.org> parents: 16962 diff changeset	136 %! unlink (filename);
52c1b832d98e imread: make sure test file is removed if imread() errors. Carnë Draug <carandraug@octave.org> parents: 16962 diff changeset	137 %! end_unwind_protect
14363 f3d52523cde1 Use Octave coding conventions in all m-file %!test blocks Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	138 %! assert (A(:,:,1), uint8 ([0, 255, 0; 255, 237, 255; 0, 255, 0]));
f3d52523cde1 Use Octave coding conventions in all m-file %!test blocks Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	139 %! assert (A(:,:,2), uint8 ([0, 255, 0; 255, 28, 255; 0, 255, 0]));
f3d52523cde1 Use Octave coding conventions in all m-file %!test blocks Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	140 %! assert (A(:,:,3), uint8 ([0, 255, 0; 255, 36, 255; 0, 255, 0]));
f3d52523cde1 Use Octave coding conventions in all m-file %!test blocks Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	141
20373 a7770c66cb3d Saturated red channel on RGB image, makes imread() return logical (bug #41584) Carnë Draug <carandraug@octave.org> parents: 20193 diff changeset	142 %!function [r, cmap, a] = write_and_read (w, f_ext, varargin)
a7770c66cb3d Saturated red channel on RGB image, makes imread() return logical (bug #41584) Carnë Draug <carandraug@octave.org> parents: 20193 diff changeset	143 %! filename = [tempname() "." f_ext];
18649 1b6f5917ae4b imread.m: expand documentation and add tests for the PixelRegion option. Carnë Draug <carandraug@octave.org> parents: 18298 diff changeset	144 %! unwind_protect
1b6f5917ae4b imread.m: expand documentation and add tests for the PixelRegion option. Carnë Draug <carandraug@octave.org> parents: 18298 diff changeset	145 %! imwrite (w, filename);
1b6f5917ae4b imread.m: expand documentation and add tests for the PixelRegion option. Carnë Draug <carandraug@octave.org> parents: 18298 diff changeset	146 %! [r, cmap, a] = imread (filename, varargin{:});
1b6f5917ae4b imread.m: expand documentation and add tests for the PixelRegion option. Carnë Draug <carandraug@octave.org> parents: 18298 diff changeset	147 %! unwind_protect_cleanup
1b6f5917ae4b imread.m: expand documentation and add tests for the PixelRegion option. Carnë Draug <carandraug@octave.org> parents: 18298 diff changeset	148 %! unlink (filename);
1b6f5917ae4b imread.m: expand documentation and add tests for the PixelRegion option. Carnë Draug <carandraug@octave.org> parents: 18298 diff changeset	149 %! end_unwind_protect
1b6f5917ae4b imread.m: expand documentation and add tests for the PixelRegion option. Carnë Draug <carandraug@octave.org> parents: 18298 diff changeset	150 %!endfunction
1b6f5917ae4b imread.m: expand documentation and add tests for the PixelRegion option. Carnë Draug <carandraug@octave.org> parents: 18298 diff changeset	151
1b6f5917ae4b imread.m: expand documentation and add tests for the PixelRegion option. Carnë Draug <carandraug@octave.org> parents: 18298 diff changeset	152 ## test PixelRegion option
1b6f5917ae4b imread.m: expand documentation and add tests for the PixelRegion option. Carnë Draug <carandraug@octave.org> parents: 18298 diff changeset	153 %!testif HAVE_MAGICK
1b6f5917ae4b imread.m: expand documentation and add tests for the PixelRegion option. Carnë Draug <carandraug@octave.org> parents: 18298 diff changeset	154 %! w = randi (255, 100, 100, "uint8");
20373 a7770c66cb3d Saturated red channel on RGB image, makes imread() return logical (bug #41584) Carnë Draug <carandraug@octave.org> parents: 20193 diff changeset	155 %! [r, cmap, a] = write_and_read (w, "tif", "PixelRegion", {[50 70] [20 40]});
18649 1b6f5917ae4b imread.m: expand documentation and add tests for the PixelRegion option. Carnë Draug <carandraug@octave.org> parents: 18298 diff changeset	156 %! assert (r, w(50:70, 20:40))
20373 a7770c66cb3d Saturated red channel on RGB image, makes imread() return logical (bug #41584) Carnë Draug <carandraug@octave.org> parents: 20193 diff changeset	157 %! [r, cmap, a] = write_and_read (w, "tif", "PixelRegion", {[50 2 70] [20 3 40]});
18649 1b6f5917ae4b imread.m: expand documentation and add tests for the PixelRegion option. Carnë Draug <carandraug@octave.org> parents: 18298 diff changeset	158 %! assert (r, w(50:2:70, 20:3:40))
1b6f5917ae4b imread.m: expand documentation and add tests for the PixelRegion option. Carnë Draug <carandraug@octave.org> parents: 18298 diff changeset	159
18298 15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	160 ## If a file does not exist, it's the job of imread to check the file
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	161 ## exists before sending it over to __imread__ or whatever function
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	162 ## is defined in imformats to handle that specific format. This is the
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	163 ## same in imfinfo. So in this test we replace one format in imformats
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	164 ## with something that will not give an error if the file is missing
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	165 ## and make sure we do get an error.
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	166 %!testif HAVE_MAGICK
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	167 %! fmt = fmt_ori = imformats ("jpg");
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	168 %! fmt.read = @true;
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	169 %! error_thrown = false;
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	170 %! imformats ("update", "jpg", fmt);
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	171 %! unwind_protect
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	172 %! try
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	173 %! imread ("I sure hope this file does not exist.jpg");
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	174 %! catch
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	175 %! error_thrown = true;
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	176 %! end_try_catch
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	177 %! unwind_protect_cleanup
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	178 %! imformats ("update", "jpg", fmt_ori);
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	179 %! end_unwind_protect
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	180 %! assert (error_thrown, true);
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	181
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	182 ## make one of the formats read, return what it received as input to
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	183 ## confirm that the input parsing is working correcly
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	184 %!testif HAVE_MAGICK
19312 6ca096827123 Use tempname() rather than tmpnam() in core Octave. Rik <rik@octave.org> parents: 18649 diff changeset	185 %! fname = [tempname() ".jpg"];
18298 15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	186 %! def_fmt = imformats ();
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	187 %! fid = fopen (fname, "w");
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	188 %! unwind_protect
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	189 %! fmt = imformats ("jpg");
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	190 %! fmt.read = @(varargin) varargin;
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	191 %! imformats ("update", "jpg", fmt);
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	192 %! assert (imread (fname), {fname});
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	193 %! assert (imread (fname, "jpg"), {fname});
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	194 %! assert (imread (fname(1:end-4), "jpg"), {fname});
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	195 %! extra_inputs = {"some", 89, i, {6 7 8}};
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	196 %! assert (imread (fname, extra_inputs{:}), {fname, extra_inputs{:}});
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	197 %! assert (imread (fname, "jpg", extra_inputs{:}), {fname, extra_inputs{:}});
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	198 %! assert (imread (fname(1:end-4), "jpg", extra_inputs{:}), {fname, extra_inputs{:}});
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	199 %! unwind_protect_cleanup
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	200 %! fclose (fid);
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	201 %! unlink (fname);
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	202 %! imformats (def_fmt);
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	203 %! end_unwind_protect
15db54c4a572 Fix input parsing for imageIO functions and make imread accept URL (bug #41234) Carnë Draug <carandraug@octave.org> parents: 17744 diff changeset	204
20373 a7770c66cb3d Saturated red channel on RGB image, makes imread() return logical (bug #41584) Carnë Draug <carandraug@octave.org> parents: 20193 diff changeset	205 ## Test for bug #41584 (some GM coders report saturated channels as binary)
a7770c66cb3d Saturated red channel on RGB image, makes imread() return logical (bug #41584) Carnë Draug <carandraug@octave.org> parents: 20193 diff changeset	206 %!testif HAVE_MAGICK
a7770c66cb3d Saturated red channel on RGB image, makes imread() return logical (bug #41584) Carnë Draug <carandraug@octave.org> parents: 20193 diff changeset	207 %! im = zeros ([16 16 3], "uint8");
a7770c66cb3d Saturated red channel on RGB image, makes imread() return logical (bug #41584) Carnë Draug <carandraug@octave.org> parents: 20193 diff changeset	208 %! im(:,:,1) = 255;
a7770c66cb3d Saturated red channel on RGB image, makes imread() return logical (bug #41584) Carnë Draug <carandraug@octave.org> parents: 20193 diff changeset	209 %! im(:,:,3) = repmat (0:16:255, [16 1]);
a7770c66cb3d Saturated red channel on RGB image, makes imread() return logical (bug #41584) Carnë Draug <carandraug@octave.org> parents: 20193 diff changeset	210 %! [r, cmap, a] = write_and_read (im, "png");
a7770c66cb3d Saturated red channel on RGB image, makes imread() return logical (bug #41584) Carnë Draug <carandraug@octave.org> parents: 20193 diff changeset	211 %! assert (class (r), "uint8");
a7770c66cb3d Saturated red channel on RGB image, makes imread() return logical (bug #41584) Carnë Draug <carandraug@octave.org> parents: 20193 diff changeset	212 %! assert (isempty (cmap))
a7770c66cb3d Saturated red channel on RGB image, makes imread() return logical (bug #41584) Carnë Draug <carandraug@octave.org> parents: 20193 diff changeset	213 %! assert (isempty (a))

Mercurial > octave-nkf

annotate scripts/image/imread.m @ 20373:a7770c66cb3d