YouTubeムービーの状態を取得、操作

Safari上で表示中のYouTubeのムービーの再生状態を取得、再生/停止のトグル動作を行うAppleScriptです。

macOS標準搭載のスクリプトメニューに入れて呼び出しています。

AppleScript名：Safariの最前面のウィンドウで再生中のYouTubeムービーの状態を取得する

–Get YouTube Movie status
tell application "Safari"
　　tell front document
　　　　set aRes to (do JavaScript "document.querySelector(’#movie_player video’).paused;")
　　end tell
end tell

★Click Here to Open This Script　

AppleScript名：Safariの最前面のウィンドウで再生中のYouTubeムービーを再生_停止をトグル切り替え

–Toggle Youtube play/pause
tell application "Safari"
　　tell front document
　　　　set aRes to (do JavaScript "document.querySelector(’#movie_player .ytp-play-button’).click();")
　　end tell
end tell

★Click Here to Open This Script　

US Apple主催のMailing Listの死活判定

Posted on 2月 14 by Takaaki Naganoya

自分は100個以上のApple MLを購読。さすがに政府公共機関向けと学校教育機関向けMLは追い出されましたが、入れるかぎりのMLに入っておいて、手元（Mail.app上）でAppleScriptのボットを走らせメールタイトルをもとに綿密なフォルダ分けを行なって、各ML上の頻出語句でフォルダ分けして情報を整理・活用しておりました。

そんな最中、2017年1月末に発生したML Serverのダウン。その後１か月もの間、US Appleにあらゆる方法でコンタクトして無視されるという経験を経て、US在住のMLメンバーが知り合いのApple社員に電話し、それでようやく復旧したことは記憶に新しいところです。

ここに、数日前に掲載した、list.apple.com上の「Lists hosted on this site」のML一覧の画像があります。25個のMailing Listが掲載されていることが確認できます（記事作成時点のカウント）。

しかし、自分の手元には、このリストに載っていないMLあてのメールが続々と到着。

「あれ？　list server上で加入フォームへのリンクが設置されていない、活動中のMailing Listがけっこうある？？」

と、気がついて、、、Numbers上に記載したメールアドレスを読み取ってテストメールを送信するAppleScriptを作成して、ジャンルごとにMailing Listにテストメールを送信してみました。

手で数えたところ、「Lists hosted on this site」のページからリンクされていないが、物理的に生きているMLが35もありました。内容によっては極端に流量が少なかったり、すでに廃止されて久しい技術のために論理的に生きていないMLなどもありますが、それでも30前後は普通に運用されているMLと言ってよいでしょう。

以下、自分の個人的なカテゴリ分けのもと、「紹介されていないが生きている」MLは名称を赤く塗っておきました。

個別のMLを正式に終了させる場合には、きちんとアナウンスしてほしいところです。

追記：SALT MLとSmartCard Users MLがテスト対象のリストからもれていましたが、いずれも健在のようです。

macOS 10.14のバグ？　アクセシビリティ認証

Posted on 2月 10 by Takaaki Naganoya

macOS 10.14.4Betaを使っていて遭遇したトラブルというかバグのような挙動なのですが、「システム環境設定」の「セキュリティーとプライバシー」＞「プライバシー」＞「アクセシビリティ」の項目。これは、Scripterにはおなじみの「GUI Scriptingの許可」を行う設定項目です。

ここに、同一名称で異なるバージョン（バージョン番号の大きいもの＝新バージョン）のアプリケーションが登録されない、という不具合です。

たとえば、v1.0のappletを登録しておいて、v2.0のappletを登録しようとしても、すでにv1.0が登録されているので追加登録できないし、いったん登録したものを削除できなかったという状況でした。

macOS 10.10あたりでこの項目で不可解な挙動が見られたことがありましたが、それが復活したような不安定さを感じます。ただ、テスト機はHDDで運用しているため、設定項目の変更がなかなか反映されないといった独特の挙動が発生することもあり、継続調査は必要だと感じています。まだ、他のユーザーの環境でも同様の問題が発生するか裏取りができていない状況ではあります。

ただ、Betaの最中に突然発症したので、作成途中のプログラムは10.14対応を見合わせる必要が出てきました。

本BlogにアクセスしているクライアントのOSバージョンについてlogから調査してみたところ、（自分のメイン環境が10.12ということもありますが）10.12が最多。10.9から10.12にほぼ同じぐらいのクライアントが存在しているもようです。鬼っ子10.13や鬼っ子改の10.14については、logに形跡が残っていない（Unknown Version？）としか言いようがありません。10.14は多い可能性もあります。

AppleはmacOS 10.13でバギーなまま使い物にならない状態のOSをリリースしたという「前科」があり、10.14もその延長線上にあるということから、つねに疑問を持って接しています。

▲2019.1の本Blogにアクセスしてきたクライアントのうち、Mac OS Xのバージョン別構成比

AppleScriptの情報源

Posted on 2月 9 by Takaaki Naganoya

AppleScript関連の情報源については、US Appleの主催しているAppleScript Users MLが圧倒的に活発だったのですが、2017年１月31日「血の火曜日事件」とのちに呼ばれる（嘘）MLサーバーのクラッシュが発生。

このサーバーダウンに際してAppleに対しさまざまなチャネル経由で「MLサーバーが落ちてるぞ！」と知らせたものの、縦割り管理が行きすぎてトラブルへの対応がめちゃめちゃ後手後手なApple。まったくMLサーバーの障害について対応しませんでした（Developper Support経由でアクセスしても対応がないのはどうかと思います）。

CEOに直接メールしてもダメ、Developper Supportにメールや電話してもダメ。MLの管理者にメールしろとか言われましたが、落ちているサーバー上にアカウントがある管理者にメールして、何の意味があるというのでしょう。

結局、この１か月間の空白によりMailing Listから多くのユーザーが離れ、MLが復旧したことを１年間知らなかったユーザーがいたほどです。

「人の煩悩の数ほど存在している」と言われていたApple MLですが、開発者サポートについてはWebフォーラムに移行しつつありました。これは、従業員が仕事中にMLに質問を投げたり回答することをTopが嫌ったとも、Apple Developper Program外のメンバーに対してApple従業員がコメントすることのコストをTopが嫌ったとも噂されていますが、正確なところはよくわかりません。

Mailing Listでないと自動処理ロボットで情報収集をしにくいし、Webフォーラムはサーバーの応答性によって閲覧に時間がかかるのでとてもとても勘弁してほしいのですが、最近はフォーラムが多いようです。

（１）AppleScript Users ML

Shaneが（４）と（５）にコメントをするようになって、それにしたがって（１）から人が減ったように思います。現状、あんまり活性度は高くありません。

（２）GroupsIO ML

（１）がコケたときに危機感を抱いた有志が立ち上げたML群です。AppleScript系ではあんまり活性度は高くありません。

（３）Apple Developper Forum

正直、使い勝手がいまひとつで、質問しても答えてもらえそうな気配がまったくしません。ここにはScripterはまったくいません。Appleの従業員が質問に答えてくれるようですが、そんなもんに一切期待していないので用はありません。

（４）Mac Scripter Forum

Xcode関連のScript（Xcode上でGUIアプリを記述するAppleScript）だとここで調べ物をしています。2018/9に管理者が交代になってLate Light Softwareが（Mark AlldrittとShane Stanleyが）運営、コメントするようになりました。

（５）Late Night Software Forum

2016年ごろに刷新されたWeb Forumです。割と活発に稼働していますが、基本的に「メーカーへの質問」とか「ユーザーサポート」の性質が強いので、書き込みしにくい印象があります（個人の印象です）。

これらのほかに、Twitterで「AppleScript」をキーワードに検索巡回を行い、間違った内容を吹聴しているユーザーに対して「これはこうだよー」とBotのようにコメントをつけています。ただ、TwitterのMac版クライアントがなくなって使い勝手が著しく悪くなったので、先行き不透明です。

ちなみに、本Blogにもフォーラムを作っておきましたが、なぜか私の独演会状態になっています。

macOS 10.14で新設されたエラーコード-1743を確認する

Posted on 1月 16 by Takaaki Naganoya

エラーをプログラムで発生させ、macOS 10.14で新設されたエラーコード-1743のエラーメッセージを確認するAppleScriptです。

