mieki256's diary

以下は、GIMP 2.10.14 Portable x86 samj版で、Script-fuコンソールを表示して確認した結果。

; GIMPのバージョンは (gimp-version) で取得できる

> (gimp-version)
("2.10.15")

; 配列(リスト？)の中にバージョン文字列が入ってるので、文字列だけを取り出す
; car を使うと、配列の一番最初の要素を取り出せる

> (car (gimp-version))
"2.10.15"

; 文字列を特定文字で区切って配列にする。strbreakup が使える
; (strbreakup 文字列 区切り文字) の形で使う

> (strbreakup (car (gimp-version)) ".")
("2" "10" "15")

; 文字列が入ってる配列の中から1つだけ取り出すには nth を使う
; (nth インデックス番号 配列) の形で使う

> (nth 0 (strbreakup (car (gimp-version)) "."))
"2"
> (nth 1 (strbreakup (car (gimp-version)) "."))
"10"
> (nth 2 (strbreakup (car (gimp-version)) "."))
"15"

; 文字列を数値に変換するには string->number を使う
; (string->number 文字列) の形で使う

> (string->number (nth 1 (strbreakup (car (gimp-version)) ".")))
10

; 2.8 以上か未満かを知りたいので値を比較。#t か #f が返ってくる。

> (<= 8 (string->number (nth 1 (strbreakup (car (gimp-version)) "."))))
#t

GIMP 2.8 以上なので、#t が返ってきた。

以下は、GIMP 2.8.22 Portable で確認した結果。

> (gimp-version)
("2.8.22")

> (car (gimp-version))
"2.8.22"

> (strbreakup (car (gimp-version)) ".")
("2" "8" "22")

> (nth 0 (strbreakup (car (gimp-version)) "."))
"2"

> (nth 1 (strbreakup (car (gimp-version)) "."))
"8"

> (nth 2 (strbreakup (car (gimp-version)) "."))
"22"

> (string->number (nth 1 (strbreakup (car (gimp-version)) ".")))
8

> (<= 8 (string->number (nth 1 (strbreakup (car (gimp-version)) "."))))
#t

GIMP 2.8 以上なので、#t が返ってきた。

以下は、GIMP 2.6.12 で確認した結果。

> (gimp-version)
("2.6.12")

> (car (gimp-version))
"2.6.12"

> (strbreakup (car (gimp-version)) ".")
("2" "6" "12")

> (nth 0 (strbreakup (car (gimp-version)) "."))
"2"

> (nth 1 (strbreakup (car (gimp-version)) "."))
"6"

> (nth 2 (strbreakup (car (gimp-version)) "."))
"12"

> (string->number (nth 1 (strbreakup (car (gimp-version)) ".")))
6

> (<= 8 (string->number (nth 1 (strbreakup (car (gimp-version)) "."))))
#f

GIMP 2.8 未満なので、#f が返ってきた。

ということで、2.6以下なら #f が、2.8以上なら #t が返ってくることが確認できた。

今時 GIMP 2.6 以前を使ってる人がそれほど居るとも思えないし、このあたりの処理は要らないのかもしれない…。「このスクリプトは GIMP 2.8以降のみ対応」「GIMP 2.6以前には未対応」等の注意書きでも示しておけば済みそうだし。

でもまあ、一つのスクリプトで、GIMP 2.10 と GIMP 2.8 の両方に対応させたい場面があるかもしれないし。そんな場面では、こういうソレが使えなくもないのかな…。

ただ、将来的に、GIMP 3.0 等のバージョン番号が出てきちゃった時には困るかもしれない。

比較に使う文字列が決め打ちになるけれど、文字列の切り出しを行う substring でやれなくもないなと。一応メモ。

> (gimp-version)
("2.10.15")

> (car (gimp-version))
"2.10.15"

> (substring (car (gimp-version)) 0 4)
"2.10"

> (string=? "2.10" (substring (car (gimp-version)) 0 4))
#t
> (string=? "2.8." (substring (car (gimp-version)) 0 4))
#f
> (string=? "2.6." (substring (car (gimp-version)) 0 4))
#f

> (gimp-version)
("2.8.22")

> (string=? "2.10" (substring (car (gimp-version)) 0 4))
#f
> (string=? "2.8." (substring (car (gimp-version)) 0 4))
#t
> (string=? "2.6." (substring (car (gimp-version)) 0 4))
#f

> (gimp-version)
("2.6.12")

> (string=? "2.10" (substring (car (gimp-version)) 0 4))
#f
> (string=? "2.8." (substring (car (gimp-version)) 0 4))
#f
> (string=? "2.6." (substring (car (gimp-version)) 0 4))
#t

_Script-fuにできることできないこと - 漫画ねた帳FX - Seesaa Wiki(ウィキ)