Imager::Test - common functions used in testing Imager
use Imager::Test 'diff_text_with_nul'; diff_text_with_nul($test_name, $text1, $text2, @string_options);
This is a repository of functions used in testing Imager.
Some functions will only be useful in testing Imager itself, while others should be useful in testing modules that use Imager.
No functions are exported by default.
Tests if the first channel of $color matches $grey.
Tests if $color matches the given ($red, $green, $blue)
Tests if $color matches the given ($red, $green, $blue, $alpha)
Tests if $fcolor's first channel is within $epsilon of ($grey). For the first form $epsilon is taken as 0.001.
Tests if $fcolor's channels are within $epsilon of ($red, $green, $blue). For the first form $epsilon is taken as 0.001.
Tests if $fcolor's channels are within $epsilon of ($red, $green, $blue, $alpha). For the first form $epsilon is taken as 0.001.
Tests if the 2 images have the same content. Both images must be defined, have the same width, height, channels and the same color in each pixel. The color comparison is done at 8-bits per pixel. The color representation such as direct vs paletted, bits per sample are not checked. Equivalent to is_image_similar($im1, $im2, 0, $comment).
Tests if the two images have the same content at the double/sample level. $epsilon defaults to the platform DBL_EPSILON multiplied by four.
Tests if the 2 images have similar content. Both images must be defined, have the same width, height and channels. The cum of the squares of the differences of each sample are calculated and must be less than or equal to $maxdiff for the test to pass. The color comparison is done at 8-bits per pixel. The color representation such as direct vs paletted, bits per sample are not checked.
Tests that the two images are different. For regressions tests where something (like text output of "0") produced no change, but should have produced a change.
Retrieves the pixel ($x,$y) from the low-level image $im and compares it to the floating point color $expected, with a tolerance of epsilon.
Retrieves the pixel ($x,$y) from the low-level image $im and compares it to the floating point color $expected.
Retrieves the floating point pixels ($x, $y)-[$x+@$pels, $y] from the low level image $im and compares them against @$pels.
Tests if $color's first three channels are within $tolerance of ($red, $green, $blue).
Functions that perform one or more tests, typically used to test various parts of Imager's implementation.
Attempts to write to various pixel positions outside the edge of the image to ensure that it fails in those locations.
Any new image type should pass these tests. Does 16 separate tests.
Perform a standard set of mask tests on the OO image $im. Does 24 separate tests.
Creates 2 test images and writes $text1 to the first image and $text2 to the second image with the string() method. Each call adds 3 ok/not ok to the output of the test script.
Extra options that should be supplied include the font and either a color or channel parameter.
This was explicitly created for regression tests on #21770.
Returns a 150x150x3 Imager::ImgRaw test image.
Returns a 150x150x3 8-bit/sample OO test image. Name: basic.
Returns a 150x150x3 16-bit/sample OO test image. Name: basic16
Returns a 150x150x3 double/sample OO test image. Name: basic_double.
Returns a 150x150 single channel OO test image. Name: gray.
Returns a 150x150 16-bit/sample single channel OO test image. Name: gray16.
Returns a 150x150 bilevel image that passes the is_bilevel() test. Name: mono.
Return one of the other test images above based on name.
Performs an ordering of 3-channel colors (like <=>).
Performs an ordering of 3-channel floating point colors (like <=>).
Tony Cook <tony@develop-help.com>