GIMP 1.1.1

system/gimp-1.1.1 - 07 September 2018 - Fix for GIMP 2.10.

downloads.xml

<?xml version="1.0"?>
<!--Phoronix Test Suite v8.2.0m3-->
<PhoronixTestSuite>
  <Downloads>
    <Package>
      <URL>http://www.phoronix-test-suite.com/benchmark-files/pts-sample-photos-2.tar.bz2, http://www.phoronix.net/downloads/phoronix-test-suite/benchmark-files/pts-sample-photos-2.tar.bz2</URL>
      <MD5>7ff2870cf3fa2299ea5f4e77e5a8535f</MD5>
      <SHA256>e8597d7d5910a709985bffae490dfa9490483eb7838b351191156f027d9b5272</SHA256>
      <FileName>pts-sample-photos-2.tar.bz2</FileName>
      <FileSize>29599729</FileSize>
    </Package>
    <Package>
      <URL>http://www.phoronix-test-suite.com/benchmark-files/stock-photos-jpeg-2018-1.tar.xz</URL>
      <MD5>26f41350aaa7a9f3eba3097d1ac21123</MD5>
      <SHA256>bcd2c8b7ecf9064fbf20ec8075650cbc06c0b4ce8f06db2676fac3258c459c23</SHA256>
      <FileName>stock-photos-jpeg-2018-1.tar.xz</FileName>
      <FileSize>35384500</FileSize>
    </Package>
    <Package>
      <URL>http://download.gimp.org/mirror/pub/gimp/v2.10/windows/gimp-2.10.0-x64-setup.exe, http://mirror.umd.edu/gimp/gimp/stable/windows/gimp-2.10.0-x64-setup.exe</URL>
      <MD5>ca990683d398cb85a0f6d970f183bf68</MD5>
      <SHA256>1babc967a37ad4692d0c2cfb76309c381bab0f4208077e9e2f38c8deec5e0a44</SHA256>
      <FileName>gimp-2.10.0-x64-setup.exe</FileName>
      <FileSize>132622918</FileSize>
      <PlatformSpecific>Windows</PlatformSpecific>
    </Package>
  </Downloads>
</PhoronixTestSuite>

install.sh

#!/bin/sh

if which gimp>/dev/null 2>&1 ;
then
	echo 0 > ~/install-exit-status
else
	echo "ERROR: gimp is not found on the system! This test profile needs a working GIMP installation in the PATH"
	echo 2 > ~/install-exit-status
fi

gimp -i -b '(gimp-quit 0)'

echo ";; Example from https://www.gimp.org/tutorials/Basic_Batch/

  (define (batch-unsharp-mask pattern
                              radius
                              amount
                              threshold)
  (let* ((filelist (cadr (file-glob pattern 1))))
    (while (not (null? filelist))
           (let* ((filename (car filelist))
                  (image (car (gimp-file-load RUN-NONINTERACTIVE
                                              filename filename)))
                  (drawable (car (gimp-image-get-active-layer image))))
             (plug-in-unsharp-mask RUN-NONINTERACTIVE
                                   image drawable radius amount threshold)
             (gimp-file-save RUN-NONINTERACTIVE
                             image drawable filename filename)
             (gimp-image-delete image))
           (set! filelist (cdr filelist)))))

;; Example from http://www.adp-gmbh.ch/misc/tools/script_fu/ex_09.html

  (define (batch-resize-image pattern
                              new-width
                              new-height)
  (let* ((filelist (cadr (file-glob pattern 1))))
    (while (not (null? filelist))
           (let* ((filename (car filelist))
                  (image (car (gimp-file-load RUN-NONINTERACTIVE
                                              filename filename)))
                  (drawable (car (gimp-image-get-active-layer image))))

             (gimp-image-scale image new-width new-height)
             (gimp-file-save RUN-NONINTERACTIVE
                             image drawable filename filename)
             (gimp-image-delete image))
           (set! filelist (cdr filelist)))))

;; http://photo.stackexchange.com/questions/63692/how-can-i-get-a-uniform-white-balance-on-a-batch-of-jpeg-images
(define (batch-auto-levels pattern)
(let* ((filelist (cadr (file-glob pattern 1))))
  (while (not (null? filelist))
         (let* ((filename (car filelist))
                (image (car (gimp-file-load RUN-NONINTERACTIVE
                                            filename filename)))
                (drawable (car (gimp-image-get-active-layer image))))
           (gimp-levels-stretch drawable)
           (gimp-file-save RUN-NONINTERACTIVE
                           image drawable filename filename)
           (gimp-image-delete image))
         (set! filelist (cdr filelist)))))

