Class: Dyndoc::KeysManager

Inherits:
Object
  • Object
show all
Defined in:
lib/dyndoc/base/tags/keys_mngr.rb

Class Method Summary collapse

Class Method Details

.begin(lock_keys_orig, lock, keys) ⇒ Object 



236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
 
# File 'lib/dyndoc/base/tags/keys_mngr.rb', line 236

def KeysManager.begin(lock_keys_orig,lock,keys)
#p $dyn_keys[:begin_end]
#p ($dyn_keys[:begin_end] & lock.keys).empty?
  unless ($dyn_keys[:begin] & lock_keys_orig ).empty?
#puts "begin:lock" ;p lock_keys_orig
	$dyn_keys[:begin].each{|key|
	  case $dyn_keys[key][:type]
	  when :section
#p $dyn_keys[:section][key]
 $dyn_keys[:section][key]=[] unless $dyn_keys[:section][key]
 if $dyn_keys[:section][key].empty? or $dyn_keys[:section][key][-1][:state]==:open
#puts "begin #{k}"
   $dyn_keys[:section][key] << {:cpt=>1,:state=>:open}
 else
#puts "incr #{k}"
   $dyn_keys[:section][key][-1][:cpt]+=1
   $dyn_keys[:section][key][-1][:state]=:open
 end
#p $dyn_keys[:section][k]
 lock[key]=$dyn_keys[:section][key].map{|e| e[:cpt]}
#puts "lock[#{k}]";p lock[k]
#puts "begin:section_rel";p lock;p keys
#puts "keys2";p keys2;p lock
 if  KeysManager.unlocked?(lock,$dyn_keys[:section_required][:keys])
 $dyn_keys[:section_rel][key]=[] unless $dyn_keys[:section_rel][key]
 if $dyn_keys[:section_rel][key].empty? or $dyn_keys[:section_rel][key][-1][:state]==:open
#puts "begin #{k}"
   $dyn_keys[:section_rel][key] << {:cpt=>1,:state=>:open}
 else
#puts "incr #{k}"
   $dyn_keys[:section_rel][key][-1][:cpt]+=1
   $dyn_keys[:section_rel][key][-1][:state]=:open
 end
#p $dyn_keys[:section][k]
 lock[key+"_rel"]=$dyn_keys[:section_rel][key].map{|e| e[:cpt]}
#puts "lock[section_rel]";p lock[key+"_rel"]
 end
	  end
	}
  end
end

.complete_comp(comp) ⇒ Object 



129
130
131
132
133
134
135
136
137
138
 
# File 'lib/dyndoc/base/tags/keys_mngr.rb', line 129

def KeysManager.complete_comp(comp)
  case comp
  when "="; [0]
  when "!="; [-1,1]
  when ">"; [1]
  when "<" ;[-1]
  when "<="; -1..0
  when ">="; 0..1
  end
end

.complete_name(k) ⇒ Object

general



107
108
109
110
111
112
113
114
115
 
# File 'lib/dyndoc/base/tags/keys_mngr.rb', line 107

