1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
|
require 'pathname'
puts %Q[
CREATE TABLE searchIndex(id INTEGER PRIMARY KEY, name TEXT, type TEXT, path TEXT);
CREATE UNIQUE INDEX anchor ON searchIndex (name, type, path);
]
INSERT_SQL = %Q[
INSERT INTO searchIndex(name, type, path) VALUES ('%s','%s','%s');
]
PATTERN = %r[<title>GNU automake: (.+)</title>]
def quote(s)
s.gsub(/&/, '&').gsub(/'/, "\\'")
end
ARGV.each do |arg|
Pathname.glob(arg) do |path|
match = path.each_line.lazy.map { |line| PATTERN.match(line) }.find { |m| m }
if match
printf INSERT_SQL, quote(match[1]), 'Guide', path.basename
else
$stderr.puts "%{path.basename}: no title found"
end
end
end
|