1 //===-- NSSet.cpp ------------------------------------------------*- C++ -*-===//
3 // The LLVM Compiler Infrastructure
5 // This file is distributed under the University of Illinois Open Source
6 // License. See LICENSE.TXT for details.
8 //===----------------------------------------------------------------------===//
10 #include "lldb/lldb-python.h"
12 #include "lldb/DataFormatters/CXXFormatterFunctions.h"
14 #include "lldb/Core/DataBufferHeap.h"
15 #include "lldb/Core/Error.h"
16 #include "lldb/Core/Stream.h"
17 #include "lldb/Core/ValueObject.h"
18 #include "lldb/Core/ValueObjectConstResult.h"
19 #include "lldb/Host/Endian.h"
20 #include "lldb/Symbol/ClangASTContext.h"
21 #include "lldb/Target/ObjCLanguageRuntime.h"
22 #include "lldb/Target/Target.h"
25 using namespace lldb_private;
26 using namespace lldb_private::formatters;
28 template<bool cf_style>
30 lldb_private::formatters::NSSetSummaryProvider (ValueObject& valobj, Stream& stream)
32 ProcessSP process_sp = valobj.GetProcessSP();
36 ObjCLanguageRuntime* runtime = (ObjCLanguageRuntime*)process_sp->GetLanguageRuntime(lldb::eLanguageTypeObjC);
41 ObjCLanguageRuntime::ClassDescriptorSP descriptor(runtime->GetClassDescriptor(valobj));
43 if (!descriptor.get() || !descriptor->IsValid())
46 uint32_t ptr_size = process_sp->GetAddressByteSize();
47 bool is_64bit = (ptr_size == 8);
49 lldb::addr_t valobj_addr = valobj.GetValueAsUnsigned(0);
56 const char* class_name = descriptor->GetClassName().GetCString();
58 if (!class_name || !*class_name)
61 if (!strcmp(class_name,"__NSSetI"))
64 value = process_sp->ReadUnsignedIntegerFromMemory(valobj_addr + ptr_size, ptr_size, 0, error);
67 value &= (is_64bit ? ~0xFC00000000000000UL : ~0xFC000000U);
69 else if (!strcmp(class_name,"__NSSetM"))
72 value = process_sp->ReadUnsignedIntegerFromMemory(valobj_addr + ptr_size, ptr_size, 0, error);
75 value &= (is_64bit ? ~0xFC00000000000000UL : ~0xFC000000U);
77 /*else if (!strcmp(class_name,"__NSCFSet"))
80 value = process_sp->ReadUnsignedIntegerFromMemory(valobj_addr + (is_64bit ? 20 : 12), 4, 0, error);
84 value &= ~0x1fff000000000000UL;
86 else if (!strcmp(class_name,"NSCountedSet"))
89 value = process_sp->ReadUnsignedIntegerFromMemory(valobj_addr + ptr_size, ptr_size, 0, error);
92 value = process_sp->ReadUnsignedIntegerFromMemory(value + (is_64bit ? 20 : 12), 4, 0, error);
96 value &= ~0x1fff000000000000UL;
100 if (!ExtractValueFromObjCExpression(valobj, "int", "count", value))
104 stream.Printf("%s%" PRIu64 " %s%s",
105 (cf_style ? "@\"" : ""),
107 (cf_style ? (value == 1 ? "value" : "values") : (value == 1 ? "object" : "objects")),
108 (cf_style ? "\"" : ""));
112 SyntheticChildrenFrontEnd* lldb_private::formatters::NSSetSyntheticFrontEndCreator (CXXSyntheticChildren*, lldb::ValueObjectSP valobj_sp)
114 lldb::ProcessSP process_sp (valobj_sp->GetProcessSP());
117 ObjCLanguageRuntime *runtime = (ObjCLanguageRuntime*)process_sp->GetLanguageRuntime(lldb::eLanguageTypeObjC);
121 if (!valobj_sp->IsPointerType())
124 valobj_sp = valobj_sp->AddressOf(error);
125 if (error.Fail() || !valobj_sp)
129 ObjCLanguageRuntime::ClassDescriptorSP descriptor(runtime->GetClassDescriptor(*valobj_sp.get()));
131 if (!descriptor.get() || !descriptor->IsValid())
134 const char* class_name = descriptor->GetClassName().GetCString();
136 if (!class_name || !*class_name)
139 if (!strcmp(class_name,"__NSSetI"))
141 return (new NSSetISyntheticFrontEnd(valobj_sp));
143 else if (!strcmp(class_name,"__NSSetM"))
145 return (new NSSetMSyntheticFrontEnd(valobj_sp));
147 else if ((!strcmp(class_name,"__NSOrderedSetI")) || (!strcmp(class_name,"__NSOrderedSetM")))
149 return new NSOrderedSetSyntheticFrontEnd(valobj_sp); // this runs code
153 return /*(new NSSetCodeRunningSyntheticFrontEnd(valobj_sp))*/ NULL;
157 lldb_private::formatters::NSSetISyntheticFrontEnd::NSSetISyntheticFrontEnd (lldb::ValueObjectSP valobj_sp) :
158 SyntheticChildrenFrontEnd(*valobj_sp.get()),
168 lldb_private::formatters::NSSetISyntheticFrontEnd::~NSSetISyntheticFrontEnd ()
177 lldb_private::formatters::NSSetISyntheticFrontEnd::GetIndexOfChildWithName (const ConstString &name)
179 const char* item_name = name.GetCString();
180 uint32_t idx = ExtractIndexFromString(item_name);
181 if (idx < UINT32_MAX && idx >= CalculateNumChildren())
187 lldb_private::formatters::NSSetISyntheticFrontEnd::CalculateNumChildren ()
189 if (!m_data_32 && !m_data_64)
191 return (m_data_32 ? m_data_32->_used : m_data_64->_used);
195 lldb_private::formatters::NSSetISyntheticFrontEnd::Update()
203 ValueObjectSP valobj_sp = m_backend.GetSP();
208 m_exe_ctx_ref = valobj_sp->GetExecutionContextRef();
210 if (valobj_sp->IsPointerType())
212 valobj_sp = valobj_sp->Dereference(error);
213 if (error.Fail() || !valobj_sp)
217 lldb::ProcessSP process_sp(valobj_sp->GetProcessSP());
220 m_ptr_size = process_sp->GetAddressByteSize();
221 uint64_t data_location = valobj_sp->GetAddressOf() + m_ptr_size;
224 m_data_32 = new DataDescriptor_32();
225 process_sp->ReadMemory (data_location, m_data_32, sizeof(DataDescriptor_32), error);
229 m_data_64 = new DataDescriptor_64();
230 process_sp->ReadMemory (data_location, m_data_64, sizeof(DataDescriptor_64), error);
234 m_data_ptr = data_location + m_ptr_size;
239 lldb_private::formatters::NSSetISyntheticFrontEnd::MightHaveChildren ()
245 lldb_private::formatters::NSSetISyntheticFrontEnd::GetChildAtIndex (size_t idx)
247 uint32_t num_children = CalculateNumChildren();
249 if (idx >= num_children)
250 return lldb::ValueObjectSP();
252 ProcessSP process_sp = m_exe_ctx_ref.GetProcessSP();
254 return lldb::ValueObjectSP();
256 if (m_children.empty())
259 lldb::addr_t obj_at_idx = 0;
262 uint32_t test_idx = 0;
264 while(tries < num_children)
266 obj_at_idx = m_data_ptr + (test_idx * m_ptr_size);
268 return lldb::ValueObjectSP();
270 obj_at_idx = process_sp->ReadPointerFromMemory(obj_at_idx, error);
272 return lldb::ValueObjectSP();
280 SetItemDescriptor descriptor = {obj_at_idx,lldb::ValueObjectSP()};
282 m_children.push_back(descriptor);
286 if (idx >= m_children.size()) // should never happen
287 return lldb::ValueObjectSP();
289 SetItemDescriptor &set_item = m_children[idx];
290 if (!set_item.valobj_sp)
292 auto ptr_size = process_sp->GetAddressByteSize();
293 DataBufferHeap buffer(ptr_size,0);
296 case 0: // architecture has no clue?? - fail
297 return lldb::ValueObjectSP();
299 *((uint32_t*)buffer.GetBytes()) = (uint32_t)set_item.item_ptr;
302 *((uint64_t*)buffer.GetBytes()) = (uint64_t)set_item.item_ptr;
305 assert(false && "pointer size is not 4 nor 8 - get out of here ASAP");
307 StreamString idx_name;
308 idx_name.Printf("[%zu]",idx);
310 DataExtractor data(buffer.GetBytes(),
311 buffer.GetByteSize(),
312 process_sp->GetByteOrder(),
313 process_sp->GetAddressByteSize());
316 ValueObject::CreateValueObjectFromData(idx_name.GetData(),
319 m_backend.GetClangType().GetBasicTypeFromAST(lldb::eBasicTypeObjCID));
321 return set_item.valobj_sp;
324 lldb_private::formatters::NSSetMSyntheticFrontEnd::NSSetMSyntheticFrontEnd (lldb::ValueObjectSP valobj_sp) :
325 SyntheticChildrenFrontEnd(*valobj_sp.get()),
335 lldb_private::formatters::NSSetMSyntheticFrontEnd::~NSSetMSyntheticFrontEnd ()
344 lldb_private::formatters::NSSetMSyntheticFrontEnd::GetIndexOfChildWithName (const ConstString &name)
346 const char* item_name = name.GetCString();
347 uint32_t idx = ExtractIndexFromString(item_name);
348 if (idx < UINT32_MAX && idx >= CalculateNumChildren())
354 lldb_private::formatters::NSSetMSyntheticFrontEnd::CalculateNumChildren ()
356 if (!m_data_32 && !m_data_64)
358 return (m_data_32 ? m_data_32->_used : m_data_64->_used);
362 lldb_private::formatters::NSSetMSyntheticFrontEnd::Update()
365 ValueObjectSP valobj_sp = m_backend.GetSP();
375 m_exe_ctx_ref = valobj_sp->GetExecutionContextRef();
377 if (valobj_sp->IsPointerType())
379 valobj_sp = valobj_sp->Dereference(error);
380 if (error.Fail() || !valobj_sp)
384 lldb::ProcessSP process_sp(valobj_sp->GetProcessSP());
387 m_ptr_size = process_sp->GetAddressByteSize();
388 uint64_t data_location = valobj_sp->GetAddressOf() + m_ptr_size;
391 m_data_32 = new DataDescriptor_32();
392 process_sp->ReadMemory (data_location, m_data_32, sizeof(DataDescriptor_32), error);
396 m_data_64 = new DataDescriptor_64();
397 process_sp->ReadMemory (data_location, m_data_64, sizeof(DataDescriptor_64), error);
405 lldb_private::formatters::NSSetMSyntheticFrontEnd::MightHaveChildren ()
411 lldb_private::formatters::NSSetMSyntheticFrontEnd::GetChildAtIndex (size_t idx)
413 lldb::addr_t m_objs_addr = (m_data_32 ? m_data_32->_objs_addr : m_data_64->_objs_addr);
415 uint32_t num_children = CalculateNumChildren();
417 if (idx >= num_children)
418 return lldb::ValueObjectSP();
420 ProcessSP process_sp = m_exe_ctx_ref.GetProcessSP();
422 return lldb::ValueObjectSP();
424 if (m_children.empty())
427 lldb::addr_t obj_at_idx = 0;
430 uint32_t test_idx = 0;
432 while(tries < num_children)
434 obj_at_idx = m_objs_addr + (test_idx * m_ptr_size);
436 return lldb::ValueObjectSP();
438 obj_at_idx = process_sp->ReadPointerFromMemory(obj_at_idx, error);
440 return lldb::ValueObjectSP();
448 SetItemDescriptor descriptor = {obj_at_idx,lldb::ValueObjectSP()};
450 m_children.push_back(descriptor);
454 if (idx >= m_children.size()) // should never happen
455 return lldb::ValueObjectSP();
457 SetItemDescriptor &set_item = m_children[idx];
458 if (!set_item.valobj_sp)
460 auto ptr_size = process_sp->GetAddressByteSize();
461 DataBufferHeap buffer(ptr_size,0);
464 case 0: // architecture has no clue?? - fail
465 return lldb::ValueObjectSP();
467 *((uint32_t*)buffer.GetBytes()) = (uint32_t)set_item.item_ptr;
470 *((uint64_t*)buffer.GetBytes()) = (uint64_t)set_item.item_ptr;
473 assert(false && "pointer size is not 4 nor 8 - get out of here ASAP");
475 StreamString idx_name;
476 idx_name.Printf("[%zu]",idx);
478 DataExtractor data(buffer.GetBytes(),
479 buffer.GetByteSize(),
480 process_sp->GetByteOrder(),
481 process_sp->GetAddressByteSize());
484 ValueObject::CreateValueObjectFromData(idx_name.GetData(),
487 m_backend.GetClangType().GetBasicTypeFromAST(lldb::eBasicTypeObjCID));
489 return set_item.valobj_sp;
492 lldb_private::formatters::NSOrderedSetSyntheticFrontEnd::NSOrderedSetSyntheticFrontEnd (lldb::ValueObjectSP valobj_sp) :
493 SyntheticChildrenFrontEnd(*valobj_sp.get()),
499 lldb_private::formatters::NSOrderedSetSyntheticFrontEnd::CalculateNumChildren ()
501 if (m_count != UINT32_MAX)
504 if (ExtractValueFromObjCExpression(m_backend,"unsigned int","count",count_temp))
505 return (m_count = count_temp);
506 return (m_count = 0);
510 lldb_private::formatters::NSOrderedSetSyntheticFrontEnd::GetChildAtIndex (size_t idx)
512 auto iter = m_children.find(idx);
513 if (iter == m_children.end())
515 lldb::ValueObjectSP retval_sp;
518 retval_sp = CallSelectorOnObject(m_backend, "id", "objectAtIndex", idx);
521 StreamString idx_name;
522 idx_name.Printf("[%zu]",idx);
523 retval_sp->SetName(ConstString(idx_name.GetData()));
525 m_children[idx] = retval_sp;
534 lldb_private::formatters::NSOrderedSetSyntheticFrontEnd::Update()
540 lldb_private::formatters::NSOrderedSetSyntheticFrontEnd::MightHaveChildren ()
546 lldb_private::formatters::NSOrderedSetSyntheticFrontEnd::GetIndexOfChildWithName (const ConstString &name)
548 const char* item_name = name.GetCString();
549 uint32_t idx = ExtractIndexFromString(item_name);
550 if (idx < UINT32_MAX && idx >= CalculateNumChildren())
555 lldb_private::formatters::NSOrderedSetSyntheticFrontEnd::~NSOrderedSetSyntheticFrontEnd ()
560 lldb_private::formatters::NSSetSummaryProvider<true> (ValueObject& valobj, Stream& stream);
563 lldb_private::formatters::NSSetSummaryProvider<false> (ValueObject& valobj, Stream& stream);