#!/usr/bin/ruby
# orders footnotes by first occurence
# Urs Meyer, ursmr [at] gmx.ch, September 2008
filename = ARGV[0] || "sample4.txt"
mapping = {}
newref = 0
lines = []
File.foreach(filename) { |line|
if ($. == 1) .. line =~ /@footnote:/ # text body
line.scan(/\[(\d+)\]/).flatten.each { |ref|
mapping[ref] = (newref += 1) if mapping[ref].nil?
}
# print text body now as footnote mapping is known
puts line.gsub(/\[(\d+)\]/) { "[#{mapping[$1]}]" }
else # footnote targets
# collect targets sorted in an array
line =~ /\[(\d+)\]/
lines[mapping[$1]] = line.sub(/\[(\d+)\]/) { "[#{mapping[$1]}]" } unless $1.nil? || mapping[$1].nil?
end
}