Mojaveの「オートメーション」項目未登録アプリケーションがAppleEventを他のアプリケーションに送信した場合に発生するエラー-1743。

2019-01-15 99:99:99.999999+0900 1014test[13673:1813575] *** -[AppDelegate applicationWillFinishLaunching:]: Not authorized to send Apple events to Keynote. (error -1743)

macOS 10.14以降でのみ発生するエラーであり、それ以前のバージョンのmacOSでは発生しません。

以前作った、エラーコード表をプログラムから自動で生成するAppleScriptにこの-1743のエラーを発生させ、そのエラーメッセージ内容を取得してみました。

エラー-1743のエラーメッセージのうち、「current application」の部分には任意のアプリケーション名が入るようです。

AppleScript名：error_generator

—
–　　Created by: Takaaki Naganoya
–　　Created on: 2019/01/16
—
–　　Copyright © 2019 Piyomaru Software, All Rights Reserved
—
use AppleScript version "2.7" — Mojave (10.14) or later
use framework "Foundation"
use scripting additions

set erList to {"-1743"}

set mesList to {}

repeat with i in erList
　　set j to contents of i
　　set {aNum, aMes} to errorGenerator(j) of me
　　set the end of mesList to {aNum, aMes}
end repeat

mesList
–> {{-1743, "current applicationにApple Eventsを送信する権限がありません。"}}

on errorGenerator(aNum as number)
　　set handlerName to "errorGenerator"
　　try
　　　　error number aNum
　　on error errMsg number ErrNbr partial result partialResult from from_ to to_
　　　　return {ErrNbr, errMsg}
　　end try
end errorGenerator

★Click Here to Open This Script　

Illustratorで指定のartboardの名称を取得する

Posted on 1月 11 by Takaaki Naganoya

Adobe Illustratorで指定のartboardの名称を取得するAppleScriptです。

本来であれば、Illustratorのdocument以下のartboardの名称を取得するのであれば、

tell application "Adobe Illustrator"
　　set aName to name of artboard 1 of document 1
end tell

★Click Here to Open This Script　

で取得できる「はず」ですが、実際にAdobe Illustratorに対してこれを実行するとエラーになります（Adobe Illustrator CC2018＝Adobe Illustrator v22.1にて実行）。

これは、Adobeがいいかげんな実装を行って、出荷前に一切のチェックを行わないためです。100％ Adobeのせいです。

ちなみに、このproperty値からnameをIllustratorへのtellブロック外で取得すると、

のようになります。エラーメッセージの文字列としては取得できることがわかります。エラーメッセージのダイアログではAdobe IllustratorのAppleScript用語辞書の予約語を用いて表示が行われていますが、実際にエラーメッセージを（Adobe Illustratorのtellブロック外で）文字列として取得すると、用語辞書が用いられないので生のAppleEventの文字列を相手にすることになります。

というわけで、手段をえらばずにエラーメッセージから名前を取り出してみました。任意のアートボードのプロパティ値を取得してgetArtboardNameFromPropertiesを呼び出すと、アートボード名を抽出します。なお、動作原理の都合上、アートボード名にダブルクォートを含まないようにしてください。

こんなイレギュラーでトリッキーなやり方が必要なのは、Adobeの開発者がバカだからです（本当に）。心の底から軽蔑します（artboardのnameを取得する場合には、部分的にJavaScriptを呼び出して実行してもOK、というかその方法が推奨されます）。

AppleScript名：アートボードの名前を取得する

—
–　　Created by: Takaaki Naganoya
–　　Created on: 2019/01/11
—
–　　Copyright © 2019 Piyomaru Software, All Rights Reserved
—
use AppleScript version "2.4" — Yosemite (10.10) or later
use framework "Foundation"
use scripting additions

tell application "Adobe Illustrator"
　　tell document 1
　　　　tell artboard 1
　　　　　　set aProp to properties
　　　　　　set aName to getArtboardNameFromProperties(aProp) of me
　　　　end tell
　　end tell
end tell

on getArtboardNameFromProperties(aProp)
　　set beginStr to "«class bAl9»:＼""
　　
　　try
　　　　set aRec to aProp as string
　　on error erM
　　　　set offsetA to offset of beginStr in erM
　　　　set ermB to text (offsetA + (length of beginStr)) thru -1 of erM
　　　　set offsetB to offset of "＼"" in ermB
　　　　set resB to text 1 thru (offsetB – 1) of ermB
　　　　return resB
　　end try
　　
　　error "Illigal Data Format" –Error
end getArtboardNameFromProperties

★Click Here to Open This Script　

Closure?

Posted on 1月 4 by Takaaki Naganoya

AppleScriptにClosureがない云々という話を見かけることがあります。JavaScript系の人が言っているのをよく見かけます。

ハンドラ内にさらに入れ子状にハンドラを宣言してプライベートなハンドラとして利用するのがclosureである、という説明を見かけました。

そういうものであれば、明確に存在します。Script文で記述するScript Objectです。

ハンドラ内に記述したScript文でScript Objectの宣言を行い、ハンドラ内でプライベートなサブハンドラを列挙することもできますし、外部に記述して論理分割することもできます。

実際に、巨大なScript同士を（何も考えずに）つないで使うような場合に重宝しています。

プライベートなハンドラをハンドラ内に入れ子状に作成したScript（本サンプルScriptのようなもの）については、たしかにinnerFunc1やinnerFunc2はメイン側（一番外側）からは直接呼び出すことはできないので、プライベートな関数のような扱いを行えます。便利かもしれないし、それほどでもない感じもします。

このあたりは個人の「趣味」の世界なので、そういう構造にしたい人はすればいいし、したくない人はしなければよいのではないでしょうか。

AppleScript名：closure1

set a to mainHander("ABC") of me
–> "ABCABC….ABCABC"

on mainHander(aParameter)
　　script aClosure
　　　　
　　　　on innerFunc1(aParameter)
　　　　　　set a to aParameter & aParameter
　　　　　　return a
　　　　end innerFunc1
　　　　
　　　　on innerFunc2(aParameter)
　　　　　　set a to aParameter & "…." & aParameter
　　　　　　return a
　　　　end innerFunc2
　　　　
　　end script
　　
　　set a to innerFunc1(aParameter) of aClosure
　　set b to innerFunc2(a) of aClosure
　　return b
end mainHander

★Click Here to Open This Script　

Cocoaの機能を利用するAppleScriptObjCの宣言を行った場合でも、同様にハンドラ内のScript Object内にさらにプライベートハンドラを記述する記法はコンパイル（＝構文確認）を通るようです。

AppleScript名：closure2

—
–　　Created by: Takaaki Naganoya
–　　Created on: 2019/01/04
—
–　　Copyright © 2019 Piyomaru Software, All Rights Reserved
—

use AppleScript version "2.4" — Yosemite (10.10) or later
use framework "Foundation"
use scripting additions

set a to mainHander("ABC") of me
–> "ABCABC….ABCABC"

★Click Here to Open This Script　

ぴよまるソフトウェアが選ぶ、2018年に書いた「価値あるScript」

Posted on 12月 24, 2018 by Takaaki Naganoya

本Blogには基礎的で再利用性の高いAppleScriptを掲載しています。高度で見ただけで腰を抜かすような高度なものは掲載していません。逆にいえば、そういう「高度で奇抜なもの」も一般的で簡単なScriptの組み合わせで作られている、ということです。

2018年を振り返ると、Blogの再構築のために過去掲載の記事から新しめのものだけを再掲載。途中から新規作成分を掲載しています。

2018年２月

消滅したBlogの再構築をゼロから開始。Blog投稿用のAppleScriptを作成してローカルのAppleScriptをHTML化してXML-RPC経由でWordPressに主要なAppleScriptをアップロード。この「Finder上で選択しておいたScriptをHTML化してWordPressにアップロード」するというAppleScript（というか、その部品）を用意できていなければ、こんなに早期に復旧することはなかったでしょう。

2018年３月

・(GET)駅すぱあとAPIで駅コードから駅名称を取得
ヴァル研究所の「駅すぱあとAPI」が公開されているのを見つけ、実際に呼び出してみました。ただ、このAPIの呼び出しが必要な開発案件にまだ出くわしていないので、本気で使い込んではいません。REST APIは全般的に「仕様的に呼び出せるものは呼び出せる」「呼び出すことが目的ではなく、それをどのように活用するかが目標」です。Google翻訳だろうがDropboxだろうが、REST APIをAppleScriptから呼び出せるというのは「当然のこと」なので、あえてBlogに掲載する意義もそれほど感じませんが、、、、

