1#!/usr/bin/perl 2# Copyright 1999-2019 ImageMagick Studio LLC, a non-profit organization 3# dedicated to making software imaging solutions freely available. 4# 5# You may not use this file except in compliance with the License. You may 6# obtain a copy of the License at 7# 8# https://imagemagick.org/script/license.php 9# 10# Unless required by applicable law or agreed to in writing, software 11# distributed under the License is distributed on an "AS IS" BASIS, 12# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. 13# See the License for the specific language governing permissions and 14# limitations under the License. 15# 16# Test setting & getting attributes. 17# 18BEGIN { $| = 1; $test=1, print "1..71\n"; } 19END {print "not ok 1\n" unless $loaded;} 20use Image::Magick; 21$loaded=1; 22 23require 't/subroutines.pl'; 24 25chdir 't' || die 'Cd failed'; 26 27# Determine if QuantumMagick is defined 28$image=Image::Magick->new; 29my $depth = $image->Get('depth'); 30 31testSetAttribute('input.miff','adjoin','True'); 32 33++$test; 34testSetAttribute('input.miff','adjoin','False'); 35 36++$test; 37testSetAttribute('input.miff','antialias','True'); 38 39++$test; 40testSetAttribute('input.miff','antialias','False'); 41 42++$test; 43testSetAttribute('input.miff','compression','None'); 44 45++$test; 46testSetAttribute('input.miff','compression','JPEG'); 47 48++$test; 49testSetAttribute('input.miff','compression','LZW'); 50 51++$test; 52testSetAttribute('input.miff','compression','RLE'); 53 54++$test; 55testSetAttribute('input.miff','compression','Zip'); 56 57++$test; 58testSetAttribute('input.miff','density','72x72'); 59 60++$test; 61testSetAttribute('input.miff','dispose','Undefined'); 62 63++$test; 64testSetAttribute('input.miff','dispose','None'); 65 66++$test; 67testSetAttribute('input.miff','dispose','Background'); 68 69++$test; 70testSetAttribute('input.miff','dispose','Previous'); 71 72++$test; 73testSetAttribute('input.miff','delay',100); 74 75++$test; 76testSetAttribute('input.miff','dither','True'); 77 78++$test; 79testSetAttribute('input.miff','dither','False'); 80 81++$test; 82testSetAttribute('input.miff','display','bogus:0.0'); 83 84++$test; 85testSetAttribute('input.miff','filename','bogus.jpg'); 86 87++$test; 88testSetAttribute('input.miff','font',q/-*-helvetica-medium-r-*-*-12-*-*-*-*-*-iso8859-*/); 89 90++$test; 91testSetAttribute('input.miff','iterations',10); 92 93++$test; 94testSetAttribute('input.miff','interlace','None'); 95 96++$test; 97testSetAttribute('input.miff','interlace','Line'); 98 99++$test; 100testSetAttribute('input.miff','interlace','Plane'); 101 102++$test; 103testSetAttribute('input.miff','interlace','Partition'); 104 105++$test; 106testSetAttribute('input.miff','loop',100); 107 108++$test; 109testSetAttribute('input.miff','magick','TIFF'); 110 111++$test; 112testSetAttribute('input.miff','monochrome','True'); 113 114++$test; 115testSetAttribute('input.miff','monochrome','False'); 116 117++$test; 118testSetAttribute('input.miff','page','595x842+0+0'); 119 120++$test; 121testSetAttribute('input.miff','pointsize',12); 122 123++$test; 124testSetAttribute('input.miff','preview','Rotate'); 125 126++$test; 127testSetAttribute('input.miff','preview','Shear'); 128 129++$test; 130testSetAttribute('input.miff','preview','Roll'); 131 132++$test; 133testSetAttribute('input.miff','preview','Hue'); 134 135++$test; 136testSetAttribute('input.miff','preview','Saturation'); 137 138++$test; 139testSetAttribute('input.miff','preview','Brightness'); 140 141++$test; 142testSetAttribute('input.miff','preview','JPEG'); 143 144++$test; 145testSetAttribute('input.miff','preview','Spiff'); 146 147++$test; 148testSetAttribute('input.miff','preview','Dull'); 149 150++$test; 151testSetAttribute('input.miff','preview','Grayscale'); 152 153++$test; 154testSetAttribute('input.miff','preview','Quantize'); 155 156++$test; 157testSetAttribute('input.miff','preview','Despeckle'); 158 159++$test; 160testSetAttribute('input.miff','preview','ReduceNoise'); 161 162++$test; 163testSetAttribute('input.miff','preview','AddNoise'); 164 165++$test; 166testSetAttribute('input.miff','preview','Sharpen'); 167 168++$test; 169testSetAttribute('input.miff','preview','Blur'); 170 171++$test; 172testSetAttribute('input.miff','preview','Threshold'); 173 174++$test; 175testSetAttribute('input.miff','preview','EdgeDetect'); 176 177++$test; 178testSetAttribute('input.miff','preview','Spread'); 179 180++$test; 181testSetAttribute('input.miff','preview','Solarize'); 182 183++$test; 184testSetAttribute('input.miff','preview','Shade'); 185 186++$test; 187testSetAttribute('input.miff','preview','Raise'); 188 189++$test; 190testSetAttribute('input.miff','preview','Segment'); 191 192++$test; 193testSetAttribute('input.miff','preview','Solarize'); 194 195++$test; 196testSetAttribute('input.miff','preview','Swirl'); 197 198++$test; 199testSetAttribute('input.miff','preview','Implode'); 200 201++$test; 202testSetAttribute('input.miff','preview','Wave'); 203 204++$test; 205testSetAttribute('input.miff','preview','OilPaint'); 206 207++$test; 208testSetAttribute('input.miff','preview','Charcoal'); 209 210++$test; 211testSetAttribute('input.miff','quality',25); 212 213++$test; 214testSetAttribute('input.miff','scene',5); 215 216++$test; 217testSetAttribute('input.miff','subimage',9); 218 219++$test; 220testSetAttribute('input.miff','subrange',16); 221 222++$test; 223testSetAttribute('input.miff','server','mymachine:0.0'); 224 225++$test; 226testSetAttribute('input.miff','size','25x25'); 227 228++$test; 229testSetAttribute('input.miff','size','25x25'); 230 231# I have no idea what this does 232++$test; 233testSetAttribute('input.miff','tile','some value'); 234 235++$test; 236testSetAttribute('input.miff','texture','granite:'); 237 238++$test; 239testSetAttribute('input.miff','verbose','True'); 240 241++$test; 242testSetAttribute('input.miff','verbose','False'); 243 244