Re: [AS] Fwd: recupérer les exif d'une photo

Page principale
Supprimer ce message
Répondre à ce message
Auteur: Yves Petronin
Date:  
À: La liste AppleScript Francophone
Sujet: Re: [AS] Fwd: recupérer les exif d'une photo
Sur le même thème, un droplet que j’ai à demeure sur le bureau. Il suffit alors de glisser une photo sur le droplet pour accéder aux métadonnées.

Ce droplet nécessite Exiftool, un outil Unix d’ailleurs très facile à installer, et extrêmement puissant pour traiter en batch un grand nombre de photos, donc recommandé aux photographes passionnés. Une fonctionnalité très intéressante d’Exiftool est la possibilité d’extraire un fichier .csv de toute une bibliothèque, de manière récursive comme dans la bibliothèque « Photos » et de modifier des données dans le fichier .csv, puis de les réécrire dans les photos après correction. Par défaut, les fichiers originaux sont préservés, et renommés avec l’extension.original, mais il faut alors de la place pour le stockage, si on traite d’un seul coup des milliers de photos...

-- Début script (à configurer en droplet)
on open the_file
    if ExiftoolInstalled() is true then
        set exiftool_path to "/usr/local/bin/"
        # set exiftool_path to "/usr/bin/"
        set exiftool_args to "-g1 -S"
        set cmd to "exiftool " & exiftool_args & " " & quoted form of POSIX path of the_file
        set the_md to do shell script exiftool_path & cmd

        
        tell application "TextEdit"
            activate
            set NewDoc to make new document
            set text of NewDoc to the_md
        end tell
    else
        set dlg to "Opération impossible !" & return & " L'outil Unix Exiftool n'est pas installé!"
        activate
        display dialog dlg giving up after 5
    end if
end open


on run
    set chosen_file to choose file without invisibles
    open chosen_file
end run


on ExiftoolInstalled()
    try
        tell application "Finder" to set n to ((name of startup disk as string) & ":usr:local:bin:exiftool") as alias
        return true
    on error
        return false
    end try
end ExiftoolInstalled


-- Fin script (à configurer en droplet)


_______________________________________________
Applescript_fr mailing list
Applescript_fr@???
http://listes.patpro.net/mailman/listinfo/applescript_fr