・指定PDFの全ページからリンクアノテーションのURLを取得してURLを書きかえる
PDFのリンク書き換えScriptは、えほんシリーズ（Keynoteで作成）のPDFにScript Linkを埋め込むために試作したScript群の一部です。結局、Keynoteバージョン8.2か8.3あたりでKeynote書類にカスタムURLプロトコルのリンクを埋め込めるようになったため、自力で対応しなくても大丈夫になりましたけれども。

・AppleScriptの構文色分けカラーフォーマットをplistから読み込む
これは、Cocoaの機能を使わずに構文色分けフォーマットの判定を行っていた従来バージョンのルーチン（電子書籍のオマケ「Piyomaru Script Assistant」に使用）を、Cocoaの機能を用いて書き換えたものです。速度的なメリットはとくにありませんが、これを下敷きにしてさらに高度なものを作成するためにクリアしておきたい技術的な課題でありました。

のちに、このあたりの技術的な問題をクリアしたScriptを「AppleScript書類から指定の構文要素をピックアップ（Cocoa Property名称）して文字列化」として掲載しています。本来の作成目的はさらにこれを発展させたものです。

あまり派手ではありませんが、

・shebangっぽい行から実行プログラムを取得してスクリプト言語の拡張子を取得

というScriptも個人的には割と重要です。このScriptの作成目的は、FileMaker ProのDB内に格納したshell scriptなどを、shebangの情報をもとにファイル書き出しして実行するというものです。こういう目的を果たすScriptが存在していなかったためです（国内、海外ともに探しても見つからず）。

2018年４月

・NSObjectの各種メソッドのじっけん

これは、個人的にはかなり意義のあるものです。掲載している分はこの程度の数ですが、未掲載分が大量にあります。このあたりの機能を確認することで、大きな収穫がありました。Cocoaの機能を使い出して真っ先に調べたのが、NSArray、NSString、NSDictionaryなどのデータ処理に必要なクラスの情報。ついで、NSImageなど画像処理に必要なクラス。NSObjectについてはずいぶん後になってから調べました。

・自分を最前面に移動させてAbout表示
これは、特殊な実行環境からこの機能を実現するための方法が見つからなかったので、「見つけたことが重要」な内容です。Scriptそのものにはあまり重要性はありません。

・配列に入れた画像を類似度でソートする
こういう処理はぜひAppleScriptでクリアしておきたい内容です。Cocoaの機能に手を出しはじめたのも、REST APIの呼び出しや機械学習（強化学習）やこのあたりの処理ができるようになるだろう、と感じたためです。強化学習については11月ごろに実現しています。

・アニメーションGIFをフレームごとに画像に分解する
分解すること自体にはあまり意味はありませんが、アニメーションGIFを作成するObjective-Cのプログラムが見つからない今日このごろ。Photoshopを使えば作れなくはないのですが、Photoshopを使わないで画像処理することに意義があります（使わなければMac App Storeに出せるので）。

・TwitterへのTweet文字数チェック
Github上で発見した当時「こんないいものが存在しているのに、なんでMac版のTwitterクライアントにこの機能は搭載されていないんだろ？」と首をひねっていましたが、間もなくMac版のTwitterクライアントが廃止に。あのアプリケーションは方向性がブレブレで、機能不十分で、User Interfaceもさっぱりな最低の存在でした。Appleに買収されたがっているがゆえの「瀬戸際外交の一種」とも見られていましたが、Twitterはどこに向かっているのでしょう？

2018年５月

・atan2をFramework呼び出しで計算する
これは、１つの緯度/経度情報をもとに他の座標がどの方角に存在するかを計算するために必要なものです。

・Bash In Tokyoで音声認識コマンドプログラムをデモしてきました
とりあえず作ってデモしてみたところ、若干方向性が合っていないことを感じ取って、のちのTanzakuにつながることになります。とくに、ファイルのドラッグ＆ドロップ処理系とターミナル的なコマンド処理系を同時に実装すると「違和感」しかない、ということに気づいた次第です。

・Blog Archiveの電子書籍を計画しています
ごく一部の読者の方々のご要望を受けて企画した本シリーズ。続刊はすでに（機械的に）作成してあるのですが、内容確認とコメント追記にものすごくパワーが必要なので、思ったよりも進んでいませんが、すすんではいます。

・数値演算ライブラリ「calcLibAS」v1.3（28倍速）
数値演算ライブラリについては、Sephes Math LibraryをObjective-Cなどでラッピングしたものが決定版になるかと思っていましたが、本ライブラリはまさに掘っ建て小屋。冗談で作ってみたら予想外に実用性が出てしまったものです。

2018年６月

さすがに、引越しの最中に何かまとまったプログラムは書けません。

2018年７月

Blogアーカイブ本 vol.1を販売開始
 Blogアーカイブ本 vol.2を販売開始
半信半疑で出してみたBlogアーカイブ本のVol.1〜2。一部読者のみなさまからはご好評いただいております。

2018年８月

・CPUの温度、放熱ファンの回転数を取得する
MacBook Proでデモを行っている最中に、AppleScriptを走らせて遅くなる現象に直面することがままありました。よくよく調べてみたら、長大なAppleScriptを実行しているさいにCPUが過熱してサーマルスロットリングが発生しているケースが多いことが判明。これは、環境がかわって南国の東向きの部屋に移動したことがきっかけですが、ノートPC用の放熱台にくわえ放熱ファンを強制的に高回転させるソフトウェア「TG Pro」を併用することで解決しています。本ルーチンは顧客に納品するGUIアプリケーションの部品として利用し、バッチ処理時のCPU過熱警報の機能として組み込みました。けっこう重要な部品です。

・Blogアーカイブ本 vol.3を販売開始
 ・AppleScript書類から指定の構文要素をピックアップ（Cocoa Property名称）
余裕を見て調査していたAppleScript構文要素の判別機能のCocoa版がだいたい予定どおりのレベルに仕上がったのが、本ルーチンです。

2018年９月

・MOSAミーティングで新プロジェクト「Tanzaku」を発表
自然言語コマンドを実行する「Newt On」Project（2002）、日本語音声認識コマンダー「ことだま」（2003）、その他日本語を理解して実行する各種プログラム試作品の集大成ともいうべきプログラム「Tanzaku」（2018）〜Talking Command Droplet via filenameです。

・easyJParse v3
AppleScriptに備わっている「words of」による簡易形態素解析機能。なぜか途中の記号類をドロップするため、いまひとつ実用的ではありませんでしたが、本プログラムにより本来の有用性を確保したといえなくもありません。何回か手を出しては放り投げていたものですが、デモの間際に集中して作ったら完成しました。コマンド解釈用に作ったので、この程度でも十分でした。

・イベント「Think AppleScript」盛会のうちに終了
初回だったので予定どおり、想定どおり、AppleScriptの歴史的経緯やおおまかな話などを詳細にご紹介しつつ、現時点での業務系のScriptでCocoaの機能を用いつつAdobe Createvie Suitesアプリケーションを操作する内容をデモしていただきました。質疑応答の中から、「iOSのSiriショートカットでiOSからosascriptコマンドを経由してMac上のAppleScriptを呼び出せる」といった話まで広がったのは収穫でした（結局、Entanglerのほうが６億倍ぐらい便利なのでSiriショートカットは使わずじまいですが）。

2018年10月

・ファイル作成日、修正日を変更する
他の補助アプリケーションの手助けなしに、ファイルの各種属性を書き換えられるようになったわけで、まことにけっこうなことです。

・NSURLからBookmarkを作成するじっけん
この機能はなくて困っていたので、できるという話は朗報でした。

2018年11月

・WebView＋ボタンを作成 v3（URLから読み込み）
従来のWebViewがDepricated扱いになり、WKWebViewを使わなくてはならなくなったわけですが、使いこなすのに予想外に資料が存在せず（使い方がイレギュラーなこともある？）、いろいろ苦労していました。このあたり、プログラミングではなく「調査」の成果なわけですが、できないことをできるようにするためには、こうした下調べが欠かせません。

