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
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
|
#!/usr/local/bin/ruby -Ke
class Hash
def hash_map
new_hash = Hash.new
each{|k,v| new_hash[k] = yield k,v}
new_hash
end
end
def convert_link(str)
(?a..?z).include?(str[0]) ? "((<SDL.#{str}>))" : "((<SDL::#{str}>))"
end
def convert_dlink(desc, link)
(?a..?z).include?(link[0]) ? "((<#{desc}|SDL.#{link}>))" :
"((<#{desc}|SDL::#{link}>))"
end
def inline(str)
str.gsub(/\$\[(.*?)\]/,'((|\1|))').
gsub(/\@\[(.*?)\|(.*?)\]/){ convert_dlink($1,$2) }.
gsub(/\@\[(.*?)\]/){ convert_link($1) }
end
def format(lines,spaces)
if lines
lines.split(/^/).map{|line| " "*spaces + inline(line)}.join + "\n"
else
""
end
end
MethodDesc = Struct.new(:output, :purpose, :fullname, :module, :lock, :obsolete)
def rsd2rd(input)
part = Hash.new{""}
mode = nil
input.each do |line|
case line
when /^(MOD|DEP|NAME|PURPOSE|TYPE|RVAL|OBSOLETE)\s+/
part[$1] = $'.chomp
when "LOCK\n"
part["LOCK"] = ""
when /^(PROTO|DESC|NOTES|RET|EXCEPTION|EXAMPLE|BUG|SEEALSO|COMMENT)\s*$/
mode = $1
when "EXCEPTION *\n"
if $english
part["EXCEPTION"] = "Raises @[Error] on failure"
else
part["EXCEPTION"] = "ԤȤˤ㳰@[Error]ȯޤ\n"
end
else
part[mode] += line
end
end
%w(NAME PURPOSE TYPE PROTO).each do |v|
raise "There isn't #{v} at #{part["NAME"]}" unless part.key?(v)
end
if !part.has_key?("DESC") && !part.has_key?("OBSOLETE")
raise "There isn't DESC and OBSOLETE at #{part["NAME"]}"
end
part = part.hash_map{|_, line| line.sub(/\n+\z/,"\n")}
output = ""
ns = if part.key?("MOD") then "SDL::#{part["MOD"]}" else "SDL" end
part["PROTO"].each{|proto| output << "--- #{ns}#{part["TYPE"]}#{proto}"}
output << "\n"
if part.key?("OBSOLETE")
if $english
output << format("This method is obsolete. Please use @[#{part["OBSOLETE"]}] instead.\n", 4)
else
output << format("ΥåɤѤϿ侩ޤ@[#{part["OBSOLETE"]}]ѤƤ\n", 4)
end
end
output << format(part["DESC"],4)
if part.key?("LOCK")
output << "\n"
if $english
output << format("This method needs @[Locking|Surface#lock].\nIf @[auto_lock?] is true, Ruby/SDL automatically locks/unlocks the surface.",4)
else
output << format("ΥåɤȤˤϥե@[å|Surface#lock]ɬפޤ\n@[auto_lock?]ξϥƥबưŪ˥å/åޤ",4)
end
end
output << format(part["RET"],4)
output << format(part["EXCEPTION"],4)
if part.key?("DEP")
if $english
output << "\n You need #{part["DEP"]} to use this method.\n"
else
output << "\n ΥåɤȤˤ #{part["DEP"]} ɬפǤ\n"
end
end
if part.key?("EXAMPLE")
output << "\n EXAMPLE\n"
output << format(part["EXAMPLE"],6)
end
if part.key?("NOTES")
output << " * NOTES\n\n"
output << format(part["NOTES"],6)
end
if part.key?("BUG")
output << " * BUG\n\n"
output << format(part["NOTES"],6)
end
if part.key?("SEEALSO")
output << " * See Also\n \n "
output << part["SEEALSO"].
split(/\n/).
map{|line| line[0] == ?( ? line : convert_link(line) }.
join(", ")
output << "\n\n"
end
MethodDesc.new(output,
part["PURPOSE"],
"#{ns}#{part["TYPE"]}#{part["NAME"]}",
part["MOD"],
part.key?("LOCK"),
part.has_key?("OBSOLETE"))
end
def toc(methods)
methods.reject{|m| m.obsolete}.
map{|m| " * ((<#{m.fullname}>)) -- #{inline(m.purpose)}" }.join("\n")
end
def locklist(methods)
methods.find_all{|m| m.lock}.map{|m| "* ((<#{m.fullname}>))"}.join("\n ")
end
def methodlist(mod, methods)
methods.find_all{|m| m.module == mod && !m.obsolete}.
map{|m| "* ((<#{m.fullname}>)) -- #{inline(m.purpose)}"}.
join("\n")
end
if ARGV.size == 1 && ARGV.shift == "-e"
$english = true
else
$english = false
end
synop, descs = ARGF.read.split(/^%%%$/)
methods = if descs then descs.split(/^%%$/).map{|m| rsd2rd(m)} else [] end
STDOUT << format(synop, 0).gsub(/^TOC$/){ toc(methods) }.
gsub(/^METHODS\((.*)\)$/){methodlist($1, methods)}
methods.each{|m| STDOUT << m.output.gsub("LOCKLIST"){ locklist(methods) }}
|
