Create cross reference links in Evernote [No Ruby] (OSX)

README.md

Create cross reference links in Evernote [No Ruby] (OSX)

Create links within a single note. An alternate version for Create cross reference links in Evernote (OSX) that does not require the pasteboard ruby gem.

Requirement

• OS X (Yosemite and Mavericks)
• Evernote OSX client (>6.0.0)

Caveat:
This package does not require the pasteboard ruby gem like the original one, but there might be some minor problems. Most evident ones are:

• after triggering the "Create cross reference" action, please wait 3 seconds without doing anything while the link is being generated. A dialog will pop up to tell you that the link has been generated when the workflow is finished.
• you won't be able to easily undo the operation (with 'cmd+z', for example).

Installation

• Option 1: Download "Create Cross Reference (no ruby) - applescript.workflow.zip", unzip and install as a service. (Updated 2015-5-1: Thanks to JMichael for suggestions)
• Option 2: Build your own workflow/service using Automator with the 3 scripts in this gist (see the screenshot for example)

Usage

Warning: The generated result (a link + styled anchor) will be written to your clipboard.

See a demo here

• In Evernote client, select text that you would like to set as "destination", right click and select "Service -> Create Cross Reference". This selected text will be your "anchor".
• You will be asked to enter a "label" for this destination (default value should be fine most of the time).
• Next you will be asked to enter the text for the generated link.
• The selected text will be replaced by a generated link and a styled anchor.
• Feel free to move the generated link to anywhere you want within the same note. Clicking on this link should take you to your anchor.

Configuration

You can modify create-cross-reference-links-0.applescript to style the generated link/anchor as you like.

Note for developers

Basically, this workflow does the following:

1. Get selected text, prompt user for label text and link text.
2. Create two <a> elements of the form: <a href="#label-text">Link text</a> for the link and <a name="label-text">Selected Text</a> for the destination.
3. Formulate these two elements into the OSX clipboard.
4. Paste (with cmd + v) and replace the selected text.
5. Since the Evernote client will automatically add evernote-html-snippet:// to links with href starting with #, use applescript to scan the whole note and get rid of all these redundant strings.

 

As you can see, step 5 is not very elegant as it operates on the html content of the whole note. In the original version, we can use pasteboard to formulate the clipboard/pasteboard data precisely as type com.evernote.ce.raw (a UTI defined by Evernote) so that the Evernote client will not add evernote-html-snippet:// automatically.

automator.png

create-cross-ref-links-1.applescript

---
--- Part of the "Create Cross Reference" workflow for Evernote (OSX)
---
--- License: MIT http://opensource.org/licenses/MIT
--- Copyright (c) 2015 Hong Chen
---
--- Permission is hereby granted, free of charge, to any person obtaining a copy
--- of this software and associated documentation files (the "Software"), to deal
--- in the Software without restriction, including without limitation the rights
--- to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
--- copies of the Software, and to permit persons to whom the Software is
--- furnished to do so, subject to the following conditions:
---
--- The above copyright notice and this permission notice shall be included in
--- all copies or substantial portions of the Software.
---
--- THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
--- IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
--- FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
--- AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
--- LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
--- OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
--- THE SOFTWARE.
---
---

on run {input, parameters}
    
    (* Your script goes here *)
    
    tell application "Evernote" to activate
    
    delay 0.5
    
    tell application "System Events" to keystroke "v" using command down
    
    delay 2.5
    
    tell application "Evernote"
        set currentNote to missing value
        set _sel to selection -- Gets the Note(s) Selected in Evernote
        if _sel ≠ {} then
            set currentNote to first item of _sel -- Get ONLY the 1st Note
            -- Process the selected Note
        end if
        if currentNote is missing value then
            return
        end if
        
        set confirmNotePrompt to "Are you editing " & title of currentNote & "?"
        display dialog confirmNotePrompt buttons {"Yes", "No"} with title "Confirm current note" default button "Yes"
        if button returned of result is "No" then
            return
        end if
        set htmlContent to HTML content of currentNote
        set cleanLinkCommand to "echo " & quoted form of htmlContent & "|sed \"s/evernote\\-html\\-snippet:\\/\\///g\"" as string
        --- return htmlContent
        set htmlContent to do shell script cleanLinkCommand
        set HTML content of currentNote to htmlContent
        display dialog "Cross reference created!"
        set newHTMLContent to HTML content of currentNote
        --- return newHTMLContent
        return htmlContent
    end tell
    
    return input
end run

create-cross-ref-links.applescript

---
--- Part of the "Create Cross Reference" workflow for Evernote (OSX)
---
--- License: MIT http://opensource.org/licenses/MIT
--- Copyright (c) 2015 Hong Chen
---
--- Permission is hereby granted, free of charge, to any person obtaining a copy
--- of this software and associated documentation files (the "Software"), to deal
--- in the Software without restriction, including without limitation the rights
--- to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
--- copies of the Software, and to permit persons to whom the Software is
--- furnished to do so, subject to the following conditions:
---
--- The above copyright notice and this permission notice shall be included in
--- all copies or substantial portions of the Software.
---
--- THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
--- IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
--- FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
--- AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
--- LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
--- OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
--- THE SOFTWARE.
---

on stripLeadingAnchor(str)
	set stripLeadingAnchorCommand to "echo " & quoted form of str & "|sed \"s/^anchor-//\"" as string
	set str to do shell script stripLeadingAnchorCommand
	return str
end stripLeadingAnchor

on sanitizeLabel(label)
	set newLabel to label as string
	set toLowerCaseCommand to "echo " & quoted form of newLabel & "|sed \"y/ABCDEFGHIJKLMNOPQRSTUVWXYZ/abcdefghijklmnopqrstuvwxyz/\"" as string
	set newLabel to do shell script toLowerCaseCommand
	set sanitizeCommand to "echo " & quoted form of newLabel & "|sed \"s/[^a-z0-9\\-]/\\-/g\"" as string
	set newLabel to do shell script sanitizeCommand
	set newLabel to stripLeadingAnchor(newLabel)
	set stripTrailingHyphenCommand to "echo " & quoted form of newLabel & "|sed \"s/-*?(?=$)//\"" as string
	set newLabel to do shell script stripTrailingHyphenCommand
	set newLabel to "anchor-" & newLabel
	set trimHyphensCommand to "echo " & quoted form of newLabel & "|sed \"s/-{2,}/-/g\"" as string
	set newLabel to do shell script trimHyphensCommand
	return newLabel
end sanitizeLabel


on run {input, parameters}
	
	(* Your script goes here *)
	
	set selectedText to input as string
	set defaultLabel to sanitizeLabel(input)
	
	set prompt0 to "Please specifiy a label for this anchor: "
	set prompt0 to prompt0 & "(numberes, letters and hyphens('-') only)"
	display dialog prompt0 default answer defaultLabel with title "Label"
	set label to text returned of result
	set label to sanitizeLabel(label)
	if length of label is 5 then
		set label to defaultLabel
	end if
	
	set defaultLinkText to "Link to #" & stripLeadingAnchor(label)
	set prompt1 to "Please specify text to the link:"
	display dialog prompt1 default answer defaultLinkText with title "Link text"
	set linkText to text returned of result
	
	set resultText to "<a href=\"#" & label & "\" style=\"font-size: 16px;  font-family: Arial, sans-serif, serif;\">" & linkText & "</a><br><br>"
	set resultText to resultText & "<b><u><a name=\"" & label & "\" style=\"font-size: 18px; font-family: Arial, sans-serif, serif;\" title=\"" & label & "\">" & selectedText & "</a></u></b>"
	
	---- set hexdumpCommand to "`echo -n " & quoted form of resultText & " | hexdump -ve '1/1 \"%.2x\"'`"
	---- set clipboardCommand to hexdumpCommand & "; osascript -e \"set the clipboard to «data HTML${hex}»\""
	----- do shell script clipboardCommand
	
	return resultText
end run

create-cross-ref-links.sh

read richLink
#echo "$richLink"
hex=`echo -n $richLink | hexdump -ve '1/1 "%.2x"'`
osascript -e "set the clipboard to «data HTML${hex}»"

create-cross-ref-screenshot.gif

Link to Dropbox is down... Any up possible ?