・機械学習で学習したMSの画像を連邦・ジオン軍判定してフォルダ分け v2
強化学習によって作成したモデルをもとにバッチ処理を行うというのは、１つの目標として据えていたので、そのやり方がわかって、実際にひととおり動作するプログラムを作成できたのはなかなかナイスです。

・tccKitで指定Bundle IDのアプリケーションの「オートメーション」認証状況を取得
macOS 10.14で大幅に変わった環境ですが、それに対処するためのノウハウも蓄積しつつあります。その中で最大のものがこれです。CodeSignさえ行えれば、動作内容の変化を最低限に抑えられる（初回のみセキュリテイダイアログを表示）のではないかと。ただ、CodeSignを行うような開発ライセンスを持っていないユーザーがドロップレットを作成した際にダイアログが出ることに不満を持っているようです。ドロップレットではなく、スクリプトメニューから実行するようにすれば、macOS 10.14のセキュリテイ対策機能に合っているように思います。

・macOS 10.14 AppleScriptリリースノート
後日確認したところ、macOSリリースノートに統合されたので、個別のリリースノートとして追記されることはなくなった、と明記されていました。内容をバックアップしておく必要がありそうです。

2018年12月

・easyJParse v4
簡易日本語形態素解析プログラムのアップデート版です。固有名詞に対応するための仕組みも見えてきました。

2018年にBlogに掲載したプログラムでいえば、強化学習、簡易日本語形態素解析、WkWebView利用あたりがポイントでしょうか。

Keynoteの表セルに計算式を入れる

Posted on 12月 5, 2018 by Takaaki Naganoya

Keynoteの最前面の書類の現在表示中のスライド（ページ）上の表の指定セルに計算式を入れ、表示フォーマットを指定するAppleScriptです。

計算式については、Keynote上で実際に入力して、AppleScriptから指定セルのpropertyを取得して、記入方法を確認しました。

tell application "Keynote"
　　tell front document
　　　　tell current slide
　　　　　　tell table 1
　　　　　　　　tell column 2
　　　　　　　　　　tell cell 3
　　　　　　　　　　　　properties
　　　　　　　　　　　　–> {vertical alignment:center, row:row "3" of table 1 of slide 1 of document id "11E9C7CA-50E5-4360-A26D-C8B14BAE004D" of application "Keynote", class:cell, font name:"HiraKakuProN-W3", formatted value:"50%", background color:{65527, 65533, 65524}, formula:"=B2÷B1", name:"B3", text wrap:true, text color:{0, 0, 0}, alignment:center, column:column "B" of table 1 of slide 1 of document id "11E9C7CA-50E5-4360-A26D-C8B14BAE004D" of application "Keynote", format:percent, font size:22.0, value:0.5}　　　　　　　　　　　　
　　　　　　　　　　end tell
　　　　　　　　end tell
　　　　　　end tell
　　　　end tell
　　end tell
end tell

★Click Here to Open This Script　

このような状態で、

実際に実行すると、

のようになります。セルに指定できるformatの種類は、KeynoteのAppleScript用語辞書にあるように、

automatic/‌checkbox/‌currency/‌date and time/‌fraction/‌number/‌percent/‌pop up menu/‌scientific/‌slider/‌stepper/‌text/‌duration/‌rating/‌numeral system

のとおりです。実際に指定してみるとわかるのですが、Keynoteのアプリケーション仕様にない予約語があり（checkbox、pop up menu、slider、stepper）これらを指定してもKeynoteがサポートしている範囲内のformatでしか表示されません。

なお、掲載Scriptではわかりやすいように確認処理を省略していますが、実行の前提条件としてKeynote書類がオープンされていて、表示中のスライド（ページ）上に表オブジェクトが存在する状態になっていることが必要です。これらの前提条件を満たしていない場合には、エラーになります。

AppleScript名：Keynoteの表セルに計算式を入れる

tell application "Keynote"
　　tell front document
　　　　tell current slide
　　　　　　tell table 1
　　　　　　　　tell column 2
　　　　　　　　　　tell cell 3
　　　　　　　　　　　　set its value to "=B2÷B1"
　　　　　　　　　　　　set its format to percent
　　　　　　　　　　end tell
　　　　　　　　end tell
　　　　　　end tell
　　　　end tell
　　end tell
end tell

★Click Here to Open This Script　

macOS 10.14 AppleScriptリリースノート

Posted on 11月 18, 2018 by Takaaki Naganoya

従来、AppleScriptのRelease Notesは独立して掲載されていましたが、「macOS Mojave 10.14 Release Notes」として１本の記事にまとめて掲載されていました。内容を吟味したうえで日本語訳して掲載します。

macOS 10.14, Mojave上のAppleScriptはバージョン2.7と10.13から変更はありません。このところ、OS２バージョンに１回AppleScript処理系がバージョンアップするような格好になっているため、納得のいくところですが、バージョン番号が変わっていない割には環境が激変しています。控えめに言っても、Classic Mac OSからMac OS Xへの移行時よりも変化が大きい環境です。

（１）アプリケーションとの通信許可システム

あるアプリケーションからApple eventを送信する場合には、AppleScriptアプレットであっても、ユーザーの許可が必要になった。

許可取得中アプリケーションの一覧はシステム環境設定.appの「セキュリティとプライバシー」＞「プライバシー」＞「オートメーション」カテゴリにて、閲覧や編集が行える。

もしも、ユーザーが許可ダイアログで同意を行わなかった場合には、イベントの実行はブロックされ、エラー-1743（”: Not authorized to send Apple events to “）が発生する。Apple eventはAEDeterminePermissionToAutomateTargetで事前に使用可能かどうかの確認を行える。

（２）OSAXの事実上の廃止

サードパーティーのScripting Additions（OSAX）がインストールできなくなった（認識されなくなった）。/Library/ScriptingAdditions、/Network/Library/ScriptingAdditionsおよび~/Library/ScriptingAdditionsフォルダ内に存在するScripting Additionsは無視される。

アプリケーションの一部品としてScripting Additionsをバンドル内に組み込み、アプリケーションとScripting Additionsの両方が同一IDでコードサインを施された場合にのみ実行が許可される。

リリースノート内容の検証

（１）について

アプリケーションとの通信許可が行われる頻度ですが、

　スクリプトエディタ：（確認対象外）
　Script Debugger：実行時初回のみ
　スクリプトメニュー：実行時初回のみ
　AppleScriptアプレット：~~毎回（初回通信時のみ）~~実行時初回のみ
　AppleScriptアプレット（Code Sign）：初回実行時のみ
　AppleScript GUIアプリケーション（Code Sign）：初回実行時のみ

となっています（2019/2/1修正）。アプリケーションとの通信許可が求められる単位は、各実行ファイル。Script Debugger上でScriptを記述するためにSafariと通信を行う場合には、初回のみ許可を求められます。スクリプトエディタ上でAppleScriptを記述する場合には、とくに通信許可の確認ダイアログは表示されません。

許可されたアプリケーション一覧については、/usr/bin/tccutilコマンドでリセット可能。
許可状況のリストアップについては、/Library/Application Support/com.apple.TCC/TCC.dbにて管理。Apple純正ツールtccutilでは削除しかできない状況です。

→　その後、Hal Mueller氏によるサンプルコードを用いたtccKit.frameworkを介して、指定Bundle IDの「オートメーション」認証状況を取得できるようになりました

ただし、同じく「プライバシー」項目の「フルディスクアクセス」に、スクリプトエディタとスクリプトメニューを登録する必要があります。OSインストールや10.14以下のOSからのアップデート時、新規ユーザーアカウント作成時に行う「恒例行事」になることでしょう。

（２）について

Script Additionの使用/不使用をuse scripting additions文で制御できますが、事実上これがStandard Additions OSAXの使用/不使用制御を行うためだけの存在になったといえます。

現在残存している著名なサードパーティのOSAXに、

・Satimage OSAX
・XMLTools

などがあり、これらは、LateNight SoftwareにてCode Signしてアプリケーション化した「SatimageOSAX.app」を配布して同アプリケーション内蔵のSatimage.osax/XMLLib.osax/Files.osax/FITS.osax/Numerics.osaxを呼び出す環境を提供しています。

ただし、今後もScripting Additions/OSAXの利用について制約が緩和される可能性はないため、移行のための「その場しのぎ」に限定されます。OSAXによるScript機能の拡張については、これで終了です。

