Applescript - ¿Cómo puedo seleccionar todas las *no* carpetas en una ventana de vista de lista expandida?

Lamentablemente, Finder no permite revelar los archivos de esta manera.

El siguiente código establece 'theFiles' a los archivos en el directorio elegido, pero 'reveal' no soporta ningún parámetro. Si ya tiene la ventana abierta, selecciona los archivos en root de la carpeta elegida en esa ventana, pero luego abre una ventana para cada otra carpeta recursivamente.

tell application "Finder"
  set theFiles to get every item of (entire contents of folder (choose folder)) whose kind ≠ "Folder"
  reveal theFiles
end tell

Sigo sintiendo que esto es más bien una Problema XY sin embargo.

Si todas las carpetas se gastan en la vista de lista, aquí hay dos soluciones.

Primera solución:

Este AppleScript

my deselectAllFolders()

on deselectAllFolders()
    script o
        property sel : {}
    end script
    tell application "Finder"
        set o's sel to selection as alias list
        set tc to count o's sel
        repeat with i from 1 to tc
            if class of item (item i of o's sel) is folder then set item i of o's sel to missing value
        end repeat
        set selection to aliases of o's sel -- select all items without folders
    end tell
    return "" -- to not put all files into the result (it's very slow to show an huge list in the editor )
end deselectAllFolders

Contras:

• Todos los elementos deben ser seleccionados antes de ejecutar el script.
• Lento en la enorme lista de artículos.

Segunda solución:

Este AppleScript

set pScript to "from Foundation import NSFileManager, NSURL, NSDirectoryEnumerationSkipsHiddenFiles, NSURLIsDirectoryKey, NSURLIsPackageKey; from ScriptingBridge import SBApplication
def procFolder(fold):
    p = df.contentsOfDirectoryAtURL_includingPropertiesForKeys_options_error_(fold, [NSURLIsDirectoryKey, NSURLIsPackageKey], NSDirectoryEnumerationSkipsHiddenFiles, None)[0]
    for f in p:
           r=f.getResourceValue_forKey_error_(None, NSURLIsPackageKey, None)
           if r[0] and r[1]:
               allFiles.append(f)
           else:
               r=f.getResourceValue_forKey_error_(None, NSURLIsDirectoryKey, None)
               if r[0] and r[1]:
                     procFolder(f)
               else:
                     allFiles.append(f) 

allFiles = []
df=NSFileManager.defaultManager() 
finderApp = SBApplication.applicationWithBundleIdentifier_(\"com.apple.finder\")
tPath = finderApp.FinderWindows()[0].target().get()
procFolder(NSURL.URLWithString_(tPath.URL()))
finderApp.setSelection_(allFiles)"

do shell script "/usr/bin/python -c " & quoted form of pScript

• No es necesario seleccionar todos los elementos en la vista de lista.
• Rápido (1,5 segundos en 8500 elementos)