rwdschedule 0.93 → 0.94
Sign up to get free protection for your applications and to get access to all the features.
- data/Readme.txt +6 -0
- data/code/01rwdcore/01rwdcore.rb +20 -20
- data/code/01rwdcore/02helptexthashbegin.rb +4 -4
- data/code/01rwdcore/03helptexthash.rb +30 -47
- data/code/01rwdcore/04helptextend.rb +6 -6
- data/code/01rwdcore/openhelpwindow.rb +10 -24
- data/code/01rwdcore/returntomain.rb +10 -0
- data/code/01rwdcore/rwdtinkerversion.rb +15 -15
- data/code/01rwdcore/rwdwindowreturn.rb +9 -9
- data/code/superant.com.rwdtinkerbackwindow/controlclient.rb +100 -0
- data/code/superant.com.rwdtinkerbackwindow/diagnostictab.rb +21 -21
- data/code/superant.com.rwdtinkerbackwindow/helptexthashtinkerwin2.rb +37 -0
- data/code/superant.com.rwdtinkerbackwindow/installapplet.rb +21 -21
- data/code/superant.com.rwdtinkerbackwindow/listinstalledfiles.rb +1 -1
- data/code/superant.com.rwdtinkerbackwindow/listzips.rb +6 -6
- data/code/superant.com.rwdtinkerbackwindow/loadconfigurationrecord.rb +31 -31
- data/code/superant.com.rwdtinkerbackwindow/loadconfigurationvariables.rb +13 -13
- data/code/superant.com.rwdtinkerbackwindow/network.rb +87 -0
- data/code/superant.com.rwdtinkerbackwindow/openappletname.rb +18 -18
- data/code/superant.com.rwdtinkerbackwindow/openhelpwindowtinkerwin2.rb +39 -0
- data/code/superant.com.rwdtinkerbackwindow/removeapplet.rb +28 -28
- data/code/superant.com.rwdtinkerbackwindow/runrwdtinkerbackwindow.rb +11 -11
- data/code/superant.com.rwdtinkerbackwindow/rwdtinkerwin2version.rb +14 -14
- data/code/superant.com.rwdtinkerbackwindow/saveconfigurationrecord.rb +18 -18
- data/code/superant.com.rwdtinkerbackwindow/viewappletcontents.rb +21 -0
- data/code/superant.com.schedule/helptexthashrwdschedule.rb +19 -3
- data/code/superant.com.schedule/{openhelpwindowrubyslippers.rb → openhelpwindowrwdschedule.rb} +11 -2
- data/code/superant.com.schedule/returntomain.rb +10 -0
- data/code/superant.com.schedule/runrwdschedulemenu1.rb +34 -0
- data/code/zz0applicationend/zz0end.rb +4 -4
- data/configuration/language.cnf +5 -5
- data/configuration/rwdapplicationidentity.cnf +3 -0
- data/configuration/rwdscheduleversion.cnf +1 -1
- data/configuration/rwdtinker.cnf +1 -0
- data/configuration/rwdtinkerversion.cnf +2 -2
- data/configuration/tinkerwin2variables.cnf +8 -8
- data/configuration/tinkerwin2version.cnf +3 -3
- data/ev/browser.rb +109 -109
- data/ev/ftools.rb +170 -170
- data/ev/net.rb +750 -750
- data/ev/ruby.rb +819 -819
- data/ev/rwd.rb +1849 -1848
- data/ev/sgml.rb +236 -236
- data/ev/thread.rb +63 -63
- data/ev/tree.rb +343 -343
- data/ev/xml.rb +4 -4
- data/gui/00coreguibegin/applicationguitop.rwd +4 -4
- data/gui/frontwindow0/superant.com.rwdschedules/gg0viewevent.rwd +1 -1
- data/gui/frontwindow0/superant.com.rwdschedules/gl6editrecord.rwd +10 -10
- data/gui/frontwindow0/superant.com.rwdschedules/gl8contactutilities.rwd +1 -0
- data/gui/frontwindow0/superant.com.zmenus/m01menubegin.rwd +10 -0
- data/gui/frontwindow0/superant.com.zmenus/m02menu.rwd +36 -0
- data/gui/frontwindow0/superant.com.zmenus/m03menu.rwd +12 -0
- data/gui/frontwindow0/superant.com.zmenus/m85menu.rwd +21 -0
- data/gui/frontwindow0/superant.com.zmenus/m88menu.rwd +12 -0
- data/gui/frontwindow0/superant.com.zmenus/m99menuend.rwd +3 -0
- data/gui/frontwindowselectionbegin/selectiontabbegin/selectiontabbegin.rwd +16 -16
- data/gui/frontwindowselections/superant.com.rwdtinkerwin2selectiontab/rwdwin2selectiontab.rwd +12 -12
- data/gui/frontwindowselectionzend/viewselectionzend/viewselectionend.rwd +3 -3
- data/gui/frontwindowtdocumentbegin/superant.com.documentsbegin/tt0documentbegin.rwd +6 -6
- data/gui/frontwindowtdocuments/superant.com.documents/uu5documents.rwd +15 -15
- data/gui/frontwindowtdocuments/superant.com.tinkerwin2documents/uu5documents.rwd +6 -6
- data/gui/frontwindowtdocumentzend/superant.com.documentsend/ww0documentend.rwd +12 -12
- data/gui/frontwindowz1end/frontwindowend/xx0rwdfirsttab.rwd +6 -6
- data/gui/helpaboutbegin/superant.com.helpaboutbegin/ya0helpscreenstart.rwd +3 -3
- data/gui/helpaboutinstalled/superant.com.rwdwin2helpabout/1appname.rwd +4 -4
- data/gui/helpaboutinstalled/superant.com.rwdwin2helpabout/3copyright.rwd +3 -3
- data/gui/helpaboutinstalled/superant.com.rwdwin2helpabout/5version.rwd +10 -10
- data/gui/helpaboutinstalled/superant.com.tinkerhelpabout/1appname.rwd +4 -4
- data/gui/helpaboutinstalled/superant.com.tinkerhelpabout/3copyright.rwd +3 -3
- data/gui/helpaboutinstalled/superant.com.tinkerhelpabout/5version.rwd +10 -10
- data/gui/helpaboutzend/superant.com.helpaboutend/helpscreenend.rwd +2 -2
- data/gui/tinkerbackwindows/superant.com.rwdschedulebackwindow/67viewconfiguration.rwd +38 -0
- data/gui/tinkerbackwindows/superant.com.rwdschedulebackwindow/m01menubegin.rwd +10 -0
- data/gui/tinkerbackwindows/superant.com.rwdschedulebackwindow/m02menu.rwd +36 -0
- data/gui/tinkerbackwindows/superant.com.rwdschedulebackwindow/m03menu.rwd +12 -0
- data/gui/tinkerbackwindows/superant.com.rwdschedulebackwindow/m85menu.rwd +21 -0
- data/gui/tinkerbackwindows/superant.com.rwdschedulebackwindow/m88menu.rwd +12 -0
- data/gui/tinkerbackwindows/superant.com.rwdschedulebackwindow/m99menuend.rwd +3 -0
- data/gui/tinkerbackwindows/superant.com.tinkerbackwindow/1appname.rwd +5 -5
- data/gui/tinkerbackwindows/superant.com.tinkerbackwindow/{50rwdlistzips.rwd → 40rwdlistzips.rwd} +42 -35
- data/gui/tinkerbackwindows/superant.com.tinkerbackwindow/50rwdlistapplets.rwd +44 -44
- data/gui/tinkerbackwindows/superant.com.tinkerbackwindow/60editconfiguration.rwd +38 -37
- data/gui/tinkerbackwindows/superant.com.tinkerbackwindow/70rwddiagnostics.rwd +33 -33
- data/gui/tinkerbackwindows/superant.com.tinkerbackwindow/75rwdcontrol.rwd +33 -0
- data/gui/tinkerbackwindows/superant.com.tinkerbackwindow/80tab1.rwd +11 -11
- data/gui/tinkerbackwindows/superant.com.tinkerbackwindow/9backend.rwd +6 -6
- data/gui/tinkerbackwindows/superant.com.tinkerhelpwindow/1appname.rwd +30 -31
- data/gui/tinkerbackwindows/superant.com.tinkerhelpwindow/9end.rwd +4 -4
- data/gui/tinkerbackwindows/superant.com.versionwindow/1appname.rwd +19 -19
- data/gui/zzcoreguiend/tinkerapplicationguiend/yy9rwdend.rwd +4 -4
- data/init.rb +269 -233
- data/installed/rwdtinkerwin2-0.5.inf +8 -8
- data/lang/alanguagehashbegin.rb +4 -4
- data/lang/en/rwdcore/languagefile.rb +15 -15
- data/lang/es/rwdcore/languagefile-es.rb +14 -14
- data/lang/jp/rwdcore/languagefile.rb +9 -9
- data/lang/languagehash.rb +4 -4
- data/lang/nl/rwdcore/languagefile.rb +19 -19
- data/lang/vlanguagehashend.rb +6 -6
- data/lang/wlocallangstart.rb +5 -5
- data/lang/zlocallangend.rb +2 -2
- data/lib/temp.rb +1 -1
- data/rwd_files/HowTo_Schedule.txt +6 -0
- data/rwd_files/HowTo_Tinker.txt +361 -348
- data/rwd_files/HowTo_TinkerWin2.txt +202 -202
- data/rwd_files/Readme.txt +57 -57
- data/rwd_files/rdoc-style.css +174 -174
- data/rwd_files/rwdapplications.html +54 -54
- data/tests/totranslate.lang +93 -0
- data/zips/rwdahelloworld-0.5.zip +0 -0
- data/zips/rwdwcalc-0.50.zip +0 -0
- metadata +33 -17
- data/configuration/rwdplayscriptsversion.cnf +0 -2
- data/gui/frontwindow0/superant.com.rwdschedules/zviewconfiguration.rwd +0 -38
- data/gui/tinkerbackwindows/superant.com.rwdschedulebackwindow/66viewconfiguration.rwd +0 -16
- data/gui/tinkerbackwindows/superant.com.rwdschedulebackwindow/80returntab.rwd +0 -11
- data/installed/rwdviewlogo-0.4.inf +0 -4
- data/rwd_files/tinker.png +0 -0
- data/updates/200502Februay01 Lynn back.sch +0 -8
- data/updates/200502Februay21 PCU Diner.sch +0 -8
- data/updates/200502february16a.sch +0 -8
- data/updates/200505may02a.sch +0 -8
- data/updates/200506june20a.sch +0 -8
- data/updates/200506june29a.sch +0 -8
- data/updates/200510october26a.sch +0 -8
data/ev/thread.rb
CHANGED
@@ -1,63 +1,63 @@
|
|
1
|
-
require "ev/ruby"
|
2
|
-
require "thread"
|
3
|
-
|
4
|
-
class FakeThread
|
5
|
-
def initialize(*args)
|
6
|
-
yield(*args)
|
7
|
-
end
|
8
|
-
|
9
|
-
def join
|
10
|
-
end
|
11
|
-
end
|
12
|
-
|
13
|
-
class ThreadLimiter
|
14
|
-
def initialize(limit)
|
15
|
-
@limit = limit
|
16
|
-
@count = 0
|
17
|
-
@threads = []
|
18
|
-
@mutex = Mutex.new
|
19
|
-
@cv = ConditionVariable.new
|
20
|
-
|
21
|
-
every(1) do
|
22
|
-
@mutex.synchronize do
|
23
|
-
@threads.dup.each do |t|
|
24
|
-
unless t.alive?
|
25
|
-
$stderr.puts "Found dead thread."
|
26
|
-
|
27
|
-
@threads.delete(t)
|
28
|
-
|
29
|
-
@count -= 1
|
30
|
-
|
31
|
-
@cv.signal
|
32
|
-
end
|
33
|
-
end
|
34
|
-
end
|
35
|
-
end
|
36
|
-
end
|
37
|
-
|
38
|
-
def wait
|
39
|
-
if block_given?
|
40
|
-
self.wait
|
41
|
-
yield
|
42
|
-
self.signal
|
43
|
-
else
|
44
|
-
@mutex.synchronize do
|
45
|
-
@threads << Thread.current
|
46
|
-
|
47
|
-
@count += 1
|
48
|
-
|
49
|
-
@cv.wait(@mutex) if @count > @limit
|
50
|
-
end
|
51
|
-
end
|
52
|
-
end
|
53
|
-
|
54
|
-
def signal
|
55
|
-
@mutex.synchronize do
|
56
|
-
@threads.delete(Thread.current)
|
57
|
-
|
58
|
-
@count -= 1
|
59
|
-
|
60
|
-
@cv.signal
|
61
|
-
end
|
62
|
-
end
|
63
|
-
end
|
1
|
+
require "ev/ruby"
|
2
|
+
require "thread"
|
3
|
+
|
4
|
+
class FakeThread
|
5
|
+
def initialize(*args)
|
6
|
+
yield(*args)
|
7
|
+
end
|
8
|
+
|
9
|
+
def join
|
10
|
+
end
|
11
|
+
end
|
12
|
+
|
13
|
+
class ThreadLimiter
|
14
|
+
def initialize(limit)
|
15
|
+
@limit = limit
|
16
|
+
@count = 0
|
17
|
+
@threads = []
|
18
|
+
@mutex = Mutex.new
|
19
|
+
@cv = ConditionVariable.new
|
20
|
+
|
21
|
+
every(1) do
|
22
|
+
@mutex.synchronize do
|
23
|
+
@threads.dup.each do |t|
|
24
|
+
unless t.alive?
|
25
|
+
$stderr.puts "Found dead thread."
|
26
|
+
|
27
|
+
@threads.delete(t)
|
28
|
+
|
29
|
+
@count -= 1
|
30
|
+
|
31
|
+
@cv.signal
|
32
|
+
end
|
33
|
+
end
|
34
|
+
end
|
35
|
+
end
|
36
|
+
end
|
37
|
+
|
38
|
+
def wait
|
39
|
+
if block_given?
|
40
|
+
self.wait
|
41
|
+
yield
|
42
|
+
self.signal
|
43
|
+
else
|
44
|
+
@mutex.synchronize do
|
45
|
+
@threads << Thread.current
|
46
|
+
|
47
|
+
@count += 1
|
48
|
+
|
49
|
+
@cv.wait(@mutex) if @count > @limit
|
50
|
+
end
|
51
|
+
end
|
52
|
+
end
|
53
|
+
|
54
|
+
def signal
|
55
|
+
@mutex.synchronize do
|
56
|
+
@threads.delete(Thread.current)
|
57
|
+
|
58
|
+
@count -= 1
|
59
|
+
|
60
|
+
@cv.signal
|
61
|
+
end
|
62
|
+
end
|
63
|
+
end
|
data/ev/tree.rb
CHANGED
@@ -1,343 +1,343 @@
|
|
1
|
-
require "ev/ruby"
|
2
|
-
require "ev/net"
|
3
|
-
require "md5"
|
4
|
-
require "thread"
|
5
|
-
|
6
|
-
Same = 0
|
7
|
-
Down = 1
|
8
|
-
Up = 2
|
9
|
-
Dummy = 3
|
10
|
-
|
11
|
-
module TextArray
|
12
|
-
def textarray
|
13
|
-
@children.collect do |obj|
|
14
|
-
[obj.text] << obj.textarray
|
15
|
-
end.flatten.compact
|
16
|
-
end
|
17
|
-
end
|
18
|
-
|
19
|
-
|
20
|
-
module ParseTree
|
21
|
-
def parsetree(premethod="prechildren", postmethod="postchildren", *args)
|
22
|
-
if @visible
|
23
|
-
method(premethod).call(*args) if respond_to?(premethod)
|
24
|
-
|
25
|
-
@children.each do |obj|
|
26
|
-
obj.parsetree(premethod, postmethod, *args)
|
27
|
-
end
|
28
|
-
|
29
|
-
method(postmethod).call(*args) if respond_to?(postmethod)
|
30
|
-
end
|
31
|
-
end
|
32
|
-
|
33
|
-
#def parsetree(premethod="prechildren", postmethod="postchildren", *args)
|
34
|
-
# stack = [self]
|
35
|
-
# done = []
|
36
|
-
#
|
37
|
-
# while not stack.empty?
|
38
|
-
# obj = stack.pop
|
39
|
-
#
|
40
|
-
# if not done.include?(obj)
|
41
|
-
# obj.method(premethod).call(*args) if obj.respond_to?(premethod)
|
42
|
-
#
|
43
|
-
# stack.push(obj)
|
44
|
-
# done.push(obj)
|
45
|
-
#
|
46
|
-
# stack.concat obj.children.reverse
|
47
|
-
# #obj.children.reverse.each do |cobj|
|
48
|
-
# #stack.push(cobj)
|
49
|
-
# #end
|
50
|
-
# else
|
51
|
-
# obj.method(postmethod).call(*args) if obj.respond_to?(postmethod)
|
52
|
-
# end
|
53
|
-
# end
|
54
|
-
#end
|
55
|
-
end
|
56
|
-
|
57
|
-
class TreeObject
|
58
|
-
attr_reader :subtype
|
59
|
-
attr_writer :subtype
|
60
|
-
attr_reader :upordown
|
61
|
-
attr_writer :upordown
|
62
|
-
attr_reader :level
|
63
|
-
attr_writer :level
|
64
|
-
attr_reader :parent
|
65
|
-
attr_writer :parent
|
66
|
-
attr_reader :children
|
67
|
-
attr_writer :children
|
68
|
-
attr_reader :closed
|
69
|
-
attr_writer :closed
|
70
|
-
attr_reader :text
|
71
|
-
attr_writer :text
|
72
|
-
attr_reader :visible
|
73
|
-
attr_writer :visible
|
74
|
-
|
75
|
-
include TextArray
|
76
|
-
include ParseTree
|
77
|
-
|
78
|
-
def initialize(subtype=nil)
|
79
|
-
@subtype = subtype
|
80
|
-
@upordown = Same
|
81
|
-
@level = nil
|
82
|
-
@parent = nil
|
83
|
-
@children = []
|
84
|
-
@closed = nil
|
85
|
-
@visible = true
|
86
|
-
end
|
87
|
-
|
88
|
-
def inspect
|
89
|
-
parent, children = @parent, @children
|
90
|
-
|
91
|
-
@parent, @children = parent.id, children.collect{|obj| obj.id}
|
92
|
-
|
93
|
-
res = " " * (level-1) + "#{self.class}(#{@subtype}) #{super}"
|
94
|
-
|
95
|
-
@parent, @children = parent, children
|
96
|
-
|
97
|
-
res
|
98
|
-
end
|
99
|
-
end
|
100
|
-
|
101
|
-
class Tree
|
102
|
-
@@versie = 1
|
103
|
-
@@mutex = Mutex.new
|
104
|
-
|
105
|
-
attr_reader :data
|
106
|
-
attr_writer :data
|
107
|
-
attr_reader :parent
|
108
|
-
attr_writer :parent
|
109
|
-
attr_reader :children
|
110
|
-
attr_writer :children
|
111
|
-
attr_reader :visible
|
112
|
-
attr_writer :visible
|
113
|
-
|
114
|
-
include TextArray
|
115
|
-
include ParseTree
|
116
|
-
|
117
|
-
def initialize(string)
|
118
|
-
string = string.join("") if string.kind_of?(Array)
|
119
|
-
|
120
|
-
@data = string
|
121
|
-
@parent = nil
|
122
|
-
@children = []
|
123
|
-
@objects = []
|
124
|
-
@visible = true
|
125
|
-
@checkvisibility = false
|
126
|
-
|
127
|
-
buildobjects(string)
|
128
|
-
buildparents
|
129
|
-
buildchildren
|
130
|
-
markclosed
|
131
|
-
deletedummies
|
132
|
-
|
133
|
-
@checkvisibility = true
|
134
|
-
end
|
135
|
-
|
136
|
-
def self.file(file)
|
137
|
-
new(File.new(file).readlines)
|
138
|
-
end
|
139
|
-
|
140
|
-
def self.location(url, form=Hash.new)
|
141
|
-
s = HTTPClient.get(url, form)
|
142
|
-
s = "" if s.nil?
|
143
|
-
new(s)
|
144
|
-
end
|
145
|
-
|
146
|
-
def self.new_from_cache2(data)
|
147
|
-
new(data)
|
148
|
-
end
|
149
|
-
|
150
|
-
def self.new_from_cache(data)
|
151
|
-
hash = MD5.new("#{@@versie} #{data}")
|
152
|
-
|
153
|
-
dir = "#{temp}/evcache.#{user}/tree.new"
|
154
|
-
file = "#{dir}/#{hash}"
|
155
|
-
|
156
|
-
tree = nil
|
157
|
-
|
158
|
-
Dir.mkdirrec(dir)
|
159
|
-
|
160
|
-
if File.file?(file)
|
161
|
-
@@mutex.synchronize do
|
162
|
-
tree = Marshal.restore(File.new(file, "rb"))
|
163
|
-
end
|
164
|
-
else
|
165
|
-
tree = new(data)
|
166
|
-
|
167
|
-
if not tree.nil?
|
168
|
-
@@mutex.synchronize do
|
169
|
-
File.open(file, "wb") {|f| Marshal.dump(tree, f)}
|
170
|
-
end
|
171
|
-
end
|
172
|
-
end
|
173
|
-
|
174
|
-
return tree
|
175
|
-
end
|
176
|
-
|
177
|
-
def inspect
|
178
|
-
@objects.collect do |obj|
|
179
|
-
obj.inspect
|
180
|
-
end.join("\n")
|
181
|
-
end
|
182
|
-
|
183
|
-
def buildobjects(string)
|
184
|
-
raise "Has to be defined in the subclass."
|
185
|
-
end
|
186
|
-
|
187
|
-
def buildparents
|
188
|
-
level = 1
|
189
|
-
levels = Hash.new
|
190
|
-
levels[0] = nil
|
191
|
-
parse do |type, obj|
|
192
|
-
case obj.upordown
|
193
|
-
when Down
|
194
|
-
obj.level = level
|
195
|
-
obj.parent = levels[level-1]
|
196
|
-
levels[level] = obj
|
197
|
-
level += 1
|
198
|
-
when Up, Dummy
|
199
|
-
pl = level
|
200
|
-
1.upto(level-1) do |l|
|
201
|
-
po = levels[l]
|
202
|
-
pl = l if po.subtype == obj.subtype
|
203
|
-
end
|
204
|
-
level = pl
|
205
|
-
obj.level = level
|
206
|
-
obj.parent = levels[level-1]
|
207
|
-
when Same
|
208
|
-
obj.level = level
|
209
|
-
obj.parent = levels[level-1]
|
210
|
-
end
|
211
|
-
end
|
212
|
-
end
|
213
|
-
|
214
|
-
def buildchildren
|
215
|
-
@objects.each do |obj|
|
216
|
-
obj.children = []
|
217
|
-
end
|
218
|
-
|
219
|
-
parse do |type, obj|
|
220
|
-
if not obj.parent.nil?
|
221
|
-
po = obj.parent
|
222
|
-
po.children << obj
|
223
|
-
else
|
224
|
-
@children << obj
|
225
|
-
end
|
226
|
-
end
|
227
|
-
end
|
228
|
-
|
229
|
-
def markclosed
|
230
|
-
([self].concat @objects).each do |obj|
|
231
|
-
obj.children.each_index do |i|
|
232
|
-
co1 = obj.children[i]
|
233
|
-
co2 = obj.children[i+1]
|
234
|
-
|
235
|
-
co1.closed = (not co2.nil? and co1.upordown == Down and (co2.upordown == Up or co2.upordown == Dummy) and co1.subtype == co2.subtype)
|
236
|
-
end
|
237
|
-
end
|
238
|
-
end
|
239
|
-
|
240
|
-
def deletedummies
|
241
|
-
([self].concat @objects).each do |obj|
|
242
|
-
obj.children.delete_if do |obj2|
|
243
|
-
obj2.upordown == Dummy
|
244
|
-
end
|
245
|
-
end
|
246
|
-
|
247
|
-
@objects.delete_if do |obj|
|
248
|
-
obj.upordown == Dummy
|
249
|
-
end
|
250
|
-
end
|
251
|
-
|
252
|
-
def parse(types=[], subtypes=[], once=false)
|
253
|
-
types = [types] if types.class == Class
|
254
|
-
subtypes = [subtypes] if subtypes.class == String
|
255
|
-
hidelevel = nil
|
256
|
-
|
257
|
-
catch :once do
|
258
|
-
@objects.each do |obj|
|
259
|
-
if (@checkvisibility and hidelevel.nil? and (not obj.visible))
|
260
|
-
hidelevel = obj.level
|
261
|
-
else
|
262
|
-
if (@checkvisibility and (not hidelevel.nil?) and obj.visible and obj.level <= hidelevel)
|
263
|
-
hidelevel = nil
|
264
|
-
end
|
265
|
-
end
|
266
|
-
|
267
|
-
if hidelevel.nil?
|
268
|
-
ok = false
|
269
|
-
catch :stop do
|
270
|
-
if types.empty?
|
271
|
-
if subtypes.empty?
|
272
|
-
ok = true
|
273
|
-
throw :stop
|
274
|
-
else
|
275
|
-
subtypes.each do |st|
|
276
|
-
if obj.subtype == st
|
277
|
-
ok = true
|
278
|
-
throw :stop
|
279
|
-
end
|
280
|
-
end
|
281
|
-
end
|
282
|
-
else
|
283
|
-
if subtypes.empty?
|
284
|
-
types.each do |t|
|
285
|
-
if obj.kind_of?(t)
|
286
|
-
ok = true
|
287
|
-
throw :stop
|
288
|
-
end
|
289
|
-
end
|
290
|
-
else
|
291
|
-
types.each do |t|
|
292
|
-
subtypes.each do |st|
|
293
|
-
if obj.kind_of?(t) and obj.subtype == st
|
294
|
-
ok = true
|
295
|
-
throw :stop
|
296
|
-
end
|
297
|
-
end
|
298
|
-
end
|
299
|
-
end
|
300
|
-
end
|
301
|
-
end
|
302
|
-
|
303
|
-
if ok
|
304
|
-
yield(obj.class.to_s, obj)
|
305
|
-
|
306
|
-
throw :once if once
|
307
|
-
end
|
308
|
-
end
|
309
|
-
end
|
310
|
-
end
|
311
|
-
end
|
312
|
-
|
313
|
-
def path(pad)
|
314
|
-
p1 = self
|
315
|
-
|
316
|
-
unless pad.nil?
|
317
|
-
pad.split(/\//).each do |deel|
|
318
|
-
tag, voorkomen = deel.split(/:/)
|
319
|
-
|
320
|
-
if (not tag.nil?) and (not p1.nil?)
|
321
|
-
voorkomen = 1 if voorkomen.nil?
|
322
|
-
voorkomen = voorkomen.to_i
|
323
|
-
|
324
|
-
teller = 0
|
325
|
-
p2 = nil
|
326
|
-
p1.children.each_index do |i|
|
327
|
-
#if p1.children[i].upordown == Down
|
328
|
-
unless p1.children[i].subtype.nil?
|
329
|
-
if p1.children[i].subtype.noquotes == tag.noquotes
|
330
|
-
teller += 1
|
331
|
-
p2 = p1.children[i] if teller == voorkomen
|
332
|
-
end
|
333
|
-
end
|
334
|
-
#end
|
335
|
-
end
|
336
|
-
p1 = p2
|
337
|
-
end
|
338
|
-
end
|
339
|
-
end
|
340
|
-
|
341
|
-
p1
|
342
|
-
end
|
343
|
-
end
|
1
|
+
require "ev/ruby"
|
2
|
+
require "ev/net"
|
3
|
+
require "md5"
|
4
|
+
require "thread"
|
5
|
+
|
6
|
+
Same = 0
|
7
|
+
Down = 1
|
8
|
+
Up = 2
|
9
|
+
Dummy = 3
|
10
|
+
|
11
|
+
module TextArray
|
12
|
+
def textarray
|
13
|
+
@children.collect do |obj|
|
14
|
+
[obj.text] << obj.textarray
|
15
|
+
end.flatten.compact
|
16
|
+
end
|
17
|
+
end
|
18
|
+
|
19
|
+
|
20
|
+
module ParseTree
|
21
|
+
def parsetree(premethod="prechildren", postmethod="postchildren", *args)
|
22
|
+
if @visible
|
23
|
+
method(premethod).call(*args) if respond_to?(premethod)
|
24
|
+
|
25
|
+
@children.each do |obj|
|
26
|
+
obj.parsetree(premethod, postmethod, *args)
|
27
|
+
end
|
28
|
+
|
29
|
+
method(postmethod).call(*args) if respond_to?(postmethod)
|
30
|
+
end
|
31
|
+
end
|
32
|
+
|
33
|
+
#def parsetree(premethod="prechildren", postmethod="postchildren", *args)
|
34
|
+
# stack = [self]
|
35
|
+
# done = []
|
36
|
+
#
|
37
|
+
# while not stack.empty?
|
38
|
+
# obj = stack.pop
|
39
|
+
#
|
40
|
+
# if not done.include?(obj)
|
41
|
+
# obj.method(premethod).call(*args) if obj.respond_to?(premethod)
|
42
|
+
#
|
43
|
+
# stack.push(obj)
|
44
|
+
# done.push(obj)
|
45
|
+
#
|
46
|
+
# stack.concat obj.children.reverse
|
47
|
+
# #obj.children.reverse.each do |cobj|
|
48
|
+
# #stack.push(cobj)
|
49
|
+
# #end
|
50
|
+
# else
|
51
|
+
# obj.method(postmethod).call(*args) if obj.respond_to?(postmethod)
|
52
|
+
# end
|
53
|
+
# end
|
54
|
+
#end
|
55
|
+
end
|
56
|
+
|
57
|
+
class TreeObject
|
58
|
+
attr_reader :subtype
|
59
|
+
attr_writer :subtype
|
60
|
+
attr_reader :upordown
|
61
|
+
attr_writer :upordown
|
62
|
+
attr_reader :level
|
63
|
+
attr_writer :level
|
64
|
+
attr_reader :parent
|
65
|
+
attr_writer :parent
|
66
|
+
attr_reader :children
|
67
|
+
attr_writer :children
|
68
|
+
attr_reader :closed
|
69
|
+
attr_writer :closed
|
70
|
+
attr_reader :text
|
71
|
+
attr_writer :text
|
72
|
+
attr_reader :visible
|
73
|
+
attr_writer :visible
|
74
|
+
|
75
|
+
include TextArray
|
76
|
+
include ParseTree
|
77
|
+
|
78
|
+
def initialize(subtype=nil)
|
79
|
+
@subtype = subtype
|
80
|
+
@upordown = Same
|
81
|
+
@level = nil
|
82
|
+
@parent = nil
|
83
|
+
@children = []
|
84
|
+
@closed = nil
|
85
|
+
@visible = true
|
86
|
+
end
|
87
|
+
|
88
|
+
def inspect
|
89
|
+
parent, children = @parent, @children
|
90
|
+
|
91
|
+
@parent, @children = parent.id, children.collect{|obj| obj.id}
|
92
|
+
|
93
|
+
res = " " * (level-1) + "#{self.class}(#{@subtype}) #{super}"
|
94
|
+
|
95
|
+
@parent, @children = parent, children
|
96
|
+
|
97
|
+
res
|
98
|
+
end
|
99
|
+
end
|
100
|
+
|
101
|
+
class Tree
|
102
|
+
@@versie = 1
|
103
|
+
@@mutex = Mutex.new
|
104
|
+
|
105
|
+
attr_reader :data
|
106
|
+
attr_writer :data
|
107
|
+
attr_reader :parent
|
108
|
+
attr_writer :parent
|
109
|
+
attr_reader :children
|
110
|
+
attr_writer :children
|
111
|
+
attr_reader :visible
|
112
|
+
attr_writer :visible
|
113
|
+
|
114
|
+
include TextArray
|
115
|
+
include ParseTree
|
116
|
+
|
117
|
+
def initialize(string)
|
118
|
+
string = string.join("") if string.kind_of?(Array)
|
119
|
+
|
120
|
+
@data = string
|
121
|
+
@parent = nil
|
122
|
+
@children = []
|
123
|
+
@objects = []
|
124
|
+
@visible = true
|
125
|
+
@checkvisibility = false
|
126
|
+
|
127
|
+
buildobjects(string)
|
128
|
+
buildparents
|
129
|
+
buildchildren
|
130
|
+
markclosed
|
131
|
+
deletedummies
|
132
|
+
|
133
|
+
@checkvisibility = true
|
134
|
+
end
|
135
|
+
|
136
|
+
def self.file(file)
|
137
|
+
new(File.new(file).readlines)
|
138
|
+
end
|
139
|
+
|
140
|
+
def self.location(url, form=Hash.new)
|
141
|
+
s = HTTPClient.get(url, form)
|
142
|
+
s = "" if s.nil?
|
143
|
+
new(s)
|
144
|
+
end
|
145
|
+
|
146
|
+
def self.new_from_cache2(data)
|
147
|
+
new(data)
|
148
|
+
end
|
149
|
+
|
150
|
+
def self.new_from_cache(data)
|
151
|
+
hash = MD5.new("#{@@versie} #{data}")
|
152
|
+
|
153
|
+
dir = "#{temp}/evcache.#{user}/tree.new"
|
154
|
+
file = "#{dir}/#{hash}"
|
155
|
+
|
156
|
+
tree = nil
|
157
|
+
|
158
|
+
Dir.mkdirrec(dir)
|
159
|
+
|
160
|
+
if File.file?(file)
|
161
|
+
@@mutex.synchronize do
|
162
|
+
tree = Marshal.restore(File.new(file, "rb"))
|
163
|
+
end
|
164
|
+
else
|
165
|
+
tree = new(data)
|
166
|
+
|
167
|
+
if not tree.nil?
|
168
|
+
@@mutex.synchronize do
|
169
|
+
File.open(file, "wb") {|f| Marshal.dump(tree, f)}
|
170
|
+
end
|
171
|
+
end
|
172
|
+
end
|
173
|
+
|
174
|
+
return tree
|
175
|
+
end
|
176
|
+
|
177
|
+
def inspect
|
178
|
+
@objects.collect do |obj|
|
179
|
+
obj.inspect
|
180
|
+
end.join("\n")
|
181
|
+
end
|
182
|
+
|
183
|
+
def buildobjects(string)
|
184
|
+
raise "Has to be defined in the subclass."
|
185
|
+
end
|
186
|
+
|
187
|
+
def buildparents
|
188
|
+
level = 1
|
189
|
+
levels = Hash.new
|
190
|
+
levels[0] = nil
|
191
|
+
parse do |type, obj|
|
192
|
+
case obj.upordown
|
193
|
+
when Down
|
194
|
+
obj.level = level
|
195
|
+
obj.parent = levels[level-1]
|
196
|
+
levels[level] = obj
|
197
|
+
level += 1
|
198
|
+
when Up, Dummy
|
199
|
+
pl = level
|
200
|
+
1.upto(level-1) do |l|
|
201
|
+
po = levels[l]
|
202
|
+
pl = l if po.subtype == obj.subtype
|
203
|
+
end
|
204
|
+
level = pl
|
205
|
+
obj.level = level
|
206
|
+
obj.parent = levels[level-1]
|
207
|
+
when Same
|
208
|
+
obj.level = level
|
209
|
+
obj.parent = levels[level-1]
|
210
|
+
end
|
211
|
+
end
|
212
|
+
end
|
213
|
+
|
214
|
+
def buildchildren
|
215
|
+
@objects.each do |obj|
|
216
|
+
obj.children = []
|
217
|
+
end
|
218
|
+
|
219
|
+
parse do |type, obj|
|
220
|
+
if not obj.parent.nil?
|
221
|
+
po = obj.parent
|
222
|
+
po.children << obj
|
223
|
+
else
|
224
|
+
@children << obj
|
225
|
+
end
|
226
|
+
end
|
227
|
+
end
|
228
|
+
|
229
|
+
def markclosed
|
230
|
+
([self].concat @objects).each do |obj|
|
231
|
+
obj.children.each_index do |i|
|
232
|
+
co1 = obj.children[i]
|
233
|
+
co2 = obj.children[i+1]
|
234
|
+
|
235
|
+
co1.closed = (not co2.nil? and co1.upordown == Down and (co2.upordown == Up or co2.upordown == Dummy) and co1.subtype == co2.subtype)
|
236
|
+
end
|
237
|
+
end
|
238
|
+
end
|
239
|
+
|
240
|
+
def deletedummies
|
241
|
+
([self].concat @objects).each do |obj|
|
242
|
+
obj.children.delete_if do |obj2|
|
243
|
+
obj2.upordown == Dummy
|
244
|
+
end
|
245
|
+
end
|
246
|
+
|
247
|
+
@objects.delete_if do |obj|
|
248
|
+
obj.upordown == Dummy
|
249
|
+
end
|
250
|
+
end
|
251
|
+
|
252
|
+
def parse(types=[], subtypes=[], once=false)
|
253
|
+
types = [types] if types.class == Class
|
254
|
+
subtypes = [subtypes] if subtypes.class == String
|
255
|
+
hidelevel = nil
|
256
|
+
|
257
|
+
catch :once do
|
258
|
+
@objects.each do |obj|
|
259
|
+
if (@checkvisibility and hidelevel.nil? and (not obj.visible))
|
260
|
+
hidelevel = obj.level
|
261
|
+
else
|
262
|
+
if (@checkvisibility and (not hidelevel.nil?) and obj.visible and obj.level <= hidelevel)
|
263
|
+
hidelevel = nil
|
264
|
+
end
|
265
|
+
end
|
266
|
+
|
267
|
+
if hidelevel.nil?
|
268
|
+
ok = false
|
269
|
+
catch :stop do
|
270
|
+
if types.empty?
|
271
|
+
if subtypes.empty?
|
272
|
+
ok = true
|
273
|
+
throw :stop
|
274
|
+
else
|
275
|
+
subtypes.each do |st|
|
276
|
+
if obj.subtype == st
|
277
|
+
ok = true
|
278
|
+
throw :stop
|
279
|
+
end
|
280
|
+
end
|
281
|
+
end
|
282
|
+
else
|
283
|
+
if subtypes.empty?
|
284
|
+
types.each do |t|
|
285
|
+
if obj.kind_of?(t)
|
286
|
+
ok = true
|
287
|
+
throw :stop
|
288
|
+
end
|
289
|
+
end
|
290
|
+
else
|
291
|
+
types.each do |t|
|
292
|
+
subtypes.each do |st|
|
293
|
+
if obj.kind_of?(t) and obj.subtype == st
|
294
|
+
ok = true
|
295
|
+
throw :stop
|
296
|
+
end
|
297
|
+
end
|
298
|
+
end
|
299
|
+
end
|
300
|
+
end
|
301
|
+
end
|
302
|
+
|
303
|
+
if ok
|
304
|
+
yield(obj.class.to_s, obj)
|
305
|
+
|
306
|
+
throw :once if once
|
307
|
+
end
|
308
|
+
end
|
309
|
+
end
|
310
|
+
end
|
311
|
+
end
|
312
|
+
|
313
|
+
def path(pad)
|
314
|
+
p1 = self
|
315
|
+
|
316
|
+
unless pad.nil?
|
317
|
+
pad.split(/\//).each do |deel|
|
318
|
+
tag, voorkomen = deel.split(/:/)
|
319
|
+
|
320
|
+
if (not tag.nil?) and (not p1.nil?)
|
321
|
+
voorkomen = 1 if voorkomen.nil?
|
322
|
+
voorkomen = voorkomen.to_i
|
323
|
+
|
324
|
+
teller = 0
|
325
|
+
p2 = nil
|
326
|
+
p1.children.each_index do |i|
|
327
|
+
#if p1.children[i].upordown == Down
|
328
|
+
unless p1.children[i].subtype.nil?
|
329
|
+
if p1.children[i].subtype.noquotes == tag.noquotes
|
330
|
+
teller += 1
|
331
|
+
p2 = p1.children[i] if teller == voorkomen
|
332
|
+
end
|
333
|
+
end
|
334
|
+
#end
|
335
|
+
end
|
336
|
+
p1 = p2
|
337
|
+
end
|
338
|
+
end
|
339
|
+
end
|
340
|
+
|
341
|
+
p1
|
342
|
+
end
|
343
|
+
end
|