個人的には、Classic MacOSからMac OS X（現・macOS）への移行の際に、OSAXになるべく依存しないようにAppleScriptを記述するように方針転換し、本Blog掲載のScriptについても「よほどのこと」がなければOSAXを使用していません。XMLからXPathを用いてデータを取得する用途についてはXMLTools OSAXの機能が強力ですが、XPathQuery4ObjCなどの代替手段を用意しています。

なお、macOS 10.14搭載のスクリプトエディタは~/Library/Frameworksフォルダ内のFrameworkを無視するものの、これが「仕様」なのか「バグ」なのかは不明。Shane Stanley的には「仕様」とのこと。
→　SIPの機能による制限。これを回避するためにはTerminal上からcsrutilコマンドによりSIPを無効化する操作が必要

その他の変更内容

Script Menuは「スクリプトメニュー」という別アプリケーションに分離されました。

Script MenuはこれまでMenu Exrtraとして存在していたのですが、macOS 10.14で変更されたかたちです（Script Menuは時代によってSystem Eventsが管轄していたり、独立したアプリケーションだった時期があったりとけっこういろいろ存在形態が変更され続けてきました）。Menu Extraから独立アプリケーションへの変更はセキュリティポリシーを独自に適用するため、でしょうか？（なんとなく意図は理解できそうですが、こんな大事なことはリリースノートに書いてほしい）

macOS 10.14搭載のContacts.app（旧称：アドレスブック）から、プラグインScriptがサポートされなくなりました。Contacts.appのAppleScript用語辞書にはプラグインScript用の用語が残っているため注意が必要です。

Finderに、デスクトップ上のファイルを「過去7日間」「過去30日間」などとまとめる「スタック」の機能が付きました。AppleScriptからこの「スタック」を選択してselection（as alias list）を取得すると、中に入っているファイルへの参照がリストで返ってきます（スタックに該当するクラスが定義されているわけではありません）。

DVDプレイヤーはアプリケーションから補助ツールに格下げになって（Zipアーカイバなどと同じ）AppleScriptからの操作機能が削除されました。DVD再生コントロールなどはフリーの「Free Mac Media Player」をダウンロードして行うようにしてください。

Table 1の全セルを選択する v3

Posted on 11月 5, 2018 by Takaaki Naganoya

Numbersで選択中のセルがなければ、最前面の書類の選択中のワークシートのうちのTable 1を全選択するAppleScriptです。

選択部分からデータを取得する処理はよく行いますが、プログラム側から選択部分を作成するというのはやっていなかったので、試行錯誤してみました。

AppleScript名：Table 1の全セルを選択する v3.scptd

—
–　　Created by: Takaaki Naganoya
–　　Created on: 2018/11/05
—
–　　Copyright © 2018 Piyomaru Software, All Rights Reserved
—
use AppleScript version "2.4" — Yosemite (10.10) or later
use framework "Foundation"
use scripting additions

tell application "Numbers"
　　tell front document
　　　　tell active sheet
　　　　　　try
　　　　　　　　–選択セルがある場合
　　　　　　　　set theTable to first table whose class of selection range is range
　　　　　　on error
　　　　　　　　–選択セルがない場合はTable 1を全選択
　　　　　　　　set tCount to count every table
　　　　　　　　if tCount = 0 then error "There is no table in active sheet"
　　　　　　　　
　　　　　　　　tell table 1
　　　　　　　　　　set selection range to cell range
　　　　　　　　end tell
　　　　　　　　
　　　　　　end try
　　　　end tell
　　end tell
end tell

★Click Here to Open This Script　

電子書籍２冊のリンク切れの対処データが完成

Posted on 11月 4, 2018 by Takaaki Naganoya

2018年１月末の本Blog消失に伴い、電子書籍「AppleScript最新リファレンス」「AppleScript 10大最新技術」本文中からリンクしていた本Blog上のURLの変更先情報補完、および抜けていた記事のBlogへの補充作業がほぼ終了しました。

抜けた記事の再作成＆更新作業は割としんどいものでした（ーー；；；　

２つの電子書籍のサポートページ上にURLの対応表を掲載いたしましたので、ご参照ください。

→　「AppleScript最新リファレンス」サポートページ

→　「AppleScript 10大最新技術」サポートページ

シリアルコードの生成と検証

Posted on 11月 3, 2018 by Takaaki Naganoya

オープンソースのフレームワーク「SerialKeyGenerator」を用いてシリアルコードを生成、検証するAppleScriptです。

シリアルコードについて

シリアルコードは、日本では「レジストコード」「プロダクトコード」などと呼ばれるもので、ソフトウェアの販売時にこのコードを発行し、ソフトウェアのシリアルコード入力ダイアログに入力してもらうことで、完全版として機能させるというものです。

Mac App StoreではApple IDとひもづけることでシリアルコードを使用しないソフトウェア販売とライセンシングを行なっていますが、Mac App Store外で販売する場合にはシリアルコードのことを考える必要が出てきます。

コードの文字数を増やすと、仮にキーボードから入力する場合の難易度が上がってしまいます。適度な長さの文字列になることが望ましいところです。

シリアルコードが仮に流出した場合に備え、どの購入者のコードが流出したかを特定する必要があります。そのため、シリアルコードにはその名のとおり、購入者の番号を含めてあるのが普通です。

SerialKeyGeneratorの使い方について

SerialKeyGeneratorでは、シークレットキーワード、ユーザー番号をもとにシリアルコードが生成されます。日時を考慮してシリアルコードを計算するため、同じシリアルコードを生成させても日時が変われば結果は異なります。

ただ、おおもとのシークレットキーワードが判明してしまうと、第三者がシリアルコードを勝手に発行してソフトウェアの不正使用ができてしまうため、アプリケーション内に格納するシークレットキーワードは文字ダンプされても判明しないようにしておくのが普通です。

–> Download serialKeyGenKit.framework（To ~/Library/Frameworks/）

AppleScript名：SerialKeyGeneratorサンプル1

— Created 2015-10-24 by Takaaki Naganoya
— 2015 Piyomaru Software
use AppleScript version "2.4"
use scripting additions
use framework "Foundation"
use framework "serialKeyGenKit" –https://github.com/danielvy/SerialKeyGenerator

–Generate Serial Code with secret Keyword
set aGen to current application’s SerialKeyGenerator’s alloc()’s initWithSecret:"Piyomaru"
–>　　(SerialKeyGenerator) <SerialKeyGenerator: 0x7f8b5b5fa200>

set aList to {}
repeat with i from 1 to 10
　　set aRes to (aGen’s generateSerialWithSequence:i |data|:i)
　　set the end of aList to (aRes as text)
end repeat

aList
–>　　{"1CHH8-BJY89-TR9Z9-AKSTL-70JZF", "4KXCF-LS6P5-7BKYN-CUMPY-NM072", "41GO2-OGZ3T-83YP9-2LS4J-9W3MI", "CA3WV-C7FU7-PSPJ3-LNGT7-N6AJT", "3OG0B-MCFUM-7YKHT-EE533-LNJEJ", "4SKWQ-9G8XE-ZCE6K-APSAL-R0T8S", "CTEZT-H4AQQ-BM15H-FH2DG-P7K7O", "4BZ1X-2OHKF-5FWND-7SZVA-EBR89", "BDKRI-9JU7T-G6N20-YPU9K-6FXQW", "9EWW5-O3FMV-SDEZA-77JZE-OY8FL"}

–Decode Serial with secret Keyword
set rList to {}
set bGen to current application’s SerialKeyGenerator’s alloc()’s initWithSecret:"Piyomaru"
–> (SerialKeyGenerator) <SerialKeyGenerator: 0x7fb6992b8400>

repeat with i in aList
　　set bRes to (bGen’s decodeSerial:(contents of i))
　　
　　set aDate to bRes’s |date| as date
　　set aSeq to bRes’s sequence as integer
　　set aData to bRes’s |data| as integer
　　
　　set the end of rList to {aData, aSeq, aDate}
end repeat
return rList
–> {{1, 1, date "2018年11月3日土曜日 16:44:57"}, {2, 2, date "2018年11月3日土曜日 16:44:57"}, {3, 3, date "2018年11月3日土曜日 16:44:57"}, {4, 4, date "2018年11月3日土曜日 16:44:57"}, {5, 5, date "2018年11月3日土曜日 16:44:57"}, {6, 6, date "2018年11月3日土曜日 16:44:57"}, {7, 7, date "2018年11月3日土曜日 16:44:57"}, {8, 8, date "2018年11月3日土曜日 16:44:57"}, {9, 9, date "2018年11月3日土曜日 16:44:57"}, {10, 10, date "2018年11月3日土曜日 16:44:57"}}

★Click Here to Open This Script　

Excelデータを組み立てて書き出し(フォント指定、カラー指定)

Posted on 11月 3, 2018 by Takaaki Naganoya

オープンソースのフレームワーク「JXLS」を用いてExcelデータを組み立てるAppleScriptです。

フォント名と色を指定してみました。実際に案件で使用したことがないので、徹底的に活用した………という経験がないので、いまのところ何か風景画像をExcel書類に変換して「実はExcelで作りました」とかフカすぐらいしか用途がなさそうです。

–> Download JXLS（To ~/Library/Frameworks/）

AppleScript名：ASOCでExcelファイル生成テスト v2

— Created 2015-10-08 by Takaaki Naganoya
— 2015 Piyomaru Software
use AppleScript version "2.4"
use scripting additions
use framework "Foundation"
use framework "JXLS" –https://github.com/JanX2/JXLS

set aFile to POSIX path of (choose file name)
set filePath to current application’s NSString’s stringWithString:aFile

set workBook to current application’s JXLSWorkBook’s new()
set workSheet to workBook’s workSheetWithName:"ぴよぴよシート"
workSheet’s setWidth:1000 forColumn:0 defaultFormat:(missing value)

repeat with i from 0 to 64
　　set aCell to (workSheet’s setCellAtRow:i column:0 toString:(current application’s NSString’s stringWithString:("ぴよまる " & (i as text))))
　　(aCell’s setFontName:"HiraKakuStd-W8")
　　(aCell’s setFontHeight:320) –this is point * 20
　　(aCell’s setFontColorIndex:i)
　　(aCell’s setForegroundFillColorIndex:13)
end repeat

workBook’s writeToFile:filePath

★Click Here to Open This Script　

Excelデータを組み立てて書き出し

Posted on 11月 3, 2018 by Takaaki Naganoya

オープンソースの「JXLS.framework」を用いて指定のExcelデータを組み立てて書き出すAppleScriptです。

アプリケーションにメッセージを送ってアプリケーションに仕事をしてもらうのがAppleScriptの流儀ですが、macOS 10.10以降でCocoaの機能が呼べるようになったため、こうしたオープンソースのフレームワークを呼び出して処理できるようになりました。

AppleScriptが自前で行なっていないことには変わらないのですが、Excelデータを（Excelなしで）組み立てられるわけで、出力データとしてExcel書類が求められる用途において、Excelなしで処理が行えます（開発中はExcelでどのように表示されるか確認する必要があるので、開発中は必要です）。

また、本物のExcelをコントロールする方法ではできなかった「並列処理で大量にデータを作成する」という処理も可能になるわけでけっこうなことです（ただ、そういう要求をされたことは皆無なのですが、、、、）。

–> Download JXLS（To ~/Library/Frameworks/）

AppleScript名：ASOCでExcelファイル生成テスト

set aFile to POSIX path of (choose file name)
set filePath to current application’s NSString’s stringWithString:aFile

set workBook to current application’s JXLSWorkBook’s new()

set workSheet to workBook’s workSheetWithName:"ぴよぴよシート"
workSheet’s setWidth:1000 forColumn:0 defaultFormat:(missing value)

repeat with i from 0 to 10
　　set aCell to (workSheet’s setCellAtRow:i column:0 toString:(current application’s NSString’s stringWithFormat_("ぴよまる %@", i + 1)))
　　(aCell’s setHorizontalAlignment:1) —-HALIGN_LEFT
　　(aCell’s setIndentation:(0 + i)) —– INDENT_0
end repeat

workBook’s writeToFile:filePath

★Click Here to Open This Script　

AppleScript上でJavaScriptを実行する

Posted on 11月 3, 2018 by Takaaki Naganoya

AppleScriptからJavaScriptを実行する方法がUS AppleのAppleScript Users MLで議論されていたので、いろいろとテストしたうえでまとめてみました。

なお、本AppleScriptは明示的にメインスレッドで実行させるために、Script Editor上で通常の「Command-R」ではなく、「Control-Command-R」で実行する必要があります（この操作を行わないと、サブスレッド上で実行されている旨のエラーが出ます）。ASObjCExplorer 4上で実行する場合には、ウィンドウ左下にある「Run in foreground」のチェックボックスにチェックを入れてから実行します。

（１）run script xxxxx in “OSA-Language Name”

こんな方法で実行できたとは、、、。正直言って驚きました。これまで、OSに複数のOSA言語がインストールされてリリースされたことが（ほとんど）なかったので、他のOSA言語を呼び出すという場面がなかったわけですが、こういう呼び出し方で呼び出せるんですね。リリースノートに書かれているんだかいないんだか。この呼び出し方でJXA（JavaScript for Automation）のScriptをAppleScript側から実行できます。同様に、JXA側からAppleScriptを実行することも可能と思われます。

（２）WebViewを動的に生成してJavaScriptを実行

WebViewを動的に生成して操作する場合には、JavaScriptのコマンドを実行することになります。つまり、Webブラウザ上と同様にJavaScriptを実行できるわけですが、これはJXAではありません。このため、Webブラウザ上で実行できるJavaScriptはこの方法で呼び出せますが、JXAで書かれたScriptを実行することはできません。

（３）JavaScript CoreでJavaScriptを実行

WebKitでJS実行するのと速度差はありません。同様に、ここで実行できるJavaScriptはJXAではありません。

JS処理系	JXA（JavaScript for Automation)	JSX（with Adobe CC）	JavaScript on WebView	JavaScript Core
GUIアプリケーション操作	OK	Adobeアプリケーションのみ	NG	NG
実行環境	スクリプトエディタ、アプレット、スクリプトメニューなど	ExtendScript Toolkit	WebView	メモリ上でオブジェクトをロードして実行
備考	macOS 10.10で標準装備されたOSA版のJS	Adobe CS/CCを操作するためのJS	Webブラウザ上で動作させるJS	WebkitのJavaScript実行エンジン

▲OS X上で実行可能な（主な）JavaScript処理系

実際に、数値演算ライブラリをJavaScriptで書いて（JXA）AppleScriptから呼び出したときに、頻繁にクラッシュを経験しているため、JXAでライブラリを書くのはリスキーだと感じています。

結局、AppleScriptからJavaScript Coreを呼び出す方法に落ち着き、クラッシュも激減。スピードもJXA呼び出しより30倍ぐらい高速になりました。

AppleScript名：ASでJavaScriptを実行する

use AppleScript version “2.4”
use scripting additions
use framework “Foundation”
use framework “JavaScriptCore”
use framework “WebKit”

–実行するJavaScriptのテキスト
set jsText to “
var app = Application.currentApplication()
app.includeStandardAdditions = true
app.displayDialog(’How are you?’)
“

–run scriptでAppleScriptからJavaScriptを実行する（JXA：アプリケーション操作可能）
set k to run script jsText in “Javascript” –AppleScriptから一番手軽なJXA呼び出し
log {“1”}

–WebKitでJavaScriptを実行する（高速だが、アプリケーション操作不可）
set theWebView to current application’s WebView’s alloc()’s init()
set x to (theWebView’s stringByEvaluatingJavaScriptFromString:jsText) as text
log {“2”}

–JavaScript CoreでJavaScriptを実行する（高速だが、アプリケーション操作不可）
set theContext to current application’s JSContext’s alloc()’s init()
set theJSValue to theContext’s evaluateScript:jsText
log {“3”}

★Click Here to Open This Script　

Numbersの表の選択範囲をHTML化 v2

Posted on 11月 1, 2018 by Takaaki Naganoya

Numbersの最前面の書類で選択中の表の範囲をHTML化してファイルに書き出すAppleScriptです。

Numbers v5.1＋macOS 10.12.6、Numbers v5.2＋macOS 10.13.6、Numbers v5.2＋macOS 10.14.1で確認しています。

