lldb_cruby.py: constants from the target

* misc/lldb_cruby.py (lldb_init): get constants from
  ruby_dummy_gdb_enums in the target.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@58943 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 68 insertions, 87 deletions

diff --git a/misc/lldb_cruby.py b/misc/lldb_cruby.py
index 132a5dd5ea..4b5d6feb49 100644..100755
--- a/misc/lldb_cruby.py
+++ b/misc/lldb_cruby.py
@@ -9,73 +9,39 @@ import commands
 import os
 import shlex
 
-RUBY_T_NONE   = 0x00
-
-RUBY_T_OBJECT = 0x01
-RUBY_T_CLASS  = 0x02
-RUBY_T_MODULE = 0x03
-RUBY_T_FLOAT  = 0x04
-RUBY_T_STRING = 0x05
-RUBY_T_REGEXP = 0x06
-RUBY_T_ARRAY  = 0x07
-RUBY_T_HASH   = 0x08
-RUBY_T_STRUCT = 0x09
-RUBY_T_BIGNUM = 0x0a
-RUBY_T_FILE   = 0x0b
-RUBY_T_DATA   = 0x0c
-RUBY_T_MATCH  = 0x0d
-RUBY_T_COMPLEX  = 0x0e
-RUBY_T_RATIONAL = 0x0f
-
-RUBY_T_NIL    = 0x11
-RUBY_T_TRUE   = 0x12
-RUBY_T_FALSE  = 0x13
-RUBY_T_SYMBOL = 0x14
-RUBY_T_FIXNUM = 0x15
-RUBY_T_UNDEF  = 0x16
-
-RUBY_T_IMEMO  = 0x1a
-RUBY_T_NODE   = 0x1b
-RUBY_T_ICLASS = 0x1c
-RUBY_T_ZOMBIE = 0x1d
-
-RUBY_T_MASK   = 0x1f
-
-
-RUBY_FL_WB_PROTECTED = (1<<5)
-RUBY_FL_PROMOTED0 = (1<<5)
-RUBY_FL_PROMOTED1 = (1<<6)
-RUBY_FL_PROMOTED  = RUBY_FL_PROMOTED0|RUBY_FL_PROMOTED1
-RUBY_FL_FINALIZE  = (1<<7)
-RUBY_FL_TAINT     = (1<<8)
-RUBY_FL_UNTRUSTED = RUBY_FL_TAINT
-RUBY_FL_EXIVAR    = (1<<10)
-RUBY_FL_FREEZE    = (1<<11)
-
-RUBY_FL_USHIFT    = 12
+def lldb_init(debugger):
+    target = debugger.GetSelectedTarget()
+    global SIZEOF_VALUE
+    SIZEOF_VALUE = target.FindFirstType("VALUE").GetByteSize()
+    g = globals()
+    for enum in target.FindFirstGlobalVariable('ruby_dummy_gdb_enums'):
+        enum = enum.GetType()
+        members = enum.GetEnumMembers()
+        for i in xrange(0, members.GetSize()):
+            member = members.GetTypeEnumMemberAtIndex(i)
+            name = member.GetName()
+            value = member.GetValueAsUnsigned()
+            g[name] = value
+    global ROBJECT_EMBED_LEN_MAX, ROBJECT_EMBED
+    ROBJECT_EMBED_LEN_MAX = 3
+    ROBJECT_EMBED = RUBY_FL_USER1
+    global RMODULE_IS_OVERLAID, RMODULE_IS_REFINEMENT, RMODULE_INCLUDED_INTO_REFINEMENT
+    RMODULE_IS_OVERLAID = RUBY_FL_USER2
+    RMODULE_IS_REFINEMENT = RUBY_FL_USER3
+    RMODULE_INCLUDED_INTO_REFINEMENT = RUBY_FL_USER4
+    global RSTRING_NOEMBED, RSTRING_EMBED_LEN_MASK, RSTRING_EMBED_LEN_SHIFT, RSTRING_EMBED_LEN_MAX, RSTRING_FSTR
+    RSTRING_NOEMBED = RUBY_FL_USER1
+    RSTRING_EMBED_LEN_MASK = (RUBY_FL_USER2|RUBY_FL_USER3|RUBY_FL_USER4|
+			      RUBY_FL_USER5|RUBY_FL_USER6)
+    RSTRING_EMBED_LEN_SHIFT = (RUBY_FL_USHIFT+2)
+    RSTRING_EMBED_LEN_MAX = (SIZEOF_VALUE*3)-1
+    RSTRING_FSTR = RUBY_FL_USER17
 