;; https://stackoverflow.com/questions/23554843/batch-rotate-files-with-gimp
  (define (batch-rotate pattern)
  (let* ((filelist (cadr (file-glob pattern 1))))
    (while (not (null? filelist))
           (let* ((filename (car filelist))
                  (image (car (gimp-file-load RUN-NONINTERACTIVE
                                              filename filename)))
                  (drawable (car (gimp-image-get-active-layer image))))

             (gimp-image-rotate image 0)

             (gimp-file-save RUN-NONINTERACTIVE
                             image drawable filename filename)
             (gimp-image-delete image))
           (set! filelist (cdr filelist)))))

" > bench.scm
mkdir .config/GIMP/2.10/scripts
cp -f *.scm .gimp-2.8/scripts/bench.scm
cp -f *.scm .gimp-2.9/scripts/bench.scm
cp -f *.scm .config/GIMP/2.10/scripts/bench.scm

cd ~
echo "#!/bin/sh
# when getting more tests, will need to separate the below -b command into conditional statement check whats passed to this script

case \"\$1\" in

\"unsharp-mask\")
	BATCH_COMMAND='(batch-unsharp-mask \"*.JPG\" 15.0 0.6 0)'
    ;;
\"resize\")
	BATCH_COMMAND='(batch-resize-image \"*.JPG\" 600 400)'
    ;;
\"rotate\")
	BATCH_COMMAND='(batch-rotate \"*.JPG\")'
    ;;
\"auto-levels\")
	BATCH_COMMAND='(batch-auto-levels \"*.JPG\")'
    ;;
*)
	echo 2 > ~/test-exit-status
	exit
   ;;
esac

gimp -i -b \"\$BATCH_COMMAND\" -b '(gimp-quit 0)' > \$LOG_FILE
echo \$? > ~/test-exit-status
gimp --version | head -n 1 | awk '{ print \$NF }' > ~/pts-test-version 2>/dev/null " > gimp
chmod +x gimp

install_windows.sh

#!/bin/sh

./gimp-2.9.8-x64-setup.exe /SILENT /DIR=gimp-install
cd gimp-install/bin
./gimp-2.9.exe -i -b '(gimp-quit 0)'

cd ~
echo ";; Example from https://www.gimp.org/tutorials/Basic_Batch/

  (define (batch-unsharp-mask pattern
                              radius
                              amount
                              threshold)
  (let* ((filelist (cadr (file-glob pattern 1))))
    (while (not (null? filelist))
           (let* ((filename (car filelist))
                  (image (car (gimp-file-load RUN-NONINTERACTIVE
                                              filename filename)))
                  (drawable (car (gimp-image-get-active-layer image))))
             (plug-in-unsharp-mask RUN-NONINTERACTIVE
                                   image drawable radius amount threshold)
             (gimp-file-save RUN-NONINTERACTIVE
                             image drawable filename filename)
             (gimp-image-delete image))
           (set! filelist (cdr filelist)))))

;; Example from http://www.adp-gmbh.ch/misc/tools/script_fu/ex_09.html

  (define (batch-resize-image pattern
                              new-width
                              new-height)
  (let* ((filelist (cadr (file-glob pattern 1))))
    (while (not (null? filelist))
           (let* ((filename (car filelist))
                  (image (car (gimp-file-load RUN-NONINTERACTIVE
                                              filename filename)))
                  (drawable (car (gimp-image-get-active-layer image))))
		
             (gimp-image-scale image new-width new-height)
             (gimp-file-save RUN-NONINTERACTIVE
                             image drawable filename filename)
             (gimp-image-delete image))
           (set! filelist (cdr filelist)))))

;; http://photo.stackexchange.com/questions/63692/how-can-i-get-a-uniform-white-balance-on-a-batch-of-jpeg-images
(define (batch-auto-levels pattern)
(let* ((filelist (cadr (file-glob pattern 1))))
  (while (not (null? filelist))
         (let* ((filename (car filelist))
                (image (car (gimp-file-load RUN-NONINTERACTIVE
                                            filename filename)))
                (drawable (car (gimp-image-get-active-layer image))))
           (gimp-levels-stretch drawable)
           (gimp-file-save RUN-NONINTERACTIVE
                           image drawable filename filename)
           (gimp-image-delete image))
         (set! filelist (cdr filelist)))))