Numbers v5.xでは書類の書き出し（export）形式にPDF、Microsoft Excel、CSV、Numbers 09の４形式を指定できるようになっていますが、HTMLの表（table）に書き出してくれたりはしません。

GUI側（↑）にその機能がありませんし、AppleScript用語辞書（↓）にもそういう機能は見当たりません。

ただ、HTMLの表に書き出すという処理自体はとても初歩的で簡単な内容なので、「なければ作ればいい」ということになるでしょう。

そこで、ありもののルーチンを組み合わせて、選択範囲をHTMLの表（table）として書き出すScriptを書いて、OS標準装備のScript Menuに入れて利用しています。書き出すHTMLの内容は個人の趣味や用途に応じて大きく変わってきますので、そのあたりは自由に書き換えるとよいと思われます。

本Scriptは、電子書籍「AppleScript最新リファレンス」の正誤表（2018/1のBlog消失事件の影響で、書籍内で参照していたURLリンクが切れてしまったことへの対処）を作成するために、すでに存在していたものにほんの少しの修正を加えたものです。

データベースやデータからHTMLを作成するという処理は、自分がAppleScriptを覚えようと思ったきっかけでもあり（当時は、FileMaker Pro Server経由でLAN上でデータを共有して処理）、感慨深いものがあります。

AppleScript名：表の選択範囲をHTML化 v2

use AppleScript version "2.5"
use scripting additions
use framework "Foundation"
use bPlus : script "BridgePlus"

script spd
　　property uniqList : {}
end script

set (uniqList of spd) to {}

–Numbersからデータを取得する
set aList to get2DListFromNumbersSelection() of me
if aList = false then return

set colCount to (length of first item of first item of aList) + 1

set aHeader to "<!DOCTYPE html><html lang=＼"ja＼" ><head><meta charset=＼"utf-8＼"><title>First</title><style>table , td, table , tr, th{border:1px solid #333333;padding:1px;}</style></head><body><table >"
set aTable to "<tr><td>%@</td><td> </td><td>%@</td><td>%@</td><td>%@</td></tr>"
set aFooter to "</table></body></html>"

set aHTMLres to retTableHTML(aList, aHeader, aTable, aFooter) of me

set tFile to choose file name with prompt "Select Output File Name and Folder"
set fRes to writeToFileAsUTF8(aHTMLres, tFile, false) of me

on retTableHTML(aList, aHeaderHTML, aTableHTML, aFooterHTML)
　　set allHTML to current application’s NSMutableString’s stringWithString:aHeaderHTML
　　
　　set aCounter to 1
　　repeat with i in aList
　　　　set j to contents of i
　　　　
　　　　set aRowHTML to "<tr>"
　　　　repeat with ii in j
　　　　　　set jj to contents of ii
　　　　　　if jj = missing value then
　　　　　　　　set jj to " "
　　　　　　else
　　　　　　　　try
　　　　　　　　　　set aURL to (current application’s |NSURL|’s URLWithString:jj)
　　　　　　　　　　if aURL is not equal to missing value then
　　　　　　　　　　　　set jj to "<a href=＼"" & jj & "＼">" & jj & "</a>"
　　　　　　　　　　end if
　　　　　　　　end try
　　　　　　end if
　　　　　　
　　　　　　set aTmpHTML to "<td>" & jj & "</td>"
　　　　　　set aRowHTML to aRowHTML & aTmpHTML
　　　　end repeat
　　　　set aRowHTML to aRowHTML & "</tr>"
　　　　
　　　　(allHTML’s appendString:aRowHTML)
　　　　set aCounter to aCounter + 1
　　end repeat
　　
　　(allHTML’s appendString:aFooterHTML)
　　
　　return allHTML as list of string or string
end retTableHTML

–テキストを指定デリミタでリスト化
on parseByDelim(aData, aDelim)
　　set aText to current application’s NSString’s stringWithString:aData
　　set aList to aText’s componentsSeparatedByString:aDelim
　　return aList as list
end parseByDelim

on get2DListFromNumbersSelection()
　　–Numbersで選択範囲を縦に区切ったリストを返す
　　tell application "Numbers"
　　　　tell front document
　　　　　　tell active sheet
　　　　　　　　set theTable to first table whose class of selection range is range
　　　　　　　　
　　　　　　　　tell theTable
　　　　　　　　　　try
　　　　　　　　　　　　set selList to value of every cell of selection range –選択範囲のデータを取得
　　　　　　　　　　on error
　　　　　　　　　　　　return "" –何も選択されてなかった場合
　　　　　　　　　　end try
　　　　　　　　　　
　　　　　　　　　　set selName to name of selection range –選択範囲のrange情報を取得
　　　　　　　　　　set {s1, s2} to parseByDelim(selName, ":") of me
　　　　　　　　　　
　　　　　　　　　　–始点の情報を取得する
　　　　　　　　　　set s1Row to (address of row of range s1) as integer
　　　　　　　　　　set s1Column to (address of column of range s1) as integer
　　　　　　　　　　
　　　　　　　　　　–終点の情報を取得する
　　　　　　　　　　set s2Row to (address of row of range s2) as integer
　　　　　　　　　　set s2Column to (address of column of range s2) as integer
　　　　　　　　　　
　　　　　　　　　　–選択範囲の情報を取得する
　　　　　　　　　　set selHeight to s2Row – s1Row + 1 –高さ(Height of selection range)
　　　　　　　　　　set selWidth to s2Column – s1Column + 1 –幅(Width of selection range)
　　　　　　　　　　
　　　　　　　　end tell
　　　　　　end tell
　　　　end tell
　　end tell
　　
　　set aLen to length of selList
　　set aaLen to selHeight
　　
　　set bList to {}
　　repeat with i from 1 to aaLen
　　　　set aHoriList to {}
　　　　
　　　　repeat with ii from 1 to selWidth
　　　　　　set j1 to ii + (i – 1) * selWidth
　　　　　　set tmpCon to contents of item j1 of selList
　　　　　　
　　　　　　set aClass to class of tmpCon
　　　　　　if aClass = number or aClass = integer or aClass = real then
　　　　　　　　set tmpCon to tmpCon as integer
　　　　　　end if
　　　　　　
　　　　　　set the end of aHoriList to tmpCon
　　　　end repeat
　　　　
　　　　set the end of bList to aHoriList
　　end repeat
　　
　　return bList
　　
end get2DListFromNumbersSelection

on writeToFileAsUTF8(this_data, target_file, append_data)
　　tell current application
　　　　try
　　　　　　set the target_file to the target_file as text
　　　　　　set the open_target_file to open for access file target_file with write permission
　　　　　　if append_data is false then set eof of the open_target_file to 0
　　　　　　write this_data as «class utf8» to the open_target_file starting at eof
　　　　　　close access the open_target_file
　　　　　　return true
　　　　on error error_message
　　　　　　try
　　　　　　　　close access file target_file
　　　　　　end try
　　　　　　return error_message
　　　　end try
　　end tell
end writeToFileAsUTF8

★Click Here to Open This Script　

Accessibility Inspectorがv5.0にバージョンアップして使いにくく？

Posted on 10月 30, 2018 by Takaaki Naganoya

電子ブックからリンクしている情報のBlog側の欠落をチェックしていたら、このAccessibility Inspectorの情報が（Blog上に）抜けていることがわかり、埋めているわけですが………チェックしていたら、バージョンがv4.0からv5.0に上がっていることに気づきました。

▲左側がv4.0、右側がv5.0。v5.0はアプリケーションとして動作し、メニューがある

日常的にアプリケーションのGUI部品の情報を収集するのはPFiddlesoftのUI Browserで、使用率は99.9:0.1でUI Browserのほうが圧倒的に多いわけですが、ごくたまにUI Browserでは手が届かないGUI部品があります。

具体的にいえば、フローティングパレットやポップアップメニュー上の凝ったGUI部品で、これらはUI Browserではオブジェクト階層が途中で途切れているものとして表示されるため、オブジェクト階層を追跡できないことがあります。

そんなわけで、ごくたまに（１年間に１回ぐらい？）Accessibility Inspectorのごやっかいになることがあり、v4.0では問題なく使用できていました。

問題は、いつのまにかアップデートされて入っていたAccessibility Inspector v5.0。

これ、Windowの中のGUI部品は追いかけられるんですが、メニュー部品を追いかけられないように見えるのですが………。目の錯覚なのか、使いこなせていないのか現段階では不明です。

