This applescript action checks for Tor Browser's process, if it's not
running launches it and waits until the first window opens after a
connection has been established. Otherwise it quits Tor Browser and
notifies you using QS's default handler. Next it opens a URL or
comma-separated text URLs. You can customize how long it waits for the
connection.
using terms from application "Quıcĸsıɩⅴεʀ"
on process text theURLs
TorConnection(10, 0.5)
set theURLs to theURLsToCSV(theURLs)
repeat with theURL in theURLs as list
if theURL does not start with "http" then set theURL to "http://"; &
theURL
do shell script "open -b org.mozilla.torbrowser " & theURL
delay 0.1
end repeat
end process text
on get direct types
return {"NSStringPboardType", "Apple URL pasteboard type"}
end get direct types
end using terms from
on TorConnection(Attempts, HoldTime)
tell application "System Events"
if not ((every process whose bundle identifier is
"org.mozilla.torbrowser") exists) then
tell application id "org.mozilla.torbrowser" to launch
tell application "Quıcĸsıɩⅴεʀ" to show notification "Tor Browser"
image name "org.mozilla.torbrowser" text "Trying to connect" & return & "to
TOR network…"
repeat with i from 1 to Attempts
delay HoldTime
if (count of (windows whose visible is true and name is not "Tor
Status") of application "TorBrowser") > 0 then
exit repeat
else if i is Attempts then
tell me to do shell script "killall firefox"
tell application "Quıcĸsıɩⅴεʀ" to show notification "Tor Browser"
image name "org.mozilla.torbrowser" text "Connection failed" & return &
return & "Quitting…"
error number -128 -- User canceled
end if
end repeat
end if
end tell
end TorConnection
on theURLsToCSV(theURLs)
-- for multiple values use comma-separated text, comma trick doesn't work
with text nor URLs, #1727
if theURLs contains "," then
set {ASTID, AppleScript's text item delimiters} to {AppleScript's text
item delimiters, {","}}
set theURLs to text items of theURLs
set AppleScript's text item delimiters to ASTID
end if
return theURLs
end theURLsToCSV
--
You received this message because you are subscribed to the Google Groups
"Quicksilver" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to [email protected].
To post to this group, send email to [email protected].
Visit this group at http://groups.google.com/group/blacktree-quicksilver.
For more options, visit https://groups.google.com/groups/opt_out.
