¿Cómo traducir entre las ubicaciones de los archivos al estilo de Windows y Mac?

También usé un applescript primero para la conversión de enlaces Windows/MacOS pero luego encontré la aplicación para MacOS LinkConverter que hace el trabajo para mí.

Recibirás notificaciones por cada enlace encontrado en tu portapapeles. Según la configuración de la aplicación, el enlace se convertirá:

También funciona con archivos y carpetas.

Sé que este es un intercambio antiguo, pero sigue funcionando. He bifurcado el código para mostrar un ejemplo de conversión de una ruta de unidad de red a un protocolo SMB con una dirección IP del servidor.

Esto es útil si los usuarios de Windows tienen una unidad de red con letras como W:\a\really\tedious\folder\path

https://gist.github.com/jberg412/036484376a56f09e1a4a

Gracias por el original script PenguinRob.

on searchReplace(theText, SearchString, ReplaceString)
    set OldDelims to AppleScript's text item delimiters
    set AppleScript's text item delimiters to SearchString
    set newText to text items of theText
    set AppleScript's text item delimiters to ReplaceString
    set newText to newText as text
    set AppleScript's text item delimiters to OldDelims
    return newText
end searchReplace

on run {input, parameters}

    set myClip to the input
    set mylocation to searchReplace(myClip, "<", "")
    set mylocation to searchReplace(mylocation, ">.", "")
    set mylocation to searchReplace(mylocation, ">", "")
    set mylocation to searchReplace(mylocation, "\\", "/")
    set mylocation to "smb:" & mylocation
    # convert Windows network drive paths to SMB addresses EXAMPLE:
    set mylocation to searchReplace(mylocation, "smb:W:", "smb://10.0.0.1/shares")
    # check if the person who gave you the windows link used a lowercase drive letter:
    set mylocation to searchReplace(mylocation, "smb:w:", "smb://10.0.0.1/shares")
    # fix issue with spaces
    set mylocation to searchReplace(mylocation, " ", "%20")

    tell application "Finder"
        open location mylocation
    end tell

    # after setting the location, set Finder to topmost, or delete this section if you dont want that.
    tell application "Finder"
        activate
    end tell

    return input
end run