Skip to content

Instantly share code, notes, and snippets.

@ttscoff
Created September 9, 2011 21:06
Show Gist options
  • Save ttscoff/1207337 to your computer and use it in GitHub Desktop.
Save ttscoff/1207337 to your computer and use it in GitHub Desktop.
Convert inline Markdown links to references
#!/usr/bin/env ruby
def e_sh(str)
str.to_s.gsub(/(?=[^a-zA-Z0-9_.\/\-\x7F-\xFF\n])/n, '\\').gsub(/\n/, "'\n'").sub(/^$/, "''")
end
def find_headers(lines)
in_headers = false
lines.each_with_index {|line, i|
if line =~ /^\S[^\:]+\:( .*?)?$/
in_headers = true
elsif in_headers === true
return i
else
return false
end
}
end
input = STDIN.read
links = input.scan(/\((https?:\/\/([^\)]+))\)/)
refs = input.scan(/^\[([^\]]+)\]: (\S+)$/)
lines = input.split("\n")
bottom = lines[0..-1].join("\n").gsub(/^\[([^\]]+)\]: (\S+)\n?/,'')
norepeat = []
norepeatlinks = []
output = []
refs.each {|ref|
name = ref[0]
next if norepeatlinks.include? ref[1]
while norepeat.include? name
if name =~ / ?[0-9]$/
name.next!
else
name = name + " 2"
end
end
output << {'orig' => ref[0], 'title' => name, 'link' => ref[1]}
norepeat.push name
norepeatlinks.push ref[1]
}
links.each {|url|
next if norepeatlinks.include? url[0]
domain = url[0].match(/https?:\/\/([^\/]+)/)
parts = domain[1].split('.')
name = case parts.length
when 1 then parts[0]
when 2 then parts[0]
else parts[1]
end
while norepeat.include? name
if name =~ / ?[0-9]$/
name.next!
else
name = name + " 2"
end
end
output << {'orig' => url[0], 'title' => name, 'link' => url[0] }
norepeat.push name
norepeatlinks.push url[0]
}
output = output.sort {|a,b| a['title'] <=> b['title']}
o = []
output.each_with_index { |x,i|
o.push("[#{x['title']}]: #{x['link']}")
bottom = bottom.gsub(/\((#{e_sh x['orig']}|#{e_sh x['link']})\)/,"[#{x['title']}]").gsub(/\[#{e_sh x['orig']}\]/,"[#{x['title']}]")
}
puts bottom + "\n\n#{o.join("\n")}\n"
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment