Find a specific file with automator

The basic question is:

How can I pass a filename to the Spotlight search module in Automator?

The essential problem:

I have hundreds of broken aliases scattered throughout a particular directory on my HD. The original files DO STILL EXIST, but for some reason the aliases have lost their connection. I would like to replace them all with symlinks, so that they can be backed up by Rsync.

Here is a scaled-down example of a folder with broken aliases in it:

enter image description here

Now here is an example of a sub-directory that contains both the originals of some of the broken aliases, as well as additional copies of the SAME alias, that still point to another location for their originals:

enter image description here

And lastly, here is an image of a directory that contains the master files to some of the aliases that were located in both of the previous 2 locations:

enter image description here

So what I need to do is:

  1. Identify all aliases in a user-defined directory
  2. Use the filenames of those aliases to locate their original files, in a second user-defined directory (recursively and ensuring not to identify a second alias as an original)
  3. remove the alias
  4. create a symlink to the original file, in the former location of the alias

I'm using Automator wherever I can, and Applescript wherever I must. Prior to the response that prompted these edits, my workflow did the following:

  1. Prompt for the location to look for original files
  2. Prompt for location to look for aliases
  3. Get POSIX paths to all aliases
  4. Get text filenames of all the aliases

Now, it gets a bit further but with some problems:

  1. I had an alias titled "3dfx & ambience.rfl" (changed already in the screenshots to "3dfx and ambience.rfl"). The applescript provided would fail on that file due to the ampersand.
  2. After fixing #1, the script ran and did indeed remove broken aliases and replace them with symlinks. But the symlinks pointed to the parent folder that contained the originals, not the originals themselves. So I ended up with 2 symlinks, "Luftrum 1 - Thor Ambient.rfl" and "Luftrum 2 - Thor Ambient II.rfl", that in reality pointed to the "Luftrum" folder shown in my third screenshot above.

Hopefully this will be enough detail to ultimately arrive at a working solution. I can tell it's very close.


If you simply want to pass a file name to the Spotlight action

The pass the file name from an action to a set variable Action

  • set the Spotlight Action to ignore the any above action. Done by right clicking on it's title bar and using the menu.

enter image description here

  • drag and drop the variable token into the search text field.

enter image description here


THIS IS AN UPDATE

Using Automator actions and Applescript to store properties for later retrieval:

The idea here is the first action writes out a applescript file to the documents folder.

The script will be used to store information we get along the way and then retrieve it later on in the final Applescript action.

We do this because we need to pass the final script multiple bits of information. Which we cannot do with the normal variables in Automator.

The Actions.

enter image description here

  1. Run Applescript: Write out a a storage script to the documents folder

The script.

set script_text to MakeScript()
my RunMaker(script_text)

on RunMaker(script_text)
    set file_path to (path to documents folder as Unicode text) & "MyProperties.scpt"
    set file_path to POSIX path of file_path as string
    store script script_text in file_path with replacing
end RunMaker


on MakeScript()

    script
        property theBrokenAliasFolderPath : ""
        property broken_alias_file_Paths : {}

        property theOriginalFolderPath : ""
        property Original_file_Paths : {}


        property SearchfileNames : {}

    end script
end MakeScript

2, Ask for Finder Items: This is for the Broken Alias folder.

  • Set to Ignore Input
  • set your start at: at your broken alias folder.
  • set your Type to: Folder

3,Run Applescript:

  • Writes out broken alias folder path to a property in the storage script file.
  • pass the path on to the next action

( The write outs are done by the Action Applescript loading the storage file script. This will be a version of sorts. It will then change properties in its version and re-write the file out again replacing the old one)

--WRITE OUT BROKEN ALIAS FOLDER PATH


on run {input, parameters}

    set file_path to (path to documents folder as Unicode text) & "MyProperties.scpt" as alias

    set script_text to load script file_path

    set theBrokenAliasFolderPath of script_text to (POSIX path of (item 1 of input))


    my RunMaker(script_text)

    return input
end run



on RunMaker(script_text)
    set file_path to (path to documents folder as Unicode text) & "MyProperties.scpt"
    set file_path to POSIX path of file_path as string
    store script script_text in file_path with replacing
end RunMaker

4,Get Folder contents:

  • The action receives the "broken alias folder path" and gets all the contents of the folder.

5, Filter Finder Items:

  • Filter the items so they only contain alias files.

All: Kind : is : other : alias

  • Pass the list to the next Action

6, Run Applescript:

Writes out broken alias PATHS to a property in the storage script file.

on run {input, parameters}

    set file_path to (path to documents folder as Unicode text) & "MyProperties.scpt" as alias

    set script_text to load script file_path

    set broken_alias_file_Paths of script_text to input


    my RunMaker(script_text)

    return input
end run
on RunMaker(script_text)
    set file_path to (path to documents folder as Unicode text) & "MyProperties.scpt"
    set file_path to POSIX path of file_path as string
    store script script_text in file_path with replacing
end RunMaker

7, Ask for Finder Items: This is for the Original files folder.

  • Set to Ignore Input
  • set your start at: at your Original files folder.
  • set your Type to: Folder

8,Run Applescript:

Writes out the Original files folder to a property in the storage script file.

 on run {input, parameters}

        set file_path to (path to documents folder as Unicode text) & "MyProperties.scpt" as alias

        set script_text to load script file_path

        set theOriginalFolderPath of script_text to (POSIX path of (item 1 of input))


        my RunMaker(script_text)

        return input
    end run



    on RunMaker(script_text)
        set file_path to (path to documents folder as Unicode text) & "MyProperties.scpt"
        set file_path to POSIX path of file_path as string
        store script script_text in file_path with replacing
    end RunMaker

9, Run Applescript:

This retrieves the information from the storage script. This will take the list of paths of the dead alias files.

  • Try and Find a matching file in the Original files folder. It will look at all matches but ignore aliases.

  • Remove the old Alias file (checking it is a alias file first)

  • Create a symlink in the folder the old alias was in from the matching file found.

  • Only alias files should be deleted. If no matching file is found then the alias file will not be deleted. Nor will a symlink be created.

.

set file_path to (path to documents folder as Unicode text) & "MyProperties.scpt" as alias

            set theScript to load script file_path


            --choose a search folder
            set searchPath to quoted form of theOriginalFolderPath of theScript
            set folderPath to quoted form of theBrokenAliasFolderPath of theScript
            set input to broken_alias_file_Paths of theScript


            repeat with i from 1 to count of items of input

                set this_item to item i of input

                set aliasPath to this_item

                #Get the the file name
                set theFileName to "\\\"" & (do shell script "basename " & quoted form of (POSIX path of (this_item))) & "\\\"" as string
                log theFileName

                #search the searchPath for a matching file with the same name.
                #NOTE: this will find all files with he same name. So We use last paragraph to get what should be the first one it finds.
                set theOrigFilePath to paragraphs of (do shell script "mdfind -onlyin " & searchPath & " kMDItemFSName == \"" & theFileName & "\"")


                if theOrigFilePath is not quoted form of "" then

                    repeat with i from 1 to count of items in theOrigFilePath

                        set this_item to item i of theOrigFilePath
                        log this_item
                        tell application "Finder"

                            #make sure we are pointing to an alais that will be deleted and not another symlink file. Otherwise the original file will be deleted.

                            set theKind to kind of ((POSIX file this_item) as alias)

                            if theKind is not equal to "Alias" then
                                set this_item to quoted form of (item i of theOrigFilePath)
                                my symLink(aliasPath, this_item)
                            end if


                        end tell


                    end repeat



                end if

            end repeat


            on symLink(aliasPath, aOrigFilePath)

                #move to trash the old alias file

                set theOldAlias to aliasPath
                tell application "Finder"

                    #make sure we are pointing to an alais that will be deleted and not another symlink file. Otherwise the original file will be deleted.

                    set theKind to kind of theOldAlias
                    set theNewFilePath to (POSIX path of (aliasPath)) as string
                    if theKind is equal to "Alias" then
                        delete theOldAlias

                        log "ln -s  " & aOrigFilePath & space & (quoted form of theNewFilePath)
                        #create the symlink
                        do shell script "ln -s  " & aOrigFilePath & space & (quoted form of theNewFilePath)
                    end if
                end tell
            end symLink

Test first.. use at your own risk and all that..


Usually "broken alias" refers to an alias where the original file no longer exists. I have used this script to find aliases like that:

set l to {}
tell application "Finder"
    try
        alias files of entire contents of (POSIX file "/Users/username" as alias)
        result as list
    on error
        return
    end try
    repeat with f in result
        try
            original item of contents of f
        on error
            --move contents of f to trash
            set end of l to POSIX path of (f as text)
        end try
    end repeat
end tell
set text item delimiters to linefeed
l as text

If the script finds the aliases you want to replace symlinks, save the relevant lines of the output to a text file. Then try running a shell script like this:

cat /tmp/aliases.txt | while IFS= read -r f; do
  original=$(find ~/directory/with/original/files -name "${f##*/}" | head -n1)
  echo "$f:$original"
  # rm "$f"; ln -s "$original" "$f"
done