ttscoff · September 9, 2011 21:06 · Sep 9, 2011
diff --git a/inline2ref.rb b/inline2ref.rb
@@ -0,0 +1,74 @@
+#!/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"
No results found