DZone Snippets: finder code

Open current Finder window folder in TextMate

SimonDorfman (Simon Dorfman) — Thu, 29 Dec 2005 17:10:24 GMT

// Opens the current Finder window folder in TextMate. Or open a file or folder in TextMate by dragging it onto this script.



-- Opens the current finder window folder in TextMate. Or open a file or folder in TextMate by dragging it onto this script.

-- adopted from a script I found in the comments of this article: http://www.macosxhints.com/article.php?story=20050924210643297



-- Instructions for use:

-- paste this script into Script Editor and save as an application to ~/Library/Scripts/Applications/Finder/open in TextMate

-- run via the AppleScript Menu item (http://www.apple.com/applescript/scriptmenu/)

-- Or better yet, Control-click and drag it to the top of a finder window so it appears in every finder window.

-- Activate it by clicking on it or dragging a file or folder onto it.



-- Another nice touch is to give the saved script the same icon as TextMate.

-- To do this, in the finder, Get info (Command-I) of both TextMate and this saved script.

-- Click the TextMate icon (it will highlight blue) and copy it by pressing Comand-C.

-- Click on this script's icon and paste by pressing Command-V.



-- Another way to give it the same icon as TextMate is to save the script as an application bundle (instead of an application),

--  then copy the icon by entering these commands in Terminal:

-- $ cd ~/Library/Scripts/Applications/Finder/open\ in\ TextMate.app/Contents/Resources/

-- $ rm droplet.icns

-- $ cp /Applications/TextMate.app/Contents/Resources/TextMate.icns droplet.icns

-- $ touch ~/Library/Scripts/Applications/Finder/open\ in\ TextMate.app



-- script was opened by click in toolbar

on run

	tell application "Finder"

		try

			set currFolder to (folder of the front window as string)

		on error

			display dialog "Error: " & the error_number & ". " & the error_message buttons {"OK"} default button 1

		end try

	end tell

	CD_to(currFolder, false)

end run



-- script run by draging file/folder to icon

on open (theList)

	CD_to(theList, false)

end open



-- open the file/folder in TextMate

on CD_to(theDir, newWindow)

	try

		set theDir to quoted form of POSIX path of theDir as string

		do shell script "open -a TextMate " & theDir

	on error the error_message number the error_number

		display dialog "Error: " & the error_number & ". " & the error_message buttons {"OK"} default button 1

	end try

end CD_to

Show/Hide Hidden Files

SimonDorfman (Simon Dorfman) — Sun, 11 Dec 2005 05:35:14 GMT

// for toggling invisible files on and off in the finder



-- found this script here: http://forums.macosxhints.com/showpost.php?p=251001&postcount=3

-- i added the "delay 5" because after running script, finder didn't relaunch, maybe that's not needed on a faster machine

-- it's for toggling invisible files on and off in the finder, use for when i need to copy .htaccess files via a GUI



on run

	set hiddenState to (do shell script "/usr/bin/defaults read com.apple.Finder AppleShowAllFiles")

	try

		if hiddenState = "0" or hiddenState contains "does not exist" then

			set showPrompt to display alert "Are you sure you want to show all hidden files?" message "The Finder will quit and relaunch afterwards." buttons {"Cancel", "Show Hidden Files"} default button "Show Hidden Files"

			if button returned of showPrompt = "Show Hidden Files" then

				tell application "Finder" to quit

				do shell script "/usr/bin/defaults write com.apple.Finder AppleShowAllFiles 1"

				delay 5 --give finder time to quit so it can be relaunched below

			else if button returned of showPrompt = "Cancel" then

				return 0

			end if

		else if hiddenState = "1" then

			set showPrompt to display alert "Are you sure you want to hide all hidden files?" message "The Finder will quit and relaunch afterwards." buttons {"Cancel", "Hide Hidden Files"} default button "Hide Hidden Files"

			if button returned of showPrompt = "Hide Hidden Files" then

				tell application "Finder" to quit

				do shell script "/usr/bin/defaults write com.apple.Finder AppleShowAllFiles 0"

				delay 5 --give finder time to quit so it can be relaunched below

			else if button returned of showPrompt = "Cancel" then

				return 0

			end if

		end if

	on error theError

		FinderCheck()

		display alert theError as critical message "Changes may or may not have been made."

	end try

	FinderCheck()

end run



on FinderCheck()

	tell application "System Events"

		if (name of every process) does not contain "Finder" then

			tell application "Finder" to launch

		end if

	end tell

end FinderCheck

Open current Finder window in new iTerm tab

SimonDorfman (Simon Dorfman) — Sun, 11 Dec 2005 05:29:29 GMT

// cd to the current finder window folder in iTerm. Or drag a folder onto this script to cd to that folder in iTerm.



-- cd to the current finder window folder in iTerm. Or drag a folder onto this script to cd to that folder in iTerm.

-- found this script in the comments of this article: http://www.macosxhints.com/article.php?story=20050924210643297



-- Instructions for use:

-- paste this script into Script Editor and save as an application to ~/Library/Scripts/Applications/Finder/cd to in iTerm

-- run via the AppleScript Menu item (http://www.apple.com/applescript/scriptmenu/)

-- Or better yet, Control-click and drag it to the top of a finder window so it appears in every finder window.

-- Activate it by clicking on it or dragging a folder onto it.



-- Another nice touch is to give the saved script the same icon as iTerm.

-- To do this, in the finder, Get info (Command-I) of both iTerm and this saved script.

-- Click the iTerm icon (it will highlight blue) and copy it by pressing Comand-C.

-- Click on this script's icon and paste by pressing Command-V.



-- Another way to give it the same icon as iTerm is to save the script as an application bundle (instead of an application),

--  then copy the icon by entering these commands in iTerm:

-- $ cd ~/Library/Scripts/Applications/Finder/cd\ to\ in\ iTerm.app/Contents/Resources/

-- $ rm droplet.icns

-- $ cp /Applications/iTerm.app/Contents/Resources/iTerm.icns droplet.icns

-- $ touch ~/Library/Scripts/Applications/Finder/cd\ to\ in\ iTerm.app



-- script was opened by click in toolbar

on run

	tell application "Finder"

		try

			set currFolder to (folder of the front window as string)

		on error

			set currFolder to (path to desktop folder as string)

		end try

	end tell

	CD_to(currFolder, false)

end run



-- script run by draging file/folder to icon

on open (theList)

	set newWindow to false

	repeat with thePath in theList

		set thePath to thePath as string

		if not (thePath ends with ":") then

			set x to the offset of ":" in (the reverse of every character of thePath) as string

			set thePath to (characters 1 thru -(x) of thePath) as string

		end if

		CD_to(thePath, newWindow)

		set newWindow to true -- create window for any other files/folders

	end repeat

	return

end open



-- cd to the desired directory in iterm

on CD_to(theDir, newWindow)

	set theDir to quoted form of POSIX path of theDir as string

	tell application "iTerm"

		activate

		delay 1

		-- talk to the first terminal 

		tell the first terminal

			try

				-- launch a default shell in a new tab in the same terminal 

				launch session "Default Session"

			on error

				display dialog "There was an error creating a new tab in iTerm." buttons {"OK"}

			end try

			tell the last session

				try

					-- cd to the finder window

					write text "cd " & theDir

				on error

					display dialog "There was an error cding to the finder window." buttons {"OK"}

				end try

			end tell

		end tell

	end tell

end CD_to