[applescript]libwebpインストール

---

【スクリプトエディタで開く】| クリップボードへコピー

#!/usr/bin/env osascript

----+----1----+----2----+-----3----+----4----+----5----+----6----+----7

#

# 留意事項 インストール先が ~/bin/exiftool になっています

#com.cocolog-nifty.quicktimer.icefloe

----+----1----+----2----+-----3----+----4----+----5----+----6----+----7

use AppleScript version "2.8"

use framework "Foundation"

use scripting additions

property refMe : a reference to current application

###設定項目インストール先

set strInstrallDirPath to ("~/bin/libwebp") as text

###設定項目ダウンロードURL

set strURL to ("https://storage.googleapis.com/downloads.webmproject.org/releases/webp/libwebp-1.3.2-mac-arm64.tar.gz") as text

###インストール先

set ocidInstrallDirPathStr to refMe's NSString's stringWithString:(strInstrallDirPath)

set ocidInstrallDirPath to ocidInstrallDirPathStr's stringByStandardizingPath()

set ocidInstrallDirPathURL to (refMe's NSURL's alloc()'s initFileURLWithPath:(ocidInstrallDirPath) isDirectory:true)

###フォルダを作る

set appFileManager to refMe's NSFileManager's defaultManager()

set ocidAttrDict to refMe's NSMutableDictionary's alloc()'s initWithCapacity:0

ocidAttrDict's setValue:(448) forKey:(refMe's NSFilePosixPermissions)

set listBoolMakeDir to appFileManager's createDirectoryAtURL:(ocidInstrallDirPathURL) withIntermediateDirectories:true attributes:(ocidAttrDict) |error|:(reference)

set strInstrallDirPath to (ocidInstrallDirPathURL's |path|()) as text

###ダウンロードURL

set ocidURLString to refMe's NSString's stringWithString:(strURL)

set ocidURL to refMe's NSURL's alloc()'s initWithString:(ocidURLString)

set strURL to ocidURL's absoluteString() as text

set ocidFileName to ocidURL's lastPathComponent()

###ダウンロード

set appFileManager to refMe's NSFileManager's defaultManager()

set ocidTempDirURL to appFileManager's temporaryDirectory()

set ocidUUID to refMe's NSUUID's alloc()'s init()

set ocidUUIDString to ocidUUID's UUIDString

set ocidSaveDirPathURL to ocidTempDirURL's URLByAppendingPathComponent:(ocidUUIDString) isDirectory:true

###フォルダを作る

set appFileManager to refMe's NSFileManager's defaultManager()

set ocidAttrDict to refMe's NSMutableDictionary's alloc()'s initWithCapacity:0

ocidAttrDict's setValue:(511) forKey:(refMe's NSFilePosixPermissions)

set listBoolMakeDir to appFileManager's createDirectoryAtURL:(ocidSaveDirPathURL) withIntermediateDirectories:true attributes:(ocidAttrDict) |error|:(reference)

##保存先ファイルURL

set ocidSaveFilePathURL to ocidSaveDirPathURL's URLByAppendingPathComponent:(ocidFileName)

###ダウンロード

set ocidOption to refMe's NSDataReadingMappedAlways

set listDone to refMe's NSData's alloc()'s initWithContentsOfURL:(ocidURL) options:(ocidOption) |error|:(reference)

set ocidDmgData to (item 1 of listDone)

###保存

set ocidOption to refMe's NSDataWritingAtomic

set listDone to ocidDmgData's writeToURL:(ocidSaveFilePathURL) options:(ocidOption) |error|:(reference)

log item 1 of listDone

set strSaveFilePath to ocidSaveFilePathURL's |path| as text

###解凍先ディレクトリを作成

set strExpandDirPathURL to (ocidSaveDirPathURL's |path|()) as text

###解凍

set strCoommandText to "/usr/bin/bsdtar -xzf \"" & strSaveFilePath & "\" -C \"" & strExpandDirPathURL & "\"" as text

do shell script strCoommandText

###ユーザーディレクトリにコピー

# moveItemAtURL:toURL:error:より上書きになるdittoを選択

set ocidTarFilePath to ocidSaveFilePathURL's URLByDeletingPathExtension()

set ocidExtractDirPath to ocidTarFilePath's URLByDeletingPathExtension()

set strExtractDirPath to ocidExtractDirPath's |path| as text

set strCoommandText to "/usr/bin/ditto \"" & strExtractDirPath & "\" \"" & strInstrallDirPath & "\"" as text

do shell script strCoommandText

---