;; https://stackoverflow.com/questions/23554843/batch-rotate-files-with-gimp
  (define (batch-rotate pattern)
  (let* ((filelist (cadr (file-glob pattern 1))))
    (while (not (null? filelist))
           (let* ((filename (car filelist))
                  (image (car (gimp-file-load RUN-NONINTERACTIVE
                                              filename filename)))
                  (drawable (car (gimp-image-get-active-layer image))))

             (gimp-image-rotate image 0)

             (gimp-file-save RUN-NONINTERACTIVE
                             image drawable filename filename)
             (gimp-image-delete image))
           (set! filelist (cdr filelist)))))
" > bench.scm
cp -f *.scm gimp-install/share/gimp/2.0/scripts/bench.scm

echo "#!/bin/sh
# when getting more tests, will need to separate the below -b command into conditional statement check whats passed to this script

case \"\$1\" in

\"unsharp-mask\")
	BATCH_COMMAND='(batch-unsharp-mask \"*.JPG\" 15.0 0.6 0)'
    ;;
\"resize\")
	BATCH_COMMAND='(batch-resize-image \"*.JPG\" 600 400)'
    ;;
\"rotate\")
	BATCH_COMMAND='(batch-rotate \"*.JPG\")'
    ;;
\"auto-levels\")
	BATCH_COMMAND='(batch-auto-levels \"*.JPG\")'
    ;;
*)
	echo 2 > ~/test-exit-status
	exit
   ;;
esac

./gimp-install/bin/gimp-2.9.exe -i -b \"\$BATCH_COMMAND\" -b '(gimp-quit 0)' > \$LOG_FILE
./gimp-install/bin/gimp-2.9.exe --version | head -n 1 | awk '{ print \$NF }' > ~/pts-test-version" > gimp
chmod +x gimp

interim.sh

#!/bin/sh

rm -f *.JPG
tar -xjf pts-sample-photos-2.tar.bz2
tar -xf stock-photos-jpeg-2018-1.tar.xz

post.sh

#!/bin/sh

rm -f *.JPG

pre.sh

#!/bin/sh

rm -f *.JPG
tar -xjf pts-sample-photos-2.tar.bz2
tar -xf stock-photos-jpeg-2018-1.tar.xz

results-definition.xml

<?xml version="1.0"?>
<!--Phoronix Test Suite v8.2.0m3-->
<PhoronixTestSuite>
  <SystemMonitor>
    <Sensor>sys.time</Sensor>
  </SystemMonitor>
</PhoronixTestSuite>

test-definition.xml

<?xml version="1.0"?>
<!--Phoronix Test Suite v8.2.0m3-->
<PhoronixTestSuite>
  <TestInformation>
    <Title>GIMP</Title>
    <Description>GIMP is an open-source image manipulaton program. This test profile will use the system-provided GIMP program otherwise on Windows relys upon a pre-packaged Windows binary from upstream GIMP.org.</Description>
    <ResultScale>Seconds</ResultScale>
    <Proportion>LIB</Proportion>
    <TimesToRun>3</TimesToRun>
  </TestInformation>
  <TestProfile>
    <Version>1.1.1</Version>
    <SupportedPlatforms>Linux, BSD, MacOSX, Solaris, Windows</SupportedPlatforms>
    <SoftwareType>Benchmark</SoftwareType>
    <TestType>System</TestType>
    <License>Free</License>
    <Status>Verified</Status>
    <EnvironmentSize>201</EnvironmentSize>
    <ProjectURL>https://www.gimp.org/</ProjectURL>
    <Maintainer>Michael Larabel</Maintainer>
    <SystemDependencies>gimp</SystemDependencies>
  </TestProfile>
  <TestSettings>
    <Option>
      <DisplayName>Test</DisplayName>
      <Identifier>test</Identifier>
      <Menu>
        <Entry>
          <Name>unsharp-mask</Name>
          <Value>unsharp-mask</Value>
        </Entry>
        <Entry>
          <Name>resize</Name>
          <Value>resize</Value>
        </Entry>
        <Entry>
          <Name>rotate</Name>
          <Value>rotate</Value>
        </Entry>
        <Entry>
          <Name>auto-levels</Name>
          <Value>auto-levels</Value>
        </Entry>
      </Menu>
    </Option>
  </TestSettings>
</PhoronixTestSuite>