Class: ObjectTree::Tree

Inherits:
Object
  • Object
show all
Defined in:
lib/object_tree.rb

Constant Summary collapse

SPACE_SIZE = 
6
MCOLOR =

31: red, 32: green, 33: yellow, 34: blue, 35: pink, 36: aqua, 37: gray

31
CCOLOR = 
32

Instance Attribute Summary collapse

Instance Method Summary collapse

Constructor Details

#initialize(klass, mflag = false) ⇒ Tree

Returns a new instance of Tree.



20
21
22
23
24
25
26
27
28
29
30
31
 
# File 'lib/object_tree.rb', line 20

def initialize(klass, mflag = false)
  @tree = Hash.new{|h, k| h[k] = [] }
  @mflag = mflag
  @root_class = klass

  if RUBY_VERSION >= "1.9" && klass == BasicObject
    klass = Object
    @tree[BasicObject] << Object
  end

  create_object_tree(object_list(klass))
end

Instance Attribute Details

#tree ⇒ Object (readonly)

Returns the value of attribute tree.



13
14
15
 
# File 'lib/object_tree.rb', line 13

def tree
  @tree
end

Instance Method Details

#create_object_tree(tree) ⇒ Object 



52
53
54
55
56
57
58
59
60
61
62
 
# File 'lib/object_tree.rb', line 52

def create_object_tree(tree)
  tree.each do |klass1, subclasses1|
    tree.each do |klass2, subclasses2|
      if klass1 > klass2
        tree[klass1] -= (subclasses2 - [klass2])
      end
    end
  end

  tree
end

#draw ⇒ Object 



64
65
66
67
68
69
70
71
 
# File 'lib/object_tree.rb', line 64

def draw
  if @tree.size.zero? 
    puts "\e[#{CCOLOR}m<C>\e[m#{@root_class}"
  else
    @last_check = []
    draw_tree({ @root_class => @tree[@root_class] }, 0)
  end
end

#draw_tree(tree, nest, root = true, last = false) ⇒ Object 



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
 
# File 'lib/object_tree.rb', line 73

def draw_tree(tree, nest, root = true, last = false)

  @last_check[nest-1] = last if nest > 0

  tree.each do |klass, subclasses|
    if ( @mflag && klass.kind_of?(Class) && !klass.superclass.nil? )
      module_list = klass.ancestors[0..klass.ancestors.find_index(klass.superclass)-1].reverse - [klass, klass.superclass] - klass.prepended_modules

      module_list.each_with_index do |m, add|
        puts "\e[#{MCOLOR}m<M>\e[m#{m.inspect}"
        @last_check[nest] = true

        nest.times do |column_number|
          print ((@last_check[column_number])? " " : "│") + " " * SPACE_SIZE
        end
        print "└──── "
        nest += 1
      end
    end

    puts ( klass.kind_of?(Class) )? "\e[#{CCOLOR}m<C>\e[m#{klass.inspect}" : "\e[#{MCOLOR}m<M>\e[m#{klass.inspect}"

    subclasses.each do |sub|
      @last_check[nest] = true if sub == subclasses.last

      nest.times do |column_number|
        print ((@last_check[column_number])? " " : "│") + " " * SPACE_SIZE
      end

      if @tree.has_key?(sub)
        print ( sub == subclasses.last )? "└──── " : "├──── "
        if sub == subclasses.last
          draw_tree({ sub => @tree[sub]}, nest + 1, false, true)
        else
          draw_tree({ sub => @tree[sub]}, nest + 1, false, false)
        end
      else
        print "#{( sub == subclasses.last )? '└──── ' : '├──── '}"
        nest_count = 0
        if( @mflag && sub.kind_of?(Class) ) 
          module_list = sub.ancestors[0..sub.ancestors.find_index(klass)-1].reverse - ([sub, klass] + sub.prepended_modules)
          @last_check[nest] = ( sub == subclasses.last )? true : false

          module_list.each_with_index do |m, add|
            puts "\e[#{MCOLOR}m<M>\e[m#{m.inspect}"
            @last_check[nest+add+1] = true

            (nest+add+1).times do |column_number|
              print ((@last_check[column_number])? " " : "│") + " " * SPACE_SIZE
            end
            print "└──── "
            nest_count += 1
          end
        end
        puts ( sub.kind_of?(Class) )? "\e[#{CCOLOR}m<C>\e[m#{sub.inspect}" : "\e[#{MCOLOR}m<M>\e[m#{sub.inspect}"

        if ( @mflag && sub.kind_of?(Class) )
          prepended_modules = sub.prepended_modules

          prepended_modules.each_with_index do |m, add|
            (nest+nest_count+add+1).times do |column_number|
              print ((@last_check[column_number])? " " : "│") + " " * SPACE_SIZE
            end
            puts "└──── \e[#{MCOLOR}m<M>\e[m#{m.inspect}"
            @last_check[nest+add+1] = true
          end
        end
      end
    end
  end
end

#object_list(klass) ⇒ Object 



41
42
43
44
45
46
47
48
49
50
 
# File 'lib/object_tree.rb', line 41

def object_list(klass)
  ObjectSpace.each_object(singleton(klass)) do |subclass| 
    if klass != subclass
      @tree[klass] << subclass
      object_list(subclass) unless @tree.has_key?(subclass)
    end
  end

  @tree
end

#singleton(klass) ⇒ Object 



37
38
39
 
# File 'lib/object_tree.rb', line 37

def singleton(klass)
  class << klass; self end
end