def KeysManager.complete_name(k)
  k2=$dyn_keys[:index][k] if k.is_a? Integer
  k2=$dyn_keys[:index].find{|v| v=~/^#{k}/} unless k2
  unless k2
	k2=$dyn_keys[$dyn_keys[:alias].find_all{|v| v=~/^#{k}/}.sort[0]]
  end
  raise "Dyndoc Error: complete_name #{k}!" unless k2
  return k2
end

.date_unlocked?(lock, key) ⇒ Boolean

Returns:

  • (Boolean) 


95
96
97
98
99
 
# File 'lib/dyndoc/base/tags/keys_mngr.rb', line 95

def KeysManager.date_unlocked?(lock,key)
  return nil if lock.nil?
#p KeysManager.depth_lock(lock) & key
  return key[:order].include?(KeysManager.date_val(lock) <=> key[:val])
end

.date_val(val) ⇒ Object

date ########



91
92
93
 
# File 'lib/dyndoc/base/tags/keys_mngr.rb', line 91

def KeysManager.date_val(val)
  Date.new(*val.split(/(?:\-|\/)/).reverse.map{|e| e.to_i})
end

.depth_key(key) ⇒ Object

depth ########



62
63
64
65
66
67
68
 
# File 'lib/dyndoc/base/tags/keys_mngr.rb', line 62

def KeysManager.depth_key(key)
  # key is automatically completed with -**
#puts "depth_key";p key
  key2=((key.is_a? Array) ? key : eval(key).to_a) 
#p key2
  key2
end

.depth_lock(lock) ⇒ Object 



70
71
72
 
# File 'lib/dyndoc/base/tags/keys_mngr.rb', line 70

def KeysManager.depth_lock(lock)
  eval(lock).to_a
end

.depth_unlocked?(lock, key) ⇒ Boolean

Returns:

  • (Boolean) 


74
75
76
77
78
 
# File 'lib/dyndoc/base/tags/keys_mngr.rb', line 74

def KeysManager.depth_unlocked?(lock,key)
  return nil if lock.nil?
#p KeysManager.depth_lock(lock) & key
  return (lock.strip=="*" or !(KeysManager.depth_lock(lock) & key).empty?)
end

.end(lock_keys_orig, lock, keys) ⇒ Object 



278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
 
# File 'lib/dyndoc/base/tags/keys_mngr.rb', line 278

def KeysManager.end(lock_keys_orig,lock,keys)
#p $dyn_keys[:begin_end]
#p ($dyn_keys[:begin_end] & lock.keys).empty?
  unless ($dyn_keys[:end] & lock_keys_orig).empty?
#puts "end:lock" ;p lock_keys_orig
	$dyn_keys[:end].each{|key|
	  case $dyn_keys[key][:type]
	  when :section
#puts "close #{k}"
 $dyn_keys[:section][key].pop if $dyn_keys[:section][key][-1][:state]==:close
 $dyn_keys[:section][key][-1][:state]=:close if $dyn_keys[:section][key][-1][:state]==:open
 if  KeysManager.unlocked?(lock,$dyn_keys[:section_required][:keys])
 $dyn_keys[:section_rel][key].pop if $dyn_keys[:section_rel][key][-1][:state]==:close
 $dyn_keys[:section_rel][key][-1][:state]=:close if $dyn_keys[:section_rel][key][-1][:state]==:open
 end
	  end
#p $dyn_keys[:section][k]
	}
  end
end

.init_keys(keys) ⇒ Object 



300
301
302
303
304
305
306
307
308
 
# File 'lib/dyndoc/base/tags/keys_mngr.rb', line 300

def KeysManager.init_keys(keys)
#p keys
  #merge the different keys
  keys2={}
  key=keys.join(",") 
  KeysManager.make(key,keys2)
#puts "KeysManager.init_keys";p keys2
  return keys2
end

.keys_section(keys, section_required = ["theme","part","topic"]) ⇒ Object 



310
311
312
313
314
315
316
 
# File 'lib/dyndoc/base/tags/keys_mngr.rb', line 310

def KeysManager.keys_section(keys,section_required=["theme","part","topic"])
  #put the two lines below in register!
  $dyn_keys[:section]={} unless $dyn_keys[:section]
  $dyn_keys[:section_rel]={} unless $dyn_keys[:section_rel]
  $dyn_keys[:section_required]={:set=>section_required}
  $dyn_keys[:section_required][:keys]={};keys.select{|k,e| $dyn_keys[:section_required][:set].include? k}.each{|k,e| $dyn_keys[:section_required][:keys][k]=e}
end

.list_key(key) ⇒ Object

list ########



23
24
25
26
27
 
# File 'lib/dyndoc/base/tags/keys_mngr.rb', line 23

def KeysManager.list_key(key)
  key2=/#{"^"+key.gsub(/\*/,"[\\w\\d\\.\\-:]_STAR_").gsub(/_STAR_/,"*").gsub(/[\w\,]+/) {|e| "(?:#{$&})"}.gsub(",","|")}/
  #p key2
  key2
end

.list_unlocked?(lock, key) ⇒ Boolean

Returns:

  • (Boolean) 


29
30
31
32
33
34
35
36
37
38
39
40
 
# File 'lib/dyndoc/base/tags/keys_mngr.rb', line 29

def KeysManager.list_unlocked?(lock,key)
#puts "list_unlocked";p lock;p key
  return nil if lock.nil?
  return true if lock.strip=="*"
  l=lock.split(",").map{|e| e.strip}
  cpt,ok=0,nil
  begin
	ok=l[cpt]=~key
  end while !ok and (cpt+=1)<l.length
#p ok
  return ok
end

.make(str, obj = nil) ⇒ Object 



319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
 
# File 'lib/dyndoc/base/tags/keys_mngr.rb', line 319

def KeysManager.make(str,obj=nil)
  cpt=-1
  #str+=$dyn_keys[:require] unless obj
#puts "make_lock";p str
  obj={} unless obj
  str.split(/[:]/).each{|e|
   cpt+=1
   key,*val=e.split("=").map{|e2| e2.strip}
   val=val.join("=") unless val.empty? 
   key,val=cpt,key if val.empty?
   obj[key]=val if val and !obj[key]
  }
  #p obj
  return obj
end

.make_keys(init_keys) ⇒ Object 



180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
 
# File 'lib/dyndoc/base/tags/keys_mngr.rb', line 180

def KeysManager.make_keys(init_keys)
#p keys
  keys=KeysManager.var_names(init_keys,true)
#puts "make_keys";p keys
  keys.each_key{|k|
   next if k.is_a? Symbol
   case $dyn_keys[k][:type]
   when :word
     keys[k]=KeysManager.word_key(keys[k])
   when :path
     keys[k]=KeysManager.path_key(keys[k])
   when :list
     keys[k]=KeysManager.list_key(keys[k])
   when :depth
     keys[k]=KeysManager.depth_key(keys[k])
   when :num
     crit=keys[k].strip
     res=KeysManager.prepare_comp(crit)
     res[:val]=KeysManager.num_val(crit)
     keys[k]=res
   when :date
     crit=keys[k].strip
     res=KeysManager.prepare_comp(crit)
     res[:val]=KeysManager.date_val(crit)
     keys[k]=res
   when :order #k="order"!
     crits=keys[k].strip
#p crits
     keys["order"]=keys["order"].strip.split(",").map{|crit| 
       res={:order=>1}
       if "+-><".include? crit[0,1]
         case crit[0,1]
         when ">","+"
           res[:order]=1
         when "<","-"
           res[:order]=-1
         end
         crit=crit[1..-1].strip
       end
       res[:val]= KeysManager.complete_name(crit)
       keys[:required]=[] unless keys[:required]
       keys[:required] |= [res[:val]]
       res
     }
   when :required #k="required"!
     crits=keys["required"].strip.split(",")
     keys[:required]=[] unless keys[:required]
     keys["required"]=crits.map{|crit|  KeysManager.complete_name(crit)}
     keys[:required] |=keys["required"]
   end
  }
  KeysManager.keys_section(keys)
  keys
#puts "make_keys(OUT)";p keys
end

.make_title(lock) ⇒ Object 



168
169
170
171
172
173
174
175
176
177
178
 
# File 'lib/dyndoc/base/tags/keys_mngr.rb', line 168

def KeysManager.make_title(lock)
  lock.each{|key,val|
   if val and val.include? "("
     $dyn_keys[:title]={} unless $dyn_keys[:title]
     $dyn_keys[:title][key]=[] unless $dyn_keys[:title][key]
     val,title=val.scan(/(.*)\((.*)\)/)[0]
     lock[key]=val
     $dyn_keys[:title][key] << [val,title]
   end
  }
end

.merge(obj2, obj = $dyn_keys[:lastlock].dup) ⇒ Object 



345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
 
# File 'lib/dyndoc/base/tags/keys_mngr.rb', line 345

def KeysManager.merge(obj2,obj=$dyn_keys[:lastlock].dup)
#puts "merge_lock";p obj
#p obj2
  obj.each_key{|key|
	next if key.is_a? Symbol
#puts "merge #{key}";p (obj2[key] and !(obj2[key]=~/^\s*\w/))
	if obj2[key+"?"] or !obj2[key]
	  obj2.delete(key+"?") if obj2[key+"?"]
	  obj2[key]=obj[key] unless obj2[key]
	elsif $dyn_keys[key][:type]==:path
	  #obj2[key] and !(obj2[key]=~/^\s*\w/) #for :list and :path
#puts "add";p obj2[key]
	  obj2[key]=obj[key]+"-"+obj2[key].strip
	elsif $dyn_keys[key][:type]==:list
	  obj2[key]=obj[key]+","+obj2[key].strip
	end
  }
#p obj2
end

.num_unlocked?(lock, key) ⇒ Boolean

Returns:

  • (Boolean) 


85
86
87
88
89
 
# File 'lib/dyndoc/base/tags/keys_mngr.rb', line 85

def KeysManager.num_unlocked?(lock,key)
  return nil if lock.nil?
#p KeysManager.depth_lock(lock) & key
  return key[:order].include?(KeysManager.num_val(lock) <=> key[:val])
end

.num_val(val) ⇒ Object

num ########



81
82
83
 
# File 'lib/dyndoc/base/tags/keys_mngr.rb', line 81

def KeysManager.num_val(val)
  val.to_i
end

.path_key(key) ⇒ Object

path ########



44
45
46
47
48
49
50
 
# File 'lib/dyndoc/base/tags/keys_mngr.rb', line 44

def KeysManager.path_key(key)
  # key is automatically completed with -**
#puts "path_key:key";p key
  key2="^"+(key+"-**").gsub(/[\w\,\*]+/) {|e| "(?:#{$&})"}.gsub(",","|").gsub(/\*\*/,"[\\w\\d\\-\\.:]_STAR_").gsub(/\*/,"[\\w\\d\\.:]_STAR_").gsub(/_STAR_/,"*")
  #p key;p key2
  /#{key2}/
end

.path_lock(lock) ⇒ Object 



52
53
54
 
# File 'lib/dyndoc/base/tags/keys_mngr.rb', line 52

def KeysManager.path_lock(lock)
  lock+"-"
end

.path_unlocked?(lock, key) ⇒ Boolean

Returns:

  • (Boolean) 


56
57
58
59
 
# File 'lib/dyndoc/base/tags/keys_mngr.rb', line 56

def KeysManager.path_unlocked?(lock,key)
  return nil if lock.nil?
  return (lock.strip=="*" or KeysManager.path_lock(lock)=~key)
end

.prepare_comp(crit) ⇒ Object 



117
118
119
120
121
122
123
124
125
126
 
# File 'lib/dyndoc/base/tags/keys_mngr.rb', line 117

def KeysManager.prepare_comp(crit)
  res={}
  if crit=~/^(?:!=|>=|<=|>|<|=)/
	res[:order]= KeysManager.complete_comp($~[0])
	crit.replace($~.post_match)
  else 
	res[:order]=[0]
  end
  res
end

.section_unlocked?(lock, key) ⇒ Boolean

section ########

Returns:

  • (Boolean) 


102
103
104
 
# File 'lib/dyndoc/base/tags/keys_mngr.rb', line 102

def KeysManager.section_unlocked?(lock,key)
  return true
end

.simplify(obj) ⇒ Object 



335
336
337
338
339
340
341
342
343
 
# File 'lib/dyndoc/base/tags/keys_mngr.rb', line 335

def KeysManager.simplify(obj)
  obj.each_key{|key|
   if key[-1,1]=="?"
     obj[key[0...-1]]=obj[key] unless obj[key[0...-1]]
     obj.delete(key)
   end
  }
#p obj
end

.unlocked?(lock, keys) ⇒ Boolean

Returns:

  • (Boolean) 


365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
 
# File 'lib/dyndoc/base/tags/keys_mngr.rb', line 365

def KeysManager.unlocked?(lock,keys)
#puts "unlocked?";p lock
  lock_keys=lock.keys
#puts "required?";p  lock_keys;p keys[:required]
  return nil unless !keys[:required] or (keys[:required]-lock_keys).empty?
  to_open=keys.keys-[:required,"required","order"] #& lock_keys
#puts "to_open";p to_open
  ok=(to_open.empty? ? true : to_open.map{|k|
#puts "k=#{k}";p lock[k];p keys[k]
	next if k.is_a? Symbol
	case $dyn_keys[k][:type]
	when :word
	  res=KeysManager.word_unlocked?(lock[k],keys[k])
	when :path
	  res=KeysManager.path_unlocked?(lock[k],keys[k])
	when :list
	  res=KeysManager.list_unlocked?(lock[k],keys[k])
	when :depth
	  res=KeysManager.depth_unlocked?(lock[k],keys[k])
	when :num
	  res=KeysManager.num_unlocked?(lock[k],keys[k])
	when :date
	  res=KeysManager.date_unlocked?(lock[k],keys[k])
	when :section
	  res=KeysManager.section_unlocked?(lock[k],keys[k])
	end
#puts "ok#{k}?";p res
	res
  }.all?)
#puts "ok?";p ok
  return ok
end

.var_names(keys, clean = nil) ⇒ Object

complete the name of criteria



141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
 
# File 'lib/dyndoc/base/tags/keys_mngr.rb', line 141

def KeysManager.var_names(keys,clean=nil)
  if $dyn_keys
   keys2,index,aliases={},$dyn_keys[:index].dup,$dyn_keys[:alias].dup
#puts "var_names: index";p index
    index_to_clean=[]
   keys.each_key{|k|
#puts "k";p k
     to_merge=nil
     k,to_merge=k[0...-1],true if k.is_a? String and k[-1,1]=="?"
#p index
     k2=$dyn_keys[:index][k] if k.is_a? Integer
     k2=index.find{|v| v=~/^#{k}/} unless k2
     index_to_clean << index.delete(k2) if k2
     unless k2
       k2=$dyn_keys[aliases.find_all{|v| v=~/^#{k}/}.sort[0]]
       index_to_clean << aliases.delete(k) if k2 
     end
#puts "k2";p k2
      
     keys2[(to_merge ? k2+"?" : k2)]=keys[(to_merge ? k+"?" : k)] if k2
   }
    #update keys by deleting dealt elements
    index_to_clean.each{|k| keys.delete(k)} if clean
   return keys2
  end
end

.word_key(key) ⇒ Object

word ########



7
8
9
10
11
 
# File 'lib/dyndoc/base/tags/keys_mngr.rb', line 7

def KeysManager.word_key(key)
  key2=/#{"^"+key.gsub(/\*/,"[\\w\\d\\.\\-:]_STAR_").gsub(/_STAR_/,"*")}/
  #p res
  key2
end

.word_lock(lock) ⇒ Object 



13
14
15
 
# File 'lib/dyndoc/base/tags/keys_mngr.rb', line 13

def KeysManager.word_lock(lock)
  
end

.word_unlocked?(lock, key) ⇒ Boolean

Returns:

  • (Boolean) 


17
18
19
20
 
# File 'lib/dyndoc/base/tags/keys_mngr.rb', line 17

def KeysManager.word_unlocked?(lock,key)
  return nil if lock.nil?
  lock.strip=="*" or lock=~key
end