-RUBY_FL_USER0 = (1<<(RUBY_FL_USHIFT+0))
-RUBY_FL_USER1 = (1<<(RUBY_FL_USHIFT+1))
-RUBY_FL_USER2 = (1<<(RUBY_FL_USHIFT+2))
-RUBY_FL_USER3 = (1<<(RUBY_FL_USHIFT+3))
-RUBY_FL_USER4 = (1<<(RUBY_FL_USHIFT+4))
-RUBY_FL_USER5 = (1<<(RUBY_FL_USHIFT+5))
-RUBY_FL_USER6 = (1<<(RUBY_FL_USHIFT+6))
-RUBY_FL_USER7 = (1<<(RUBY_FL_USHIFT+7))
-RUBY_FL_USER8 = (1<<(RUBY_FL_USHIFT+8))
-RUBY_FL_USER9 = (1<<(RUBY_FL_USHIFT+9))
-RUBY_FL_USER10 = (1<<(RUBY_FL_USHIFT+10))
-RUBY_FL_USER11 = (1<<(RUBY_FL_USHIFT+11))
-RUBY_FL_USER12 = (1<<(RUBY_FL_USHIFT+12))
-RUBY_FL_USER13 = (1<<(RUBY_FL_USHIFT+13))
-RUBY_FL_USER14 = (1<<(RUBY_FL_USHIFT+14))
-RUBY_FL_USER15 = (1<<(RUBY_FL_USHIFT+15))
-RUBY_FL_USER16 = (1<<(RUBY_FL_USHIFT+16))
-RUBY_FL_USER17 = (1<<(RUBY_FL_USHIFT+17))
-RUBY_FL_USER18 = (1<<(RUBY_FL_USHIFT+18))
-RUBY_FL_USER19 = (1<<(RUBY_FL_USHIFT+19))
+def fixnum_p(x):
+    return x & RUBY_FIXNUM_FLAG != 0
 
-RSTRING_NOEMBED = RUBY_FL_USER1
+def flonum_p(x):
+    return (x&RUBY_FLONUM_MASK) == RUBY_FLONUM_FLAG
 
 def lldb_rp(debugger, command, result, internal_dict):
     target = debugger.GetSelectedTarget()
@@ -84,55 +50,70 @@ def lldb_rp(debugger, command, result, internal_dict):
     frame = thread.GetSelectedFrame()
     val = frame.EvaluateExpression(command)
     num = val.GetValueAsSigned()
-    if num == 0:
-        print('false')
-    elif num == 0x14:
-        print('nil')
-    elif num == 8:
-        print('nil')
-    elif num == 0x34:
-        print('Qundef')
-    elif num & 1 != 0:
-        print(num >> 1)
+    if num == RUBY_Qfalse:
+        print >> result, 'false'
+    elif num == RUBY_Qtrue:
+        print >> result, 'true'
+    elif num == RUBY_Qnil:
+        print >> result, 'nil'
+    elif num == RUBY_Qundef:
+        print >> result, 'Qundef'
+    elif fixnum_p(num):
+        print >> result, num >> 1
+    elif flonum_p(num):
+        debugger.HandleCommand("print rb_float_value(%0#x)" % val.GetValueAsUnsigned())
+    elif num & RUBY_IMMEDIATE_MASK:
+        print >> result, 'immediate(%x)' % num
     else:
         tRBasic = target.FindFirstType("struct RBasic").GetPointerType()
         val = val.Cast(tRBasic)
         flags = val.GetValueForExpressionPath("->flags").GetValueAsUnsigned()
