feat(open-dialog): add OSAScript version

Author: ObserverOfTime

.github/workflows/issues.yml

@@ -61,6 +61,13 @@ jobs:
           project-name: Open Dialog (PowerShell)
           project-column: To do
           project-scope: repository
+      - name: Add to Open Dialog (OSAScript) project
+        if: contains(github.event.issue.body, '`open-dialog/osascript.lua`')
+        uses: jeffdanielperso/[email protected]
+        with:
+          project-name: Open Dialog (OSAScript)
+          project-column: To do
+          project-scope: repository
       - name: Add to Discord project
         if: contains(github.event.issue.body, '`discord.lua`')
         uses: jeffdanielperso/[email protected]

open-dialog/README.md

@@ -34,18 +34,12 @@ If not, you should download
 
 ### Windows
 
-You just have to download [powershell.lua](powershell.lua).
+Download [powershell.lua](powershell.lua).
 
 ### MacOS
 
-You can install Zenity from [MacPorts][ports]
-or [Homebrew][brew] and download [zenity_nox.lua][zenity-nox].
-
-**TODO**: Write an AppleScript version.
+Download [osascript.lua](osascript.lua).
 
 [kdialog]: https://github.com/KDE/kdialog
 [zenity]: https://github.com/GNOME/zenity
 [xdotool]: https://github.com/jordansissel/xdotool
-[zenity-nox]: https://git.io/JeZZL
-[brew]: https://formulae.brew.sh/formula/zenity
-[ports]: https://ports.macports.org/port/zenity/summary

open-dialog/osascript.lua

@@ -0,0 +1,102 @@
+local utils = require 'mp.utils'
+
+local MULTIMEDIA = utils.format_json({
+    'AAC',
+    'AVI',
+    'FLAC',
+    'FLV',
+    'M3U',
+    'M3U8',
+    'M4V',
+    'MKV',
+    'MOV',
+    'MP3',
+    'MP4',
+    'MPEG',
+    'MPG',
+    'OGA',
+    'OGG',
+    'OGV',
+    'OPUS',
+    'WAV',
+    'WEBM',
+    'WMV',
+})
+
+local SUBTITLES = utils.format_json({
+    'ASS',
+    'SRT',
+    'SSA',
+    'SUB',
+    'TXT',
+})
+
+---@class OSAOpts
+---@field title string
+---@field text string|nil
+---@field args string[]
+---@field language? string
+---@field template? string
+
+---@param opts OSAOpts
+---@return fun()
+local function OSAScript(opts)
+    return function()
+        local template = opts.template or [[
+            var app = Application.currentApplication()
+            app.includeStandardAdditions = true
+            app.chooseFile({
+                ofType: %s,
+                withPrompt: %q,
+                defaultLocation: %q,
+                multipleSelectionsAllowed: true
+            }).join("\n\r")
+        ]]
+        local language = opts.language or 'AppleScript'
+        local path = mp.get_property('path')
+        path = path == nil and '.' or utils.split_path(
+            utils.join_path(utils.getcwd(), path)
+        )
+        local ontop = mp.get_property_native('ontop')
+        mp.set_property_native('ontop', false)
+        local osascript = utils.subprocess {
+            args = {
+                'osascript', '-l', language, '-e',
+                template:format(opts.text, opts.title, path)
+            }, cancellable = false
+        }
+        mp.set_property_native('ontop', ontop)
+        if osascript.status ~= 0 then return end
+        for file in osascript.stdout:gmatch('[^\r\n]+') do
+            mp.commandv(opts.args[1], file, opts.args[2])
+        end
+    end
+end
+
+mp.add_key_binding('Ctrl+f', 'open-files', OSAScript {
+    title = 'Select Media Files',
+    text = MULTIMEDIA,
+    args = {'loadfile', 'append-play'},
+    language = 'JavaScript'
+})
+mp.add_key_binding('Ctrl+F', 'open-url', OSAScript {
+    title = 'Open URL',
+    text = 'Enter the URL to open:',
+    args = {'loadfile', 'replace'},
+    template = [[
+        try
+            return text returned of ( ¬
+                display dialog "Enter the URL to open:" ¬
+                    with title "Open URL" default answer "" ¬
+                    buttons {"Cancel", "OK"} default button 2)
+        on error number -128
+            return ""
+        end try
+    ]],
+})
+mp.add_key_binding('Alt+f', 'open-subs', OSAScript {
+    title = 'Select Subtitles',
+    text = SUBTITLES,
+    args = {'sub-add', 'select'},
+    language = 'JavaScript'
+})