それができないと、Accessibility Inspectorの存在意義が、、、、

＃　メニュー項目はOption＋Spaceで選択中のGUI部品への参照をAccessibility Inspector v5.0のメインウィンドウに表示できることを教えてもらいました

一応、Apple Developper Connectionのアカウントがあれば、Developperサイトにログインして、ダウンロード項目から「Accessibility Tools for Xcode – February 2012」のアーカイブをダウンロードすれば、中にAccessibility Inspector v4.0が入っています。macOS 10.12上にコピーして動かせることを確認しています。

macOS 10.14, MojaveにAccessibility Inspector v4.0をインストールして、期待どおりの動作が行えていることを確認しています。Accessibility Inspector v4.0はCode Signされていないのでシステム環境設定の「セキュリティーとプライバシー」＞「アクセシビリティ」でアクセシビリティへのアクセスを許可しておく必要があります。

なお、Accessibility Inspector v4.0はCode Signされていないので、macOS 10.14, Mojave上で起動するといろいろうるさく言われますが、システム環境設定の「セキュリティーとプライバシー」＞「一般」からAccessibility Inspector v4.0の起動許可を指示すれば大丈夫です。

▲macOS 10.14, Mojave上でAccessibility Inspector v4.0を起動したところ

【基礎】AppleScriptの実行を中断する

Posted on 10月 30, 2018 by Takaaki Naganoya

AppleScriptの実行を途中で任意に停止したい、という場合があります。そのための方法についてまとめておきました。

＃　Blog消失前の投稿を再構成して「たぶんこんな内容」と推測して投稿したものです

実行を中断させる方法はいくつか存在します。ただし、そのためには「何によってAppleScriptが実行されているか」、つまり「ランタイム環境が何なのか？」を明らかにする必要があります。

AppleScriptのランタイム環境は、つきつめると数種類「しか」ないわけですが、そのランタイム環境を呼び出している側のアプリケーションにどの程度の制約を課されているか、という要素も加わってきます。

システムのあちらこちらに存在しているAppleScriptのランタイム環境のうち、ユーザーに近い部分のものについて述べることにしましょう。

ランタイム環境が「スクリプトエディタ」の場合の止め方

スクリプトエディタ上で実行中のAppleScriptは、Command-.（ピリオド）で停止できるようになっています。

ただし、すでに操作対象のアプリケーション側に制御が移っている場合には、アプリケーション側の処理が終わるまで待たされますし、アプリケーションが最前面にくるように（activate）AppleScriptが書かれていた場合には、スクリプトエディタに対して停止のキーボードショートカットを送ることは困難です。

最終的には、Command-Option-Escapeで実行中のプロセス一覧を表示させて、スクリプトエディタを強制終了させることになります。もちろん、Terminal.app上で、Script Editor.appのプロセス番号を調べて、

% kill -7 xxx

などと野蛮な止め方をしてもよいでしょう。AppleScriptの実行を野蛮な方法で停止しても、AppleScriptの内容が壊れることはまずありません。ただし、処理していたデータは中途半端な状態のままになってしまいます。こうした処理を行う場合には、くれぐれも元データを保持しておいて、AppleScriptによる処理が失敗したり途中で停止するようなことになっても、再度実行できるようにしておきましょう。

ランタイム環境がアプレットの場合の止め方

個人的に、AppleScriptアプレットというランタイム環境はスクリプトエディタ上と挙動が変わってくるので、あまり好きではありません。それでも、タイマー割り込みやドラッグ＆ドロップなどの機能を使う場合にはアプレット（ドロップレット）として保存する必要が出てきます。

アプレットの場合も、スクリプトエディタ同様Command-.（ピリオド）で止めることになりますが、たいてい止まらないのでCommand-Option-Escapeによる強制終了、あるいはターミナルから実行中のアプレットのプロセスIDを調べて強制終了、でもよいでしょう。

ランタイム環境がスクリプトメニューの場合の止め方

スクリプトメニューをどのプログラムが受け持っているかは、Mac OS Xの歴史上、いろいろ変わってきたので、OSのバージョンを限定して話をすると、macOS 10.10〜10.13の環境ではosascriptによって実行されてきました。

スクリプトメニューからAppleScriptを実行させると、メニューに回転する歯車アイコンが表示されます。この歯車アイコンをクリックすると実行中のAppleScript一覧が表示され（複数のScriptを並行して同時に実行させることもできます）各Scriptの右下の×ボタンを押すと停止できます。

これでも止まらない場合には、Terminalからosascriptのプロセスをkillすれば大丈夫です。

macOS 10.14ではスクリプトメニューが「スクリプトメニュー」という別のアプリケーションとして実装されたので、macOS 10.14上のスクリプトメニューのランタイム環境は「スクリプトメニュー」です。Command-Option-Escapeでは終了できないので、ターミナルから「スクリプトメニュー」のプロセスIDを調べてkillすることになります。

その他の止め方

Xcode上でAppleScriptによるGUIアプリケーションを作成し、InDesignやIllustratorなどのアプリケーションを操作する処理を実行。この外部アプリケーションの操作を行う処理を止めたいといった場合もあります。

AppleScript Studioの頃とは異なり、最近のAppleScriptObjCによるGUIアプリケーション作成時には、GUIアプリケーション側と外部アプリケーション操作側は完全に分離され、後者についてはXcode上では編集すらできません。データの受け渡しはuser defaults経由で行ったりしています。

難易度の低いやり方は、外部アプリ制御側Scriptで、「処理ループ内で何らかのシグナルを監視する」というものです。特定フォルダの有無でも「メッセージ」アプリケーションのステータスメッセージでも特定Webサーバー上の特定URLのファイルでもよいのですが、それらが存在した場合には停止、というプログラム自体を組んでおきます。デスクトップ上に「Stop」という名前のフォルダが存在していたら終了、というあたりがわかりやすくて簡単な実装例でしょう。

難易度の高いやり方は、外部アプリ制御Scriptを、メモリ上に作成したOSAScriptView上で実行し、停止時にはOSAScriptControllerにstopScript:メソッドを実行するというものです。もちろん、外部アプリ制御Scriptはアプリケーションバンドル内に暗号化したファイルに保存しておき、実行時に復号化してOSAScriptViewにロードすることになります。ユーザーからの停止の仕組みを受け取るのは、Shiftキーなどのキースキャンを定期的に行うことで実現できます。

難易度の高い方が柔軟に止められますが、おすすめは難易度の低いほうです。

Syslogにログ出力

Posted on 10月 29, 2018 by Takaaki Naganoya

syslogにログ出力するAppleScriptです。

よく、AppleScriptで一括処理している時に、途中で規格に合わないデータがあったような場合にはエラーログにその内容を書き込むとか（処理は続行）、きちんと決められた時刻に処理を行なったという証拠を示すために、ログファイルに書き込んだりします。

ログ出力は、仕事でAppleScriptを書いていて割と最後の最後に実装するあたりなので、なるべく手をかけたくない処理でもあります（すべてのデータをテキスト化するKitなども、この「詳細なデータを残す必要はあるが手間はかけたくない」というニーズから生まれたものです）。

ただ、個別のファイルに書いておくのが面倒な場合だと、syslogに出力すればそれでOKという場合もあります。

そんなわけで、極力手を抜きたいログ記録についてはsyslogで済ませたい、という場合に用いるのがこれらの機能（loggerコマンド/NSLog）です。

開発中のAppleScript内に入れておいたlogコマンドの実行を横取りして、on logハンドラ内でsyslog出力するとかいうのが、一番手抜きができていい手口でしょうか。

AppleScript名：Syslogにログ出力（loggerコマンド）

logToSyslog("PiyomaruSoftware ひよこさんだよ") of me

–Syslogにメッセージを出力する
on logToSyslog(theMes)
　　do shell script "logger -s " & quoted form of theMes
end logToSyslog

★Click Here to Open This Script　

AppleScript名：Syslogにログ出力（NSLog）

— Created 2015-10-21 by Shane Stanley
use AppleScript version "2.4"
use scripting additions
use framework "Foundation"

repeat with i from 1 to 10
　　current application’s NSLog("PiyomaruSoftware! I can log %.2d to the Console as float %.2f or hex %X, too", i, i as real, i)
end repeat

★Click Here to Open This Script　