+        if (flags & RUBY_FL_PROMOTED) == RUBY_FL_PROMOTED:
+            print >> result, "[PROMOTED] "
         flType = flags & RUBY_T_MASK
-        if flType == RUBY_T_STRING:
+        if flType == RUBY_T_NONE:
+            print >> result, 'T_NONE: %s' % val.Dereference()
+        elif flType == RUBY_T_NIL:
+            print >> result, 'T_NIL: %s' % val.Dereference()
+        elif flType == RUBY_T_OBJECT:
+            tRObject = target.FindFirstType("struct RObject").GetPointerType()
+            val = val.Cast(tRObject)
+            print >> result, 'T_OBJECT: %s' % val.Dereference()
+        elif flType == RUBY_T_STRING:
             tRString = target.FindFirstType("struct RString").GetPointerType()
             val = val.Cast(tRString)
             if flags & RSTRING_NOEMBED:
-                print(val.GetValueForExpressionPath("->as.heap"))
+                print >> result, val.GetValueForExpressionPath("->as.heap")
             else:
-                print(val.GetValueForExpressionPath("->as.ary"))
+                print >> result, val.GetValueForExpressionPath("->as.ary")
         elif flType == RUBY_T_ARRAY:
             tRArray = target.FindFirstType("struct RArray").GetPointerType()
             val = val.Cast(tRArray)
             if flags & RUBY_FL_USER1:
                 len = ((flags & (RUBY_FL_USER3|RUBY_FL_USER4)) >> (RUBY_FL_USHIFT+3))
-                print("T_ARRAY: len=%d (embed)" % len)
+                print >> result, "T_ARRAY: len=%d (embed)" % len
                 if len == 0:
-                    print "{(empty)}"
+                    print >> result, "{(empty)}"
                 else:
-                    print(val.GetValueForExpressionPath("->as.ary"))
+                    print >> result, val.GetValueForExpressionPath("->as.ary")
             else:
                 len = val.GetValueForExpressionPath("->as.heap.len").GetValueAsSigned()
-                print("T_ARRAY: len=%d " % len)
-                #print(val.GetValueForExpressionPath("->as.heap"))
+                print >> result, "T_ARRAY: len=%d " % len
+                #print >> result, val.GetValueForExpressionPath("->as.heap")
                 if flags & RUBY_FL_USER2:
                     shared = val.GetValueForExpressionPath("->as.heap.aux.shared").GetValueAsUnsigned()
-                    print "(shared) shared=%016x " % shared
+                    print >> result, "(shared) shared=%016x " % shared
                 else:
                     capa = val.GetValueForExpressionPath("->as.heap.aux.capa").GetValueAsSigned()
-                    print "(ownership) capa=%d " % capa
+                    print >> result, "(ownership) capa=%d " % capa
                 if len == 0:
-                    print "{(empty)}"
+                    print >> result, "{(empty)}"
                 else:
-                   debugger.HandleCommand("expression -Z %d -fx -- (const VALUE*)((struct RArray*)%d)->as.heap.ptr" % (len, val.GetValueAsUnsigned()))
+                    debugger.HandleCommand("expression -Z %d -fx -- (const VALUE*)((struct RArray*)%d)->as.heap.ptr" % (len, val.GetValueAsUnsigned()))
             debugger.HandleCommand("p (struct RArray *) %0#x" % val.GetValueAsUnsigned())
 
 
 def __lldb_init_module(debugger, internal_dict):
     debugger.HandleCommand("command script add -f lldb_cruby.lldb_rp rp")
+    lldb_init(debugger)
     print "lldb scripts for